home *** CD-ROM | disk | FTP | other *** search
/ Quick Study Spanish / DISK_1_QSSP.iso / tlc.z / GAME.MPS < prev    next >
Text File  |  1997-07-03  |  1KB  |  82 lines
  1. ;Warning!  Do not modify this file.
  2. yield on
  3.  
  4. SceneBlack 20000
  5. bids=HGButtonID
  6.  
  7. ;#define GAME_LOBBY_DOOR 10001
  8. set bids ButtonID 10001
  9. get bids X1Pos X1
  10. get bids Y1Pos Y1
  11. get bids X2Pos X2
  12. get bids Y2Pos Y2
  13. hs.1=RHotSpot X1 Y1 X2 Y2
  14. set hs.1 hit goJet
  15.  
  16. ;#define GAME_CONQUEST 10002
  17. set bids ButtonID 10002
  18. get bids X1Pos X1
  19. get bids Y1Pos Y1
  20. get bids X2Pos X2
  21. get bids Y2Pos Y2
  22. hs.2=RHotSpot X1 Y1 X2 Y2
  23. set hs.2 hit goConquest
  24.  
  25. ;#define GAME_VIDEO_MATCH 10003
  26. set bids ButtonID 10003
  27. get bids X1Pos X1
  28. get bids Y1Pos Y1
  29. get bids X2Pos X2
  30. get bids Y2Pos Y2
  31. hs.3=RHotSpot X1 Y1 X2 Y2
  32. set hs.3 hit goVideoMatch
  33.  
  34. ;#define GAME_JUKE_BOX 10004
  35. set bids ButtonID 10004
  36. get bids X1Pos X1
  37. get bids Y1Pos Y1
  38. get bids X2Pos X2
  39. get bids Y2Pos Y2
  40. hs.4=RHotSpot X1 Y1 X2 Y2
  41. set hs.4 hit goKaraoke
  42.  
  43. ;#define GAME_HELP_BOOK 10000
  44. set bids ButtonID 10000
  45. get bids X1Pos X
  46. get bids Y1Pos Y
  47. get bids ResID RESID
  48.  
  49. help=RPButton X Y RESID
  50. set help hit goHelp
  51.  
  52. wait
  53.  
  54. procedure goJet
  55. [
  56.   exit
  57. ]
  58.  
  59. procedure goKaraoke
  60. [
  61.   call Karaoke.mps
  62. ]
  63.  
  64. procedure goConquest
  65. [
  66.   call conquest.mps
  67. ]
  68.  
  69. procedure goVideoMatch
  70. [
  71.   call videomat.mps
  72. ]
  73.  
  74. procedure goHelp
  75. [
  76. ;#define    HELP_GAME_ROOM        909
  77.   set bids StringID 909
  78.   get bids String hs
  79.   Help hs
  80. ;  Help "Game Room"
  81. ]
  82.