home *** CD-ROM | disk | FTP | other *** search
/ ftp.team17.com 2014 / 2014.05.ftp.team17.com.tar / ftp.team17.com / pub / t17 / demos / pc / PhoenixDemo_De.exe / Scripts / alias / minelaying.txt < prev    next >
Text File  |  1999-08-14  |  436b  |  27 lines
  1. @DROPMINE::()
  2. Label(&1)
  3. If(S_VAR["MINEDROP1",1]): Goto(&2)
  4. If(S_VAR["MINEDROP2",1]): Goto(&3)
  5. If(S_VAR["MINEDROP3",1]): Goto(&4)
  6. Goto(&1)
  7.  
  8. Label(&2)
  9. @MOVESHIP{$1|$2}
  10. @SETSTRPARAM{$1|DETONATE|ON}
  11. @SETVAR{MINEDROP1|0}
  12. Goto(&5)
  13.  
  14. Label(&3)
  15. @MOVESHIP{$1|$3}
  16. @SETSTRPARAM{$1|DETONATE|ON}
  17. @SETVAR{MINEDROP2|0}
  18. Goto(&5)
  19.  
  20. Label(&4)
  21. @MOVESHIP{$1|$4}
  22. @SETSTRPARAM{$1|DETONATE|ON}
  23. @SETVAR{MINEDROP3|0}
  24.  
  25. Label(&5)
  26. ENDALIAS
  27.