home *** CD-ROM | disk | FTP | other *** search
/ Micromanía 44 / Mm44.iso / sin / DATA / base / Pak0.pak / maps / sincitydemo.scr < prev    next >
Encoding:
Text File  |  1998-07-26  |  3.0 KB  |  124 lines
  1. //--------------------------------------------------------------
  2. // SincityDemo Script
  3. // Tom Mustaine - Ritual Entertainment
  4. //--------------------------------------------------------------
  5. music none none
  6. wait .5
  7.  
  8. //--------------------------------------------------------------
  9. // Script init
  10. //--------------------------------------------------------------
  11. thread Crane
  12. thread Shave_and_a_Haircut
  13. thread Opendoor_Check
  14.  
  15. //--------------------------------------------------------------
  16. // Crane Initial Setup
  17. //--------------------------------------------------------------
  18. Crane:
  19. $crane    time    .1
  20. $crane    rotateYdownto    -35
  21. waitFor $crane
  22. goto Wait_for_Crane
  23.  
  24. //--------------------------------------------------------------
  25. // Crane wait and move
  26. //--------------------------------------------------------------
  27. Wait_for_Crane:
  28. $crane ondamage movecrane
  29. pause
  30.  
  31. movecrane:
  32. $crane    time    5
  33. $crane    nodamage
  34. $crane    rotateYdownto    -145
  35. waitFor $crane
  36. wait    2
  37. $crane    rotateYupto    -35
  38. waitFor $crane
  39. goto Wait_for_Crane
  40. end
  41.  
  42. //--------------------------------------------------------------
  43. // Door knocking secret
  44. //--------------------------------------------------------------
  45. Shave_and_a_Haircut:
  46. local.knocktimes = 0
  47.  
  48. 2bits:
  49. $knockdoor onuse startknock
  50. pause
  51.  
  52. startknock:
  53. $knockdoor nouse
  54. thread checkknockstart
  55. $doorsound playsound impact/landing/land4.wav 1
  56. level.doorknock = 1
  57. wait .2
  58. level.doorknock = 0
  59. goto 2bits
  60.  
  61.     //Shave and a Haircut string "X...X.XX.X...X..X"
  62.  
  63. checkknockstart:
  64.     // Check if a door knocking pattern has started
  65. level.knockstarted ifequal 1 goto bah
  66. level.knockstarted ifequal 0 goto checkknockstart2
  67.  
  68. bah:
  69. end
  70.  
  71. checkknockstart2:
  72. local.knocktimes = 1
  73.  
  74. checkknock:
  75. level.knockstarted = 1
  76. level.doorknock ifequal 1 local.thestring append "X"
  77. level.doorknock ifequal 0 local.thestring append "."
  78. //print local.thestring
  79. //newline
  80. wait .2
  81. local.knocktimes += 1
  82. local.knocktimes iflessequal 6 goto checkknock
  83.     //Checking knock pattern string
  84. local.thestring ifstrequal ".XX..X" goto openknockdoor
  85. level.knockstarted = 0
  86. end
  87.  
  88. openknockdoor:
  89. $knockdoor notrigger
  90. level.knockstarted = 0
  91. $knockdoor    time    .3
  92. $knockdoor    playsound    environment/doors/wood/wdpn1.wav 1
  93. $knockdoor    rotateYup    90
  94. $knockportal    open
  95. waitFor $knockdoor
  96. wait 2
  97. $knockdoor    rotateYdown    90
  98. $knockdoor    playsound    environment/doors/wood/wddrcls1.wav 1
  99. waitFor $knockdoor
  100. $knockportal    close
  101. thread Opendoor_Check
  102. end
  103.  
  104. //--------------------------------------------------------------
  105. // Check secret door for open from other side
  106. //--------------------------------------------------------------
  107. Opendoor_Check:
  108. $knockdoor    ontrigger    opendoor
  109. pause
  110.  
  111. opendoor:
  112. $knockdoor    notrigger
  113. $knockdoor    time    .3
  114. $knockdoor    playsound    environment/doors/wood/wdpn1.wav 1
  115. $knockdoor    rotateYdown    90
  116. $knockportal    open
  117. waitFor $knockdoor
  118. wait 2
  119. $knockdoor    rotateYup    90
  120. $knockdoor    playsound    environment/doors/wood/wddrcls1.wav 1
  121. waitFor $knockdoor
  122. $knockportal    close
  123. goto Opendoor_Check
  124.