Chip 1997 - Expo 2000/Image.iso/t-online/show/wiegeht.dxr/00007.ls

Text File | 1996-11-25 | 503 b | 28 lines

on exitFrame
  global schalterT4, filmlange
  if the movieTime of sprite 13 < filmlange then
    go(the frame)
  else
    go("an-1")
  end if
end

on idle
  global balkenT1, balkenT2, balkenT3, balkenT4, balkenT5, balkenges
  if balkenges = 0 then
    hauptroll(316, 9)
  end if
  if balkenT1 = 1 then
    nebenroll1(370, 2)
  end if
  if balkenT3 = 1 then
    nebenroll3(355, 2)
  end if
  if balkenT4 = 1 then
    nebenroll4(346, 3)
  end if
  if balkenT5 = 1 then
    nebenroll5(365, 1)
  end if
end