Curso de Informatica 6/elPeriodico6.iso/menu.dir/Internal_45.ls

Text File | 1997-10-18 | 177 b | 10 lines

on mouseDown
  global linia
  repeat while the stillDown = 1
    if linia > 0 then
      set linia to linia - 1
    end if
    scrollByLine(member "texte", -1)
  end repeat
end