home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 25 / CD_ASCQ_25_1095.iso / dos / graphic / show70 / sprite1.shw < prev   
Text File  |  1995-08-01  |  952b  |  39 lines
  1. VARIABLE CREATE framno TYPE NUMBER 1
  2. VARIABLE CREATE loopno TYPE NUMBER 80
  3. SET GRAPHICS VGA1
  4. SHOW SCREEN "LANDSCAP.PCX" PCX
  5. WAIT 1
  6. COLOR FOREGROUND 15
  7. GOXY 2 2 DRAW BAR 27 2
  8. COLOR FOREGROUND 0
  9. GOXY 2 2 DRAW BOX 27 2
  10. GOXY 3 3 WRITE "This is a PCX picture."
  11. SPRITE "mann.spr" LOAD
  12. WAIT 1
  13. MARK 1
  14. SPRITE "mann.spr" GOXY loopno 300
  15. SPRITE "mann.spr" SHOW
  16. WAIT 0.1
  17. MATH loopno = loopno+2
  18. MATH framno = framno+1
  19. IF framno EQ 4 DO MATH framno = 1
  20. SPRITE "mann.spr" HIDE
  21. SPRITE "mann.spr" FRAME framno
  22. IF loopno LT 300 DO JUMPMARK 1
  23. SPRITE "mann.spr" SHOW
  24. WAIT 1
  25. SET DELAYFACTOR 5
  26. COLOR FOREGROUND 15
  27. GOXY 51 12 DRAW BAR 32 4
  28. COLOR FOREGROUND 0
  29. GOXY 51 12 DRAW BOX 32 4
  30. GOXY 52 13 WRITE "This is a sprite for anima-"
  31. GOXY 52 14 WRITE "tions and games.  You draw"
  32. GOXY 52 15 WRITE "it and move it around."
  33. SET DELAYFACTOR 0
  34. WAIT 3
  35. ;Clean up after us
  36. SPRITE "mann.spr" RELEASE
  37. VARIABLE RELEASE loopno
  38. VARIABLE RELEASE framno
  39.