home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fuji Wa La Te I Ka - Hyakunin Isshu Karuta
/
KARUTA.bin
/
wins
/
library2.dir
/
00195_Script_195
< prev
next >
Wrap
Text File
|
1995-11-13
|
565b
|
20 lines
on mousedown
puppetSound "PUSH_SE"
put Clickon() into vSP
puppetSprite vSP, true
put item 1 of the name of cast the castNum of sprite vSP into cName
set the castNum of sprite vSP = the number of cast (cName & ",DW")
repeat with n = 11 to 20
if n = vSP then next repeat
else
puppetSprite n, false
put item 1 of the name of cast the castNum of sprite n into cName
set the castNum of sprite n = the number of cast (cName & ",up")
updatestage
end if
end repeat
WAKA
puppetSound 0
end