home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD-ROM Today (BR) Volume 2 #6
/
CDRTV2N6.iso
/
makers
/
search.dir
/
00062_Script_62
< prev
next >
Wrap
Text File
|
1996-03-11
|
696b
|
21 lines
on mouseDown
global LastSubLine,ThisSubChapter
put the clickOn into theSprite
set the castNum of sprite theSprite to (the castNum of sprite theSprite) + 1
updateStage
repeat while the mouseDown
if theSprite = 18 then
if the number of lines of ThisSubChapter > LastSubLine then
put LastSubLine + 1 into LastSubLine
end if
else
if LastSubLine > 20 then
put LastSubLine - 1 into LastSubLine
end if
end if
put line (LastSubLine - 19) to LastSubLine of ThisSubChapter into cast the castNum of sprite 11
end repeat
set the castNum of sprite theSprite to (the castNum of sprite theSprite) - 1
updateStage
end