31 lines
1.4 KiB
Common Lisp
31 lines
1.4 KiB
Common Lisp
|
||
[dispsize width=108 height=144]
|
||
|
||
[state enablemove=false enableAttack=false nogravity=true]
|
||
|
||
|
||
*loop
|
||
|
||
[disp left=0 top=0 opacity=255][wait frame=2][call target=*check]
|
||
[disp left=1 top=0 opacity=255][wait frame=2][call target=*check]
|
||
[disp left=2 top=0 opacity=255][wait frame=2][call target=*check]
|
||
|
||
[jump target=*loop]
|
||
|
||
|
||
*erase
|
||
|
||
[disp left=2 top=0 opacity=215][wait frame=2]
|
||
[disp left=1 top=0 opacity=135][wait frame=2]
|
||
[disp left=0 top=0 opacity= 55][wait frame=2]
|
||
[disp left=0 top=0 opacity= 0][wait frame=2]
|
||
[del]
|
||
[s]
|
||
|
||
|
||
*check
|
||
[if exp="sprite.parentSprite === void || !isvalid sprite.parentSprite || sprite.parentSprite.nowSpriteId != stLocked"]
|
||
[jump target=*erase]
|
||
[endif]
|
||
|
||
[return]
|