home *** CD-ROM | disk | FTP | other *** search
/ 321 GAMES / 321GAMES.iso / logic / runes / runes.exe / runes.DXR / 00008_JUMPBLOCKS.ls < prev    next >
Encoding:
Text File  |  1996-07-01  |  2.0 KB  |  85 lines
  1. on JUMPRIGHTBLOCK
  2.   global MAN, GRIDX, GRIDY, DT, MANX, MANC, BCC
  3.   set MANX to getAt(GRIDX, MAN)
  4.   set MANC to getAt(GRIDY, MAN)
  5.   set BCC to getAt(GRIDY, MAN - 14)
  6.   set DT to 5
  7.   set the castNum of sprite 30 to 43
  8.   updateStage()
  9.   COUNTTIME()
  10.   set the castNum of sprite 30 to 44
  11.   updateStage()
  12.   COUNTTIME()
  13.   set the castNum of sprite 30 to 43
  14.   updateStage()
  15.   COUNTTIME()
  16.   set DT to 4
  17.   set the castNum of sprite 30 to 37
  18.   updateStage()
  19.   repeat with n = 1 to 4
  20.     set MANC to MANC - 8
  21.     set BCC to BCC - 8
  22.     set the locV of sprite 30 to MANC
  23.     set the locV of sprite 11 to BCC
  24.     updateStage()
  25.     COUNTTIME()
  26.   end repeat
  27.   set MAN to MAN - 14
  28.   set MANX to the locH of sprite 30
  29.   set BCC to MAN - 14
  30.   repeat with n = 1 to 4
  31.     set MANX to MANX + 8
  32.     set the locH of sprite 30 to MANX
  33.     set the locH of sprite 11 to MANX
  34.     updateStage()
  35.     COUNTTIME()
  36.   end repeat
  37.   set MAN to MAN + 1
  38.   set the locH of sprite 11 to getAt(GRIDX, MAN - 14)
  39.   set the castNum of sprite 30 to 37
  40. end
  41.  
  42. on JUMPLEFTBLOCK
  43.   global MAN, GRIDX, GRIDY, DT, MANX, MANC, BCC
  44.   set MANX to getAt(GRIDX, MAN)
  45.   set MANC to getAt(GRIDY, MAN)
  46.   set BCC to getAt(GRIDY, MAN - 14)
  47.   set DT to 5
  48.   set the castNum of sprite 30 to 34
  49.   updateStage()
  50.   COUNTTIME()
  51.   set the castNum of sprite 30 to 35
  52.   updateStage()
  53.   COUNTTIME()
  54.   set the castNum of sprite 30 to 34
  55.   updateStage()
  56.   COUNTTIME()
  57.   set DT to 4
  58.   set the castNum of sprite 30 to 28
  59.   updateStage()
  60.   repeat with n = 1 to 4
  61.     set MANC to MANC - 8
  62.     set BCC to BCC - 8
  63.     set the locV of sprite 30 to MANC
  64.     set the locV of sprite 11 to BCC
  65.     updateStage()
  66.     COUNTTIME()
  67.   end repeat
  68.   set MAN to MAN - 14
  69.   set BCC to MAN - 14
  70.   set MANX to the locH of sprite 30
  71.   repeat with n = 1 to 4
  72.     if n = 4 then
  73.       set the castNum of sprite 30 to 34
  74.     end if
  75.     set MANX to MANX - 8
  76.     set the locH of sprite 30 to MANX
  77.     set the locH of sprite 11 to MANX
  78.     updateStage()
  79.     COUNTTIME()
  80.   end repeat
  81.   set MAN to MAN - 1
  82.   set the locH of sprite 11 to getAt(GRIDX, MAN - 14)
  83.   set the castNum of sprite 30 to 28
  84. end
  85.