Helix Design System/HELIX_DESIGN_SYSTEM_DEMO.iso/portug/modeling.dxr/00386.ls

Text File | 1996-12-19 | 504 b | 27 lines

on Tasten
  global Warten, Root, ton
  if the pauseState = 1 then
    if the keyCode = 36 then
      continue()
    end if
    if the keyCode = 49 then
      continue()
    end if
    if the keyCode = 76 then
      continue()
    end if
  end if
  if the castNum of sprite 36 = 9 then
    set Warten to 0
    continue()
  end if
  repeat with i = 30 to 38
    set the puppet of sprite i to 0
  end repeat
  if Warten = 0 then
    set the castNum of sprite 36 to 8
    updateStage()
  end if
  pass()
end