home *** CD-ROM | disk | FTP | other *** search
/ Treasure Mathstorm / TMSWINCD.ISO / pc / install / autorun.mps < prev    next >
Text File  |  1996-10-15  |  3KB  |  174 lines
  1. ;debug on
  2. ;Labyrinth off
  3. yield off
  4. Scene 31000
  5.  
  6.  
  7.  
  8. pbRr1=RPButton 50 180 31001
  9. set pbRr1 "hit" rr1
  10.  
  11. pbLab=RPButton 250 180 31002
  12. set pbLab "hit" lab
  13.  
  14. pbOt3=RPButton 450 180 31003
  15. set pbOt3 "hit" ot3
  16.  
  17. pbMoredemos=RPButton 120 360 31004
  18. set pbMoredemos "hit" moredemos
  19.  
  20. pbOrder=RPButton 350 360 31007
  21. set pbOrder "hit" orderProd
  22.  
  23.  
  24.  
  25. pbExit=RPButton 592 451 31005
  26. set pbExit "hit" leavepreviews
  27.  
  28. wp=RWorldPort
  29.  
  30. yield on
  31.  
  32. get wp intVariable 1 firsttime
  33. if firsttime=0
  34.     [
  35.     voice=RSound 31400 -1
  36.     play voice start
  37.     set wp intVariable 1 1
  38.    ]
  39.  
  40. wait
  41.  
  42.  
  43.  
  44. procedure leavepreviews
  45.     [
  46.     set wp intVariable 1 0
  47.    click=RSound 31405 -1
  48.    play click start
  49.    pause 1
  50.    quit
  51.    ]
  52.  
  53. procedure moredemos
  54.     [
  55.    play voice stop
  56.    click=RSound 31405 -1
  57.    play click start
  58.    drop voice
  59.     yield off
  60.    Scene 31008
  61.     drop pbRr1
  62.     drop pbLab
  63.     drop pbOt3
  64.     drop pbMoredemos
  65.     drop pbOrder
  66.     pbDemoMenu=RPButton 496 451 31006
  67.     set pbDemoMenu "hit" returntomenu
  68.    yield on
  69.    drop click
  70.     voice=RSound 31402 -1
  71.     play voice start
  72.    ]
  73.  
  74. procedure orderProd
  75.     [
  76.    play voice stop
  77.    click=RSound 31405 -1
  78.    play click start
  79.  
  80.    drop voice
  81.    yield off
  82.     Scene 31009
  83.     drop pbRr1
  84.     drop pbLab
  85.     drop pbOt3
  86.  
  87.  
  88.     pbRr1=RPButton 56 146 31001
  89.     set pbRr1 "hit" rr1
  90.  
  91.     pbLab=RPButton 248 146 31002
  92.     set pbLab "hit" lab
  93.  
  94.     pbOt3=RPButton 440 146 31003
  95.     set pbOt3 "hit" ot3
  96.  
  97.     drop pbMoredemos
  98.     drop pbOrder
  99.     pbDemoMenu=RPButton 496 451 31006
  100.     set pbDemoMenu "hit" returntomenu
  101.    yield on
  102.    drop click
  103.     voice=RSound 31401 -1
  104.     play voice start
  105.    ]
  106.  
  107.  
  108. procedure lab
  109.     [
  110.    play voice stop
  111.    drop voice
  112.  
  113.    click=RSound 31405 -1
  114.    play click start
  115.     pause 1
  116.     call labrnth1.mps
  117.     ]
  118.  
  119. procedure rr1
  120.     [
  121.    play voice stop
  122.    drop voice
  123.  
  124.    click=RSound 31405 -1
  125.    play click start
  126.     pause 1
  127.     call reader1.mps
  128.     ]
  129.  
  130. procedure ot3
  131.     [
  132.    play voice stop
  133.    drop voice
  134.  
  135.    click=RSound 31405 -1
  136.    play click start
  137.     pause 1
  138.     call ot3.mps
  139.     ]
  140.  
  141.  
  142. procedure returntomenu
  143.     [
  144.    play voice stop
  145.    drop voice
  146.    click=RSound 31405 -1
  147.    play click start
  148.     yield off
  149.     drop pbDemoMenu
  150.     Scene 31000
  151.  
  152.     drop pbRr1
  153.     drop pbLab
  154.     drop pbOt3
  155.  
  156.     pbRr1=RPButton 50 180 31001
  157.     set pbRr1 "hit" rr1
  158.  
  159.     pbLab=RPButton 250 180 31002
  160.     set pbLab "hit" lab
  161.  
  162.     pbOt3=RPButton 450 180 31003
  163.     set pbOt3 "hit" ot3
  164.  
  165.    pbMoredemos=RPButton 120 360 31004
  166.     set pbMoredemos "hit" moredemos
  167.  
  168.    pbOrder=RPButton 350 360 31007
  169.     set pbOrder "hit" orderProd
  170.  
  171.     yield on
  172.    ]
  173.  
  174.