Guest User

Untitled

a guest
Jun 18th, 2018
110
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.36 KB | None | 0 0
  1. Zone0 = {} --Button1
  2. Zone1 = {} --Monster
  3. Zone2 = {} --MS1
  4. Zone3 = {} --MS2
  5. Zone4 = {} --MS3
  6. Zone5 = {} --MS4
  7. Zone6 = {} --Lift1 Start
  8. Zone7 = {} --Geist
  9. Zone8 = {} --Zelt
  10. Zone9 = {} --Geist2
  11. Zone10 = {} --
  12. Zone11 = {} --
  13. Zone12 = {} --
  14. Zone13 = {} --
  15. Zone14 = {} --
  16.  
  17. Kill1 = {} --
  18. Kill2 = {} --
  19. Kill3 = {} --
  20. Kill4 = {} --
  21. Clear1 = {} --ms1
  22. Clear2 = {} --ms3 oben
  23. Clear3 = {} --
  24. Clear4 = {} --
  25. Clear5 = {} --Start
  26. Clear6 = {} --ms3 unten
  27. Clear7 = {} --
  28.  
  29.  
  30.  
  31.  
  32. ms = 0
  33. Mission1 = 0
  34.  
  35. Zone0x = 0
  36. Zone1x = 0
  37. Zone2x = 0
  38. Zone3x = 0
  39. Zone4x = 0
  40. Zone5x = 0
  41. Zone6x = 0
  42. Zone7x = 0
  43. Zone8x = 0
  44. Zone9x = 0
  45. Zone10x = 0
  46. Zone11x = 0
  47. Zone12x = 0
  48. Zone13x = 0
  49. Zone14x = 0
  50.  
  51. function OnLoad()
  52. Game.Message("Welcome to LEVELNAME")
  53. Game.SetKeyHook("E", "Enter")
  54. return true
  55. end
  56.  
  57.  
  58.  
  59.  
  60. function Kill1.OnEnter()
  61. Game.KillPlayer()
  62. end
  63.  
  64. function Kill2.OnEnter()
  65. Game.KillPlayer()
  66. end
  67.  
  68. function Kill3.OnEnter()
  69. Game.KillPlayer()
  70. end
  71.  
  72. function Kill4.OnEnter()
  73. Game.KillPlayer()
  74. end
  75.  
  76.  
  77.  
  78. function Clear1.OnEnter()
  79. Game.ClearMessages()
  80. end
  81.  
  82. function Clear2.OnEnter()
  83. Game.ClearMessages()
  84. end
  85.  
  86. function Clear3.OnEnter()
  87. Game.ClearMessages()
  88. end
  89.  
  90. function Clear4.OnEnter()
  91. Game.ClearMessages()
  92. end
  93.  
  94. function Clear5.OnEnter()
  95. Game.ClearMessages()
  96. end
  97.  
  98. function Clear6.OnEnter()
  99. Game.ClearMessages()
  100. end
  101.  
  102. function Clear7.OnEnter()
  103. Game.ClearMessages()
  104. end
  105.  
  106.  
  107.  
  108.  
  109. --Totem Rampe
  110. function Zone0.OnEnter()
  111. if (Zone0x==0) then
  112. Game.SetDynamicBlockTranslation("Button1", -0.5, 0, 800, 0, 400)
  113. Game.SetDynamicBlockTranslation("Totemblock1", 0, 2.4, 1000, 0, 500)
  114. Game.SetDynamicBlockTranslation("Totemblock2", 0, 2.4, 1000, 0, 500)
  115. Game.SetDynamicBlockTranslation("Totemblock3", 0, 2.4, 1000, 0, 500)
  116. Game.SetDynamicEntityTranslation("Totemsprite1", 0, 2.4, 1000, 0, 500)
  117. Game.SetDynamicEntityTranslation("Totemsprite2", 0, 2.4, 1000, 0, 500)
  118. Zone0x=1
  119. end
  120. end
  121.  
  122.  
  123. function Zone1.OnEnter()
  124. if (Zone1x==0) then
  125. if (Mission1==1) then
  126. ms=ms+1
  127. Game.KillEntity("ms1")
  128. Game.Message("You picked up a mushroom")
  129. Zone1x=1
  130. end
  131. end
  132. end
  133.  
  134. function Zone2.OnEnter()
  135. if (Zone2x==0) then
  136. if (Mission1==1) then
  137. ms=ms+1
  138. Game.KillEntity("ms2")
  139. Game.Message("You picked up a mushroom")
  140. Zone2x=1
  141. end
  142. end
  143. end
  144.  
  145. function Zone3.OnEnter()
  146. if (Zone3x==0) then
  147. if (Mission1==1) then
  148. ms=ms+1
  149. Game.KillEntity("ms3")
  150. Game.Message("You picked up a mushroom")
  151. Zone3x=1
  152. end
  153. end
  154. end
  155.  
  156. function Zone4.OnEnter()
  157. if (Zone4x==0) then
  158. if (Mission1==1) then
  159. ms=ms+1
  160. Game.KillEntity("ms4")
  161. Game.Message("You picked up a mushroom")
  162. Zone4x=1
  163. end
  164. end
  165. end
  166.  
  167. function Zone6.OnEnter()
  168. if (Zone6x==0) then
  169. if (Zone4x==1) then
  170. Game.ClearMessages()
  171. Game.SetDynamicBlockTranslation("Lift1", 0, 6, 1000, 0, 500)
  172. Game.SetDynamicBlockTranslation("vines", 0, 6, 1000, 0, 500)
  173. Zone6x=1
  174. end
  175. end
  176. end
  177.  
  178.  
  179. function Zone7.OnEnter()
  180. if (ms<4) then
  181. Game.Message("Ghost: Give me 4 mushrooms or i will kill you!!!")
  182. Mission1=1
  183. end
  184. end
  185.  
  186. function Zone9.OnEnter()
  187. if (ms==4) then
  188. if (Zone9x==0) then
  189. Game.Message("Thanks, now u can enter the tent")
  190. Zone9x=1
  191. end
  192. end
  193. end
  194.  
  195. function Zone8.OnEnter()
  196. if (Zone9x==1) then
  197. if (Zone8x==0) then
  198. Game.Message("Press 'E' to enter the tent")
  199. Zone8x=1
  200. end
  201. end
  202. end
  203.  
  204.  
  205.  
  206.  
  207.  
  208.  
  209. function Enter()
  210. if (Zone8x==1) then
  211. x, y = Game.GetEntityPos("TeleportPoint")
  212. Game.SetPlayerPosition(x, y, 0)
  213. end
  214. end
Add Comment
Please, Sign In to add comment