Mac Ga Ichiban! 1997 April/macgaichiban199704.bin/MOVIES/TRUE.Dxr/00070.ls

Text File | 1997-02-07 | 797 b | 31 lines

global gframelabel

on button
  set cname to item 1 of the name of cast the castNum of sprite clickOn()
  set the castNum of sprite clickOn() to the number of member (cname & ",on")
  updateStage()
  repeat while the stillDown
    if rollOver(clickOn()) then
      set the castNum of sprite clickOn() to the number of member (cname & ",on")
      updateStage()
      next repeat
    end if
    set the castNum of sprite clickOn() to the number of member (cname & ",off")
    updateStage()
  end repeat
  set the castNum of sprite clickOn() to the number of member (cname & ",off")
  updateStage()
end

on back
  if key() = RETURN then
    set the keyDownScript to EMPTY
    go(gframelabel)
  end if
end

on yubicursor
  set yubino to the number of member "YUBI"
  cursor([yubino, yubino + 1])
end