home *** CD-ROM | disk | FTP | other *** search
/ PC PowerPlay 56 / CDPowerplay56Disc2.iso / demos / blade / data1.cab / Program_Executable_Files / Maps / Ragnar_M2 / elevador.py < prev    next >
Encoding:
Text File  |  2000-10-27  |  3.6 KB  |  106 lines
  1. import Doors
  2. import Objects
  3. import Sounds
  4. import Levers
  5.  
  6.  
  7. plataformaelevador=Bladex.CreateEntity("PlataformaElevador", "Plataforma", -122004.455927, -5511.732215, 40902.346632)
  8. plataformaelevador.Static=0
  9. plataformaelevador.Scale=5.5
  10. plataformaelevador.Orientation=0.707107,0.707107,0.000000,0.000000
  11.  
  12. plataformaelevadormovil=Objects.CreateDinamicObject("PlataformaElevador")
  13.  
  14. loopelevador=Sounds.CreateEntitySound("..\\..\\Sounds\\drawbridge-loop.wav", "LoopElevador")
  15. golpeelevador=Sounds.CreateEntitySound("..\\..\\Sounds\\metal-lever3.wav", "GolpeElevador")
  16.  
  17.  
  18. columnaelevador=Doors.CreateDoor("ColumnaElevador", (-122000, -5200, 40750), (0, -1, 0), 0, 6850, Doors.OPENED)
  19.  
  20. columnaelevador.opentype=Doors.AC_UNIF_DEC
  21. columnaelevador.o_init_vel=0
  22. columnaelevador.o_init_displ=500
  23. columnaelevador.o_med_vel=-2000
  24. columnaelevador.o_med_displ=5850
  25. columnaelevador.o_end_vel=0
  26. columnaelevador.o_end_displ=500
  27.  
  28. columnaelevador.closetype=Doors.AC_UNIF_DEC
  29. columnaelevador.c_init_vel=0
  30. columnaelevador.c_init_displ=500
  31. columnaelevador.c_med_vel=2000
  32. columnaelevador.c_med_displ=5850
  33. columnaelevador.c_end_vel=0
  34. columnaelevador.c_end_displ=500
  35.  
  36.  
  37.  
  38. columnaelevador.OnEndCloseFunc=EsperaYBajaElevador
  39.  
  40. columnaelevador.OnEndOpenFunc=ElevadorArriba
  41.  
  42. palancaelevador=Levers.PlaceLever("PalancaElevador", Levers.LeverType3, (-118613.991158, -6739.418632, 39250.360666), (0.491198, 0.491198, 0.508650, -0.508650), 1.0)
  43. palancaelevador.mode=1
  44.  
  45. palancaelevador.OnTurnOnFunc=SubeElevador
  46. palancaelevador.OnTurnOnArgs=()
  47.  
  48. palanca2elevador=Levers.PlaceLever("Palanca2Elevador", Levers.LeverType3, (-117372.139014,-12865.361372,37346.626051), (0.500000,0.500000,-0.500000,0.500000), 1.0)
  49. palanca2elevador.mode=1
  50.  
  51. palanca2elevador.OnTurnOnFunc=SubeElevador
  52. palanca2elevador.OnTurnOnArgs=()
  53.  
  54.  
  55. ######################
  56.  
  57. plataformaelevador2=Bladex.CreateEntity("PlataformaElevador2", "Plataforma", -123681.339188, 2300.325085, 57285.883093)
  58. plataformaelevador2.Static=0
  59. plataformaelevador2.Scale=3.733391
  60. plataformaelevador2.Orientation=0.707107,0.707107,0.000000,0.000000
  61.  
  62. plataformaelevador2movil=Objects.CreateDinamicObject("PlataformaElevador2")
  63.  
  64. loopelevador=Sounds.CreateEntitySound("..\\..\\Sounds\\drawbridge-loop.wav", "LoopElevador")
  65. golpeelevador=Sounds.CreateEntitySound("..\\..\\Sounds\\metal-lever3.wav", "GolpeElevador")
  66.  
  67.  
  68. columnaelevador2=Doors.CreateDoor("ColumnaElevador2", (-123500, 6000, 57200), (0, -1, 0), 0, 7250, Doors.CLOSED)
  69.  
  70. columnaelevador2.opentype=Doors.AC_UNIF_DEC
  71. columnaelevador2.o_init_vel=0
  72. columnaelevador2.o_init_displ=500
  73. columnaelevador2.o_med_vel=-2000
  74. columnaelevador2.o_med_displ=6250
  75. columnaelevador2.o_end_vel=0
  76. columnaelevador2.o_end_displ=500
  77.  
  78. columnaelevador2.closetype=Doors.AC_UNIF_DEC
  79. columnaelevador2.c_init_vel=0
  80. columnaelevador2.c_init_displ=500
  81. columnaelevador2.c_med_vel=2000
  82. columnaelevador2.c_med_displ=6250
  83. columnaelevador2.c_end_vel=0
  84. columnaelevador2.c_end_displ=500
  85.  
  86. enmarcha=0
  87.  
  88.  
  89.  
  90. columnaelevador2.OnEndOpenFunc=EsperaYSubeElevador2
  91. columnaelevador2.OnEndCloseFunc=Elevador2Arriba
  92.  
  93.  
  94. palanca1elevador2=Levers.PlaceLever("Palanca1Elevador2", Levers.LeverType3, (-121661.640207, 1139.483907, 57538.172715), (0.504344, 0.504344, 0.495618, -0.495618), 1.0)
  95. palanca1elevador2.mode=1
  96.  
  97. palanca1elevador2.OnTurnOnFunc=BajaElevador2
  98. palanca1elevador2.OnTurnOnArgs=()
  99.  
  100.  
  101. palanca2elevador2=Levers.PlaceLever("Palanca2Elevador2", Levers.LeverType3, (-121672.601876, 8669.148758, 54322.933958), (0.504344, 0.504344, 0.495618, -0.495618), 1.0)
  102. palanca2elevador2.mode=1
  103.  
  104. palanca2elevador2.OnTurnOnFunc=BajaElevador2
  105. palanca2elevador2.OnTurnOnArgs=()
  106.