home *** CD-ROM | disk | FTP | other *** search
/ The Best of Select: Games 4 / CD_1.iso / bioforge / script / title.scp < prev    next >
Text File  |  1995-01-18  |  886b  |  107 lines

  1. { TITLE_LOAD
  2. I @Ç¢ LEX == 1 THEN
  3. K CURFIG
  4. }
  5. { TITLESEQUENCE
  6. P ~ÇÇ 
  7.  @Ç£ DOWN 
  8. C UNLOCK 
  9. C TITLE
  10.  @Ç£ UP 
  11. O $Ç£ 
  12.  
  13. ^Çâ = 0
  14. ^Çé = 0
  15. æ GETANYKEY
  16. ~ÇÇ = 3
  17.  
  18. :TITLE_LOOP
  19.  
  20.  
  21.  
  22. N ^Çâ 
  23. {
  24. U 4: 
  25. @Çå `ëì 
  26. X ÇÇ 
  27. U 6: 
  28. @Çå `ëì 240 -1024 
  29. X ÇÇ 
  30. U 9: 
  31. @Çå `ëì 
  32. X ÇÇ 
  33. U 11: 
  34. @Çå `ëì 240 -1024 
  35. X ÇÇ 
  36. U 16: 
  37. @Çå `ëì 
  38. X ÇÇ 
  39. U 18: 
  40. @Çå `ëì 240 -1024 
  41. X ÇÇ 
  42. U 33: 
  43. @Çå `ëì 
  44. X ÇÇ 
  45. U 35: 
  46. @Çå `ëì 240 -1024 
  47. X ÇÇ 
  48. U 39: 
  49. @Çå `ëì 
  50. X ÇÇ 
  51. U 42: 
  52. @Çå `ëì 240 -1024 
  53. X ÇÇ 
  54. U 46: 
  55. @Çå `ëì 
  56. X ÇÇ 
  57. U 48: 
  58. @Çå `ëì 240 -1024 
  59. X ÇÇ 
  60. U 64: 
  61. @Çå `ëì 
  62. X ÇÇ 
  63. U 66: 
  64. @Çå `ëì 240 -1024 
  65. X ÇÇ 
  66. U 69: 
  67. @Çå `ëì 
  68. X ÇÇ 
  69. U 72: 
  70. @Çå `ëì 240 -1024 
  71. X ÇÇ 
  72. U 76: 
  73. @Çå `ëì 
  74. X ÇÇ 
  75. U 78: 
  76. @Çå `ëì 240 -1024 
  77. X ÇÇ 
  78. }
  79. ^Çâ ++
  80. W 3
  81. I ~ÇÇ > 0 && ^Çé == 0 THEN
  82. {
  83. I ^Çâ > 89 THEN
  84. {
  85. ^Çâ = 59
  86. ~ÇÇ --
  87. }
  88. }
  89. I ~ÇÇ > 0 && ^Çé == 0 THEN
  90. J #Çé 
  91.  
  92.  
  93. Æ 
  94. ^Çâ = 72
  95. â 
  96.  
  97. }
  98. { GETANYKEY _KEY _MODIFIERS _MOUSE
  99. I ~ÇÇ != 0 THEN
  100. ^Çé = 1
  101. é 
  102. }
  103.  
  104.  
  105.  
  106. //$ 26 - version number
  107.