home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD-ROM Today (BR) Volume 2 #6
/
CDRTV2N6.iso
/
makers
/
power
/
ue.dir
/
00293_Script_293
< prev
next >
Wrap
Text File
|
1996-03-13
|
1KB
|
35 lines
on mouseDown
global FramesMap,PrevFrame,MensFrames
if inside(the clickLoc, rect(23, 183, 222, 429)) then --left
put 2 into theItem
else if inside(the clickLoc, rect(512, 189, 612, 429)) then --right
put 1 into theItem
else if inside(the clickLoc, rect(122, 229, 512, 379)) then --forward
put 3 into theItem
else if inside(the clickLoc, rect(122, 189, 512, 229)) then --up
put 5 into theItem
else if inside(the clickLoc, rect(122, 379, 512, 429)) then --back
put 4 into theItem
end if
updateStage
if the frame = (marker(0) + 1) then
put ((the frame) + 2) / 3 into theLine
if theItem = 4 and char 3 of the name of cast the castNum of sprite 25 = "H" then put 6 into theItem
if char 3 of the name of cast the castNum of sprite (theItem + 19) = "H" then
if string(item theItem of line theLine of FramesMap) <> "---" then
go frame string(item theItem of line theLine of FramesMap)
else
chooseBack theLine,theItem
end if
else
if the number of chars of string(theLine) < 3 then put string("0"&theLine) into theLine
if the number of chars of string(theLine) < 3 then put string("0"&theLine) into theLine
if MensFrames contains string(theLine) then
GoDatabase theLine
end if
end if
if ((the frame) + 2) / 3 <> theLine then put theLine into PrevFrame
end if
end