home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fuji Wa La Te I Ka - Hyakunin Isshu Karuta
/
KARUTA.bin
/
wins
/
waku.dir
/
00104_Script_104
< prev
next >
Wrap
Text File
|
1995-11-10
|
358b
|
19 lines
on mousedown
global CUL,x
if pushbutton() then
if CUL < 100 then
if x <> 1 then
put 1 into x
else
put 2 into x
end if
put CUL+1 into CUL
tell window "town"
UnLoadCast CUL - 2
UnLoadCast CUL + 100 - 2
go to "RESULT" & x
end tell
end if
end if
end