116 lines
5.6 KiB
Common Lisp
116 lines
5.6 KiB
Common Lisp
*start
|
||
|
||
[iscript]
|
||
|
||
mp.storage = "p1_h1608";
|
||
|
||
mp.width = 134;
|
||
mp.height = 112;
|
||
mp.baseline = 6;
|
||
mp.centerpos = mp.width / 2;
|
||
|
||
[endscript]
|
||
|
||
[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]
|
||
|
||
*loop1
|
||
|
||
[disp left=0 top=0 opacity=255][wait frame=&intrandom(4,6)]
|
||
[disp left=1 top=0 opacity=255][wait frame=&intrandom(4,6)]
|
||
[disp left=2 top=0 opacity=255][wait frame=&intrandom(4,6)]
|
||
[disp left=3 top=0 opacity=255][wait frame=&intrandom(4,6)]
|
||
[disp left=4 top=0 opacity=255][wait frame=&intrandom(4,6)]
|
||
[disp left=5 top=0 opacity=255][wait frame=&intrandom(4,6)]
|
||
|
||
[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=&('se1050'+intrandom(1,6)) 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=&('se1050'+intrandom(1,6)) buf=7]
|
||
|
||
[disp left=0 top=0 opacity=255][wait frame=3]
|
||
[disp left=1 top=0 opacity=255][wait frame=3]
|
||
|
||
|
||
;
|
||
*loop3
|
||
[playse storage=&('se1050'+intrandom(1,6)) buf=7]
|
||
|
||
[disp left=2 top=0 opacity=255][wait frame=2]
|
||
[disp left=3 top=0 opacity=255][wait frame=2]
|
||
[disp left=4 top=0 opacity=255][wait frame=2]
|
||
[disp left=5 top=0 opacity=255][wait frame=2]
|
||
[disp left=6 top=0 opacity=255][wait frame=2]
|
||
[disp left=7 top=0 opacity=255][wait frame=2]
|
||
|
||
|
||
[jump target=*loop3 cond="mp.step==3"]
|
||
|
||
[playse storage=se111 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]
|
||
|
||
|
||
*loop4
|
||
[disp left=2 top=0 opacity=255][wait frame=2]
|
||
[disp left=3 top=0 opacity=255][wait frame=2]
|
||
|
||
[jump target=*loop4]
|
||
|
||
|
||
|