266 lines
17 KiB
Common Lisp
266 lines
17 KiB
Common Lisp
*start
|
||
|
||
[iscript]
|
||
|
||
mp.storage = "p1_h1609";
|
||
|
||
mp.width = 112;
|
||
mp.height = 160;
|
||
mp.baseline = 6;
|
||
mp.centerpos = mp.width / 2;
|
||
|
||
mp.shaseiX = 6;
|
||
mp.shaseiY = 23;
|
||
|
||
mp.shaseiStorage = "p1_h1609s";
|
||
|
||
[endscript]
|
||
[eval exp="mp.seCount=0"]
|
||
|
||
[image storage=&(mp.storage+"d")]
|
||
[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]
|
||
|
||
[wait frame=1]
|
||
|
||
; 挿入される
|
||
|
||
[image storage=&(mp.storage+"a")]
|
||
[dispsize width=&mp.width height=&mp.height baseline=&mp.baseline centerpos=&mp.centerpos]
|
||
|
||
|
||
[playse storage=se185 buf=0]
|
||
|
||
[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]
|
||
|
||
*loop1
|
||
|
||
[disp left=5 top=0 opacity=255][wait frame=2]
|
||
[disp left=6 top=0 opacity=255][wait frame=2]
|
||
|
||
[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]
|
||
|
||
[disp left=0 top=0 opacity=255][wait frame=3]
|
||
[disp left=1 top=0 opacity=255][wait frame=3]
|
||
|
||
|
||
*loop2start
|
||
|
||
; ピストン中
|
||
*loop2
|
||
[playse storage=&('se1910'+intrandom(1,8)) buf=7]
|
||
|
||
[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]
|
||
[disp left=6 top=0 opacity=255][wait frame=3]
|
||
[disp left=7 top=0 opacity=255][wait frame=3]
|
||
|
||
[jump target=*loop2 cond="mp.step==2"]
|
||
|
||
|
||
|
||
; フィニッシュ前ピストン
|
||
*loop2end
|
||
|
||
[image storage=&(mp.storage+"c")]
|
||
[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]
|
||
|
||
|
||
;
|
||
*loop3
|
||
[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=*loop3 cond="mp.step==3"]
|
||
|
||
[playse storage=se118 buf=1]
|
||
|
||
[disp left=4 top=0 opacity=255][wait frame=1]
|
||
|
||
|
||
|
||
; 射精
|
||
*finish
|
||
[image storage=&(mp.storage+"d")]
|
||
[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]
|
||
|
||
|
||
[jump target=*wait cond="mp.step>9 && f.inHScene"]
|
||
|
||
*shasei
|
||
[image storage=&(mp.storage+"d")]
|
||
[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
|
||
|
||
[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]
|
||
[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]
|
||
|
||
|
||
|
||
*loop4
|
||
[disp left=2 top=0 opacity=255][wait frame=2]
|
||
[disp left=4 top=0 opacity=255][wait frame=2]
|
||
|
||
[jump target=*loop3 cond="mp.step==4"]
|
||
|
||
|
||
[disp left=6 top=0 opacity=255][wait frame=3]
|
||
[disp left=7 top=0 opacity=255][wait frame=3]
|
||
|
||
|
||
|
||
; ピストン再開
|
||
*loop4end
|
||
|
||
[image storage=&(mp.storage+"b")]
|
||
[dispsize width=&mp.width height=&mp.height baseline=&mp.baseline centerpos=&mp.centerpos]
|
||
|
||
[playse storage=se111 buf=0]
|
||
|
||
|
||
*loop5start
|
||
|
||
; ピストン中
|
||
*loop5
|
||
[playse storage=&('se1910'+intrandom(1,8)) buf=7]
|
||
|
||
[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]
|
||
[disp left=6 top=0 opacity=255][wait frame=3]
|
||
[disp left=7 top=0 opacity=255][wait frame=3]
|
||
|
||
[jump target=*loop5 cond="mp.step==5"]
|
||
|
||
|
||
|
||
*sefadeout
|
||
|
||
[playse storage=&('se1910'+intrandom(1,8)) buf=8 volume=70]
|
||
[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]
|
||
[disp left=6 top=0 opacity=255][wait frame=3]
|
||
[disp left=7 top=0 opacity=255][wait frame=3]
|
||
|
||
[playse storage=&('se1910'+intrandom(1,8)) buf=8 volume=45]
|
||
[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]
|
||
[disp left=6 top=0 opacity=255][wait frame=3]
|
||
[disp left=7 top=0 opacity=255][wait frame=3]
|
||
|
||
;[playse storage=&('se1910'+intrandom(1,8)) buf=8 volume=20]
|
||
|
||
|
||
*fadeoutloop
|
||
[wait frame=2]
|
||
[jump target=*fadeoutloop]
|
||
|
||
|
||
|
||
|
||
|