home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fuji Wa La Te I Ka - Hyakunin Isshu Karuta
/
KARUTA.bin
/
wins
/
doujyou.dir
/
00271_Script_271
< prev
next >
Wrap
Text File
|
1995-11-10
|
838b
|
38 lines
--îÇ┐¢Φα≤∙2(∞╞╟ìîÇ┐¢)
on Button2 X, Y, Z
--╔p╔b╔y╔g╔X╔v╔Γ╔C╔gΩ¢φ╦
puppetSprite clickOn(),TRUE
--σ¬τ¢╟├τ┐∩W╟¥∩ñΘ∙
set C_X = the locH of sprite clickOn()
set C_Y = the locV of sprite clickOn()
--╔{╔^╔∞╟ÖΓⁿ╟Ä╟═╟â╟ó╟╚Σæ┼AΘwφ╦╔s╔N╔Z╔π∩Öα₧∞╞
repeat while stillDown()
set the locH of sprite clickOn() = C_X + X
set the locV of sprite clickOn() = C_Y + Y
updateStage
end repeat
--σÄ╟├αáφu╟à±ü╟▌
set the locH of sprite clickOn() = C_X
set the locV of sprite clickOn() = C_Y
updateStage
--╔p╔y╔b╔g╔X╔v╔Γ╔C╔gΓ¥Φ·
puppetSprite clickOn(),FALSE
--╔X╔v╔Γ╔C╔gΦä╟╝╔}╔E╔X╟Ö≤ú╟Ä╟═╟²╟⌐
if rollover(clickOn()) then
return 1
else
return 0
end if
end