1&1 Multimedia Trend 1996 11 D/MM_TREND.ISO/prog/t_online/t_intro.dir/00129.ls

Text File | 1996-09-18 | 1.5 KB | 68 lines

on exitFrame
  global balkenT1, balkenT2, BalkenT3, balkenT4, balkenT5, balkenges, schalterT4, ser, kostet, wie, fragen
  set balkenges to balkenT1 + balkenT2 + BalkenT3 + balkenT4 + balkenT5
  go(the frame)
end

on idle
  global balkenT1, balkenT2, BalkenT3, balkenT4, balkenT5, balkenges
  if rollOver(1) then
    go("roll")
  end if
  if rollOver(2) or rollOver(12) then
    repeat while rollOver(2) or rollOver(12)
      go("r2")
      updateStage()
      preLoadCast(15, 25)
      if the mouseDown = 1 then
        exit
      end if
    end repeat
  end if
  if rollOver(3) or rollOver(13) then
    repeat while rollOver(3) or rollOver(13)
      go("r3")
      updateStage()
      preLoadCast(55, 65)
      if the mouseDown = 1 then
        exit
      end if
    end repeat
  end if
  if rollOver(4) or rollOver(14) then
    repeat while rollOver(4) or rollOver(14)
      go("r4")
      updateStage()
      preLoadCast(70, 78)
      if the mouseDown = 1 then
        exit
      end if
    end repeat
  end if
  if rollOver(5) or rollOver(15) then
    repeat while rollOver(5) or rollOver(15)
      go("r5")
      updateStage()
      preLoadCast(87, 97)
      if the mouseDown = 1 then
        exit
      end if
    end repeat
  end if
  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