home *** CD-ROM | disk | FTP | other *** search
/ Media Share 8 / MEDIASHARE_08.ISO / runtime / script.sss < prev    next >
Text File  |  1991-09-10  |  807b  |  47 lines
  1. SCRIPT
  2. ;
  3. ; Look scripts for play!!!!!
  4. ;
  5. ; call this subroutine main
  6. [main]
  7. ;
  8. ; play track 5 on the cdrom
  9. ; 
  10. _cd 5
  11. ; play arena.flc
  12. arena.flc
  13. ;
  14. ; start a loop
  15. ;
  16. _startsub
  17. ; if 1 was pressed goto option1
  18.     _keyin "1" option1
  19. ; if a mouse was clicked in the left region goto option1
  20.     _region 0 0 159 199 option1
  21. ; if 2 was pressed goto option2
  22.     _keyin "2" option2
  23. ; if a mouse was clicked in the right region goto option2
  24.     _region 160 0 319 199 option2
  25. ; end the loop
  26. _endsub
  27. ;
  28. ; call the subroutine option1
  29. [option1]
  30. ; play main.flc
  31. main.flc
  32. ; end this animation
  33. _jump finish
  34. ;
  35. ; call the subroutine option2
  36. [option2]
  37. ; play face.flc
  38. face.flc
  39. ;
  40. ; call the subroutine finish
  41. [finish]
  42. ; play smash.flc
  43. smash.flc
  44. ; end and return 0 as errlevel or c shell
  45. _return 0
  46.  
  47.