home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fuji Wa La Te I Ka - Hyakunin Isshu Karuta
/
KARUTA.bin
/
wins
/
sub_karu.dir
/
00101_Script_101
< prev
next >
Wrap
Text File
|
1995-11-10
|
464b
|
27 lines
on startMovie
repeat with SP = 10 to 34
puppetsprite SP, TRUE
end repeat
updateStage
selectjihuda2
-- go to "noclick"
end
on selectJihuda2
global gHuda2
repeat with listct = 1 to 25
set the castNum of sprite listct + 9 = getAt(gHuda2, listct)
updateStage
wait 3
end repeat
end
on wait Xtime
Starttimer
set endtime = the timer + Xtime
repeat while the timer < endtime
nothing
end repeat
end