Re: Animation/Auto refresh screens

Hello,

I'm currently OTR, and will post the generated output of my dspf
record maker soon.
The purpose is make an animation as fast as possible, with (ASCII) 3D
if possible and scrollers/transformations of the image.

I want to show people that the AS/400 is still alive, and get as much
as possible out of it, using the common languages (RPG+DDS files for
example).

In this spirit, is it possible to get timeouts of the screen under one
second? And if yes, how many frames per second should be doable over a
twinax line to a 3486 green screener?

<off topic>
(I know this is odd, programming game-like environments on a die hard
business machine, but this way I can learn how to use it decently - it
is also an attempt to make the AS/400 platform more attractive to my
fellow students, since there's quite a big market for the next batch
of 400 guru's. I think this is the best way to let students play with
it, by bridging it into their known environment)
</off topic>

Vriendelijke groet,
Sincerely,

Yvan Janssens

Verstuurd vanaf mijn tablet
Sent from my tablet

Op 1-jul.-2012 om 19:36 heeft Scott Klement
<rpg400-l@xxxxxxxxxxxxxxxx> het volgende geschreven:

Hello Yvan,

Add the FRCDTA keyword to each record format. Then, change the RPG code
to use the WRITE opcode (instead of EXFMT) to display them.

-SK


On 7/1/2012 4:51 AM, Yvan Janssens wrote:

Hello,

I'm attempting to create an animation on my 5250 session - the approach I
want to try is separating the animation in frames, create a dspf record for
each frame, and display each dspf record sequentially.

The display file works (it counts 37k lines though, so compilation takes a
bit of time on my Model 250), but my RPG program waits for an [ENTER] after
every display, and hitting 300 times [enter] to get through the animation
is a PITA...

I'm using the following RPGLE code:

H DFTACTGRP(*NO)
fSCENE1 cf e workstn SFILE(S1:RRN1)
d usleep pr 10i 0 ExtProc ('usleep')
d seconds 10i 0 value
c ExFmt FR000
c callp usleep(100000)
c ExFmt FR001
c callp usleep(100000)
...

How can I evade the requirement to push on the [enter] button after every
frame? (my RPG level of experience is copy-paste n00b, just started
learning).

The idea is to make a demo for a local demoscene competition (like the
animations on the Commodore 64 and such), and get an animation out of my
green screen terminal.

Thank you,

Yvan Janssens

(ps: these files are autogenerated - I created ASCII art logo's, and
transformation routines, which creates in turn every frame in a .txt file
in ASCII, then I'll optimize it and create DSPF files)

--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.