shiny-cuty-excel-chiffon/data/p0_h1611.asd

175 lines
13 KiB
Common Lisp
Raw Permalink Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

*start
[iscript]
mp.storage = "p0_h1611";
mp.width = 154;
mp.height = 138;
mp.baseline = 6;
mp.centerpos = mp.width / 2;
mp.shaseiX = -8;
mp.shaseiY = 24;
mp.shaseiStorage = "p0_h1611s";
[endscript]
[image storage=&(mp.storage+"c")]
[image storage=&(mp.storage+"b")]
[image storage=&(mp.storage+"a")]
[dispsize width=&mp.width height=&mp.height baseline=&mp.baseline centerpos=&mp.centerpos]
[state enablemove=false enableAttack=false ignoremovablerect=true]
[if exp="mp.step==100"]
[jump target=*shasei]
[endif]
; ピストン中
*loop1
[playse storage=&('se1910'+intrandom(1,8)) buf=7]
[disp left=0 top=0 opacity=255][wait frame=3]
[disp left=1 top=0 opacity=255][wait frame=3]
[disp left=2 top=0 opacity=255][wait frame=3]
[disp left=3 top=0 opacity=255][wait frame=3]
[disp left=4 top=0 opacity=255][wait frame=3]
[disp left=5 top=0 opacity=255][wait frame=3]
[jump target=*loop1 cond="mp.step==1"]
; フィニッシュ前ピストン
*loop1end
[image storage=&(mp.storage+"b")]
[dispsize width=&mp.width height=&mp.height baseline=&mp.baseline centerpos=&mp.centerpos]
[playse storage=&('se1910'+intrandom(1,8)) buf=7]
[disp left=0 top=0 opacity=255][wait frame=3]
[disp left=1 top=0 opacity=255][wait frame=3]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=3 top=0 opacity=255][wait frame=2]
;
*loop2
[playse storage=&('se1911'+mp.seCount) buf=7]
[eval exp="mp.seCount++"]
[eval exp="mp.seCount=1" cond="mp.seCount>=7"]
[disp left=4 top=0 opacity=255][wait frame=1]
[disp left=5 top=0 opacity=255][wait frame=1]
[disp left=6 top=0 opacity=255][wait frame=1]
[disp left=7 top=0 opacity=255][wait frame=1]
[disp left=8 top=0 opacity=255][wait frame=1]
[disp left=9 top=0 opacity=255][wait frame=1]
[disp left=10 top=0 opacity=255][wait frame=1]
[jump target=*loop2 cond="mp.step==2"]
[playse storage=se118 buf=1]
[disp left=4 top=0 opacity=255][wait frame=1]
; 射精
*finish
[image storage=&(mp.storage+"c")]
[dispsize width=&mp.width height=&mp.height baseline=&mp.baseline centerpos=&mp.centerpos]
[disp left=0 top=0 opacity=255][wait frame=2]
[disp left=1 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=3 top=0 opacity=255][wait frame=2]
*shasei
[image storage=&(mp.storage+"c")]
[dispsize width=&mp.width height=&mp.height baseline=&mp.baseline centerpos=&mp.centerpos]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
*shasei2
[image storage=&(mp.storage+"c")]
[dispsize width=&mp.width height=&mp.height baseline=&mp.baseline centerpos=&mp.centerpos]
[playse storage="se142" buf=0]
[eval exp="dho.setObject(%['storage'=>mp.shaseiStorage,'x'=>sprite.rootX-xDirection(sprite.inverse)*mp.shaseiX,'y'=>sprite.rootY,'altitude'=>mp.shaseiY-mp.baseline,'absolute'=>20000,'inverse'=>sprite.inverse,'shadow'=>false,'nogravity'=>true])" cond="!f.nowAnten"]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=5 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[eval exp="dho.setObject(%['storage'=>mp.shaseiStorage,'x'=>sprite.rootX-xDirection(sprite.inverse)*mp.shaseiX,'y'=>sprite.rootY,'altitude'=>mp.shaseiY-mp.baseline,'absolute'=>20000,'inverse'=>sprite.inverse,'shadow'=>false,'nogravity'=>true])" cond="!f.nowAnten"]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=5 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[eval exp="dho.setObject(%['storage'=>mp.shaseiStorage,'x'=>sprite.rootX-xDirection(sprite.inverse)*mp.shaseiX,'y'=>sprite.rootY,'altitude'=>mp.shaseiY-mp.baseline,'absolute'=>20000,'inverse'=>sprite.inverse,'shadow'=>false,'nogravity'=>true])" cond="!f.nowAnten"]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=5 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=5 top=0 opacity=255][wait frame=2]
[eval exp="dho.setObject(%['storage'=>mp.shaseiStorage,'x'=>sprite.rootX-xDirection(sprite.inverse)*mp.shaseiX,'y'=>sprite.rootY,'altitude'=>mp.shaseiY-mp.baseline,'absolute'=>20000,'inverse'=>sprite.inverse,'shadow'=>false,'nogravity'=>true])" cond="!f.nowAnten"]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=5 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=5 top=0 opacity=255][wait frame=2]
[eval exp="dho.setObject(%['storage'=>mp.shaseiStorage,'x'=>sprite.rootX-xDirection(sprite.inverse)*mp.shaseiX,'y'=>sprite.rootY,'altitude'=>mp.shaseiY-mp.baseline,'absolute'=>20000,'inverse'=>sprite.inverse,'shadow'=>false,'nogravity'=>true])" cond="!f.nowAnten"]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=5 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=5 top=0 opacity=255][wait frame=2]
[eval exp="dho.setObject(%['storage'=>mp.shaseiStorage,'x'=>sprite.rootX-xDirection(sprite.inverse)*mp.shaseiX,'y'=>sprite.rootY,'altitude'=>mp.shaseiY-mp.baseline,'absolute'=>20000,'inverse'=>sprite.inverse,'shadow'=>false,'nogravity'=>true])" cond="!f.nowAnten"]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=5 top=0 opacity=255][wait frame=2]
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=5 top=0 opacity=255][wait frame=2]
*loop3
[disp left=2 top=0 opacity=255][wait frame=2]
[disp left=4 top=0 opacity=255][wait frame=2]
[jump target=*loop3]