home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 18
/
CD_ASCQ_18_111294_W.iso
/
dos
/
graphic
/
datashow
/
sprite1.shw
< prev
Wrap
Text File
|
1994-11-01
|
772b
|
32 lines
VARIABLE CREATE loopno TYPE NUMBER 80
SET GRAPHICS VGA1
SHOW SCREEN "LANDSCAP.PCX" PCX
WAIT 1
COLOR FOREGROUND 15
GOXY 2 2 DRAW BAR 27 2
COLOR FOREGROUND 0
GOXY 2 2 DRAW BOX 27 2
GOXY 3 3 WRITE "This is a PCX picture."
SPRITE "mann.spr" LOAD
SPRITE "mann.spr" GOXY 80 300
SPRITE "mann.spr" SHOW
WAIT 1
MARK 1
SPRITE "mann.spr" GOXY loopno 300
MATH loopno = loopno+1
IF loopno LT 300 DO JUMPMARK 1
WAIT 1
SET DELAYFACTOR 5
COLOR FOREGROUND 15
GOXY 51 12 DRAW BAR 32 4
COLOR FOREGROUND 0
GOXY 51 12 DRAW BOX 32 4
GOXY 52 13 WRITE "This is a sprite for anima-"
GOXY 52 14 WRITE "tions and games. You draw"
GOXY 52 15 WRITE "it and move it around."
SET DELAYFACTOR 0
WAIT 3
;Clean up after us
SPRITE "mann.spr" RELEASE
VARIABLE RELEASE loopno