//重箱 Val { ANG(default=90,min=80,max=180,step=0,disp=0) DIR(default=180,min=-360000,max=360000,step=0,disp=0) FIRE_ORDER(default=0,min=0,max=100,step=0,disp=1) CANO101(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO102(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO103(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO104(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO105(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO106(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO107(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO108(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO109(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO110(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO101A(default=-0,min=0,max=45,step=0,disp=0) CANO102A(default=-0,min=0,max=45,step=0,disp=0) CANO103A(default=-0,min=0,max=45,step=0,disp=0) CANO104A(default=-0,min=0,max=45,step=0,disp=0) CANO105A(default=-0,min=0,max=45,step=0,disp=0) CANO106A(default=-0,min=0,max=45,step=0,disp=0) CANO107A(default=-0,min=0,max=45,step=0,disp=0) CANO108A(default=-0,min=0,max=45,step=0,disp=0) CANO109A(default=-0,min=0,max=45,step=0,disp=0) CANO110A(default=-0,min=0,max=45,step=0,disp=0) CANO201(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO202(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO203(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO204(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO205(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO206(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO207(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO208(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO209(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO210(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO201A(default=-0,min=0,max=45,step=0,disp=0) CANO202A(default=-0,min=0,max=45,step=0,disp=0) CANO203A(default=-0,min=0,max=45,step=0,disp=0) CANO204A(default=-0,min=0,max=45,step=0,disp=0) CANO205A(default=-0,min=0,max=45,step=0,disp=0) CANO206A(default=-0,min=0,max=45,step=0,disp=0) CANO207A(default=-0,min=0,max=45,step=0,disp=0) CANO208A(default=-0,min=0,max=45,step=0,disp=0) CANO209A(default=-0,min=0,max=45,step=0,disp=0) CANO210A(default=-0,min=0,max=45,step=0,disp=0) CANO301(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO302(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO303(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO304(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO305(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO306(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO307(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO308(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO309(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO310(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO301A(default=-0,min=0,max=45,step=0,disp=0) CANO302A(default=-0,min=0,max=45,step=0,disp=0) CANO303A(default=-0,min=0,max=45,step=0,disp=0) CANO304A(default=-0,min=0,max=45,step=0,disp=0) CANO305A(default=-0,min=0,max=45,step=0,disp=0) CANO306A(default=-0,min=0,max=45,step=0,disp=0) CANO307A(default=-0,min=0,max=45,step=0,disp=0) CANO308A(default=-0,min=0,max=45,step=0,disp=0) CANO309A(default=-0,min=0,max=45,step=0,disp=0) CANO310A(default=-0,min=0,max=45,step=0,disp=0) CANO401(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO402(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO403(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO404(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO405(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO406(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO407(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO408(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO409(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO410(default=-0,min=-1000000,max=1000000,step=1000000,disp=0) CANO401A(default=-0,min=0,max=45,step=0,disp=0) CANO402A(default=-0,min=0,max=45,step=0,disp=0) CANO403A(default=-0,min=0,max=45,step=0,disp=0) CANO404A(default=-0,min=0,max=45,step=0,disp=0) CANO405A(default=-0,min=0,max=45,step=0,disp=0) CANO406A(default=-0,min=0,max=45,step=0,disp=0) CANO407A(default=-0,min=0,max=45,step=0,disp=0) CANO408A(default=-0,min=0,max=45,step=0,disp=0) CANO409A(default=-0,min=0,max=45,step=0,disp=0) CANO410A(default=-0,min=0,max=45,step=0,disp=0) } Key { } Body { //ボディ制作開始 Core(){ //コア----------------WEIGHT CHIP Frame COWL trim rudder JET ARM RLW WHEEL N:WHEEL(angle=178,Option=2,POWER=1000000){} N:WEIGHT(angle=0,Option=8){ W:WEIGHT(angle=-90,Option=8){ W:WEIGHT(angle=-90,Option=8){} N:WEIGHT(angle=30,Option=8){} } E:WEIGHT(angle=-90,Option=8){ N:WEIGHT(angle=30,Option=8){} } S:WEIGHT(angle=-140,Option=8){} //ガイドライン S:COWL(angle=-135,Option=0,effect=#FFFF){ S:COWL(NAME=GL,angle=-45,Option=0,effect=#FFFF){} } S:WEIGHT(angle=-ANG,Option=8){ S:WEIGHT(angle=-170,Option=8){} S:WEIGHT(angle=170,Option=8){} N:trim(angle=-DIR,Option=8){ N:WEIGHT(angle=-0,Option=8){ //アーマー S:trim(angle=-DIR,Option=0){ E:WEIGHT(angle=-90,Option=8){ E:WEIGHT(angle=-90,Option=8){} } E:WEIGHT(angle=90,Option=8){} W:WEIGHT(angle=-90,Option=8){} W:WEIGHT(angle=90,Option=8){ W:WEIGHT(angle=90,Option=8){} } } //アーマー S:trim(angle=-DIR,Option=0){ S:WEIGHT(angle=ANG,Option=8){ S:WEIGHT(angle=-175,Option=8){ S:WEIGHT(angle=-3,Option=8){ S:WEIGHT(angle=-3,Option=8){ S:WEIGHT(angle=-89,Option=8){} W:WEIGHT(angle=-89,Option=8){} E:WEIGHT(angle=-89,Option=8){} }}} }} //アーマー S:trim(angle=-DIR,Option=0){ E:WEIGHT(angle=175,Option=8){} E:WEIGHT(angle=-175,Option=8){} E:WEIGHT(angle=-0,Option=8){ E:WEIGHT(angle=-105,Option=8){ S:WEIGHT(angle=0,Option=8){} } E:WEIGHT(angle=105,Option=8){ S:WEIGHT(angle=0,Option=8){} } } W:WEIGHT(angle=-0,Option=8){ W:WEIGHT(angle=-105,Option=8){ S:WEIGHT(angle=0,Option=8){} } W:WEIGHT(angle=105,Option=8){ S:WEIGHT(angle=0,Option=8){} } } } //砲1 S:trim(angle=-DIR,Option=0){ S:WEIGHT(angle=ANG,Option=2){ N:Frame(angle=-CANO101A,option=0){N:ARM(NAME=CANO101N,angle=CANO101A,Option=400000,POWER=CANO101){}} N:Frame(angle=-CANO102A,option=0){N:ARM(NAME=CANO102N,angle=CANO102A,Option=400000,POWER=CANO102){}} N:Frame(angle=-CANO103A,option=0){N:ARM(NAME=CANO103N,angle=CANO103A,Option=400000,POWER=CANO103){}} N:Frame(angle=-CANO104A,option=0){N:ARM(NAME=CANO104N,angle=CANO104A,Option=400000,POWER=CANO104){}} N:Frame(angle=-CANO105A,option=0){N:ARM(NAME=CANO105N,angle=CANO105A,Option=400000,POWER=CANO105){}} N:Frame(angle=-CANO106A,option=0){N:ARM(NAME=CANO106N,angle=CANO106A,Option=400000,POWER=CANO106){}} N:Frame(angle=-CANO107A,option=0){N:ARM(NAME=CANO107N,angle=CANO107A,Option=400000,POWER=CANO107){}} N:Frame(angle=-CANO108A,option=0){N:ARM(NAME=CANO108N,angle=CANO108A,Option=400000,POWER=CANO108){}} N:Frame(angle=-CANO109A,option=0){N:ARM(NAME=CANO109N,angle=CANO109A,Option=400000,POWER=CANO109){}} N:Frame(angle=-CANO110A,option=0){N:ARM(NAME=CANO110N,angle=CANO110A,Option=400000,POWER=CANO110){}} }} //砲2 S:trim(angle=-DIR,Option=0){ S:WEIGHT(angle=ANG,Option=2){ N:Frame(angle=-CANO201A,option=0){N:ARM(NAME=CANO201N,angle=CANO201A,Option=400000,POWER=CANO201){}} N:Frame(angle=-CANO202A,option=0){N:ARM(NAME=CANO202N,angle=CANO202A,Option=400000,POWER=CANO202){}} N:Frame(angle=-CANO203A,option=0){N:ARM(NAME=CANO203N,angle=CANO203A,Option=400000,POWER=CANO203){}} N:Frame(angle=-CANO204A,option=0){N:ARM(NAME=CANO204N,angle=CANO204A,Option=400000,POWER=CANO204){}} N:Frame(angle=-CANO205A,option=0){N:ARM(NAME=CANO205N,angle=CANO205A,Option=400000,POWER=CANO205){}} N:Frame(angle=-CANO206A,option=0){N:ARM(NAME=CANO206N,angle=CANO206A,Option=400000,POWER=CANO206){}} N:Frame(angle=-CANO207A,option=0){N:ARM(NAME=CANO207N,angle=CANO207A,Option=400000,POWER=CANO207){}} N:Frame(angle=-CANO208A,option=0){N:ARM(NAME=CANO208N,angle=CANO208A,Option=400000,POWER=CANO208){}} N:Frame(angle=-CANO209A,option=0){N:ARM(NAME=CANO209N,angle=CANO209A,Option=400000,POWER=CANO209){}} N:Frame(angle=-CANO210A,option=0){N:ARM(NAME=CANO210N,angle=CANO210A,Option=400000,POWER=CANO210){}} }} //砲3 S:trim(angle=-DIR,Option=0){ S:WEIGHT(angle=ANG,Option=2){ N:Frame(angle=-CANO301A,option=0){N:ARM(NAME=CANO301N,angle=CANO301A,Option=400000,POWER=CANO301){}} N:Frame(angle=-CANO302A,option=0){N:ARM(NAME=CANO302N,angle=CANO302A,Option=400000,POWER=CANO302){}} N:Frame(angle=-CANO303A,option=0){N:ARM(NAME=CANO303N,angle=CANO303A,Option=400000,POWER=CANO303){}} N:Frame(angle=-CANO304A,option=0){N:ARM(NAME=CANO304N,angle=CANO304A,Option=400000,POWER=CANO304){}} N:Frame(angle=-CANO305A,option=0){N:ARM(NAME=CANO305N,angle=CANO305A,Option=400000,POWER=CANO305){}} N:Frame(angle=-CANO306A,option=0){N:ARM(NAME=CANO306N,angle=CANO306A,Option=400000,POWER=CANO306){}} N:Frame(angle=-CANO307A,option=0){N:ARM(NAME=CANO307N,angle=CANO307A,Option=400000,POWER=CANO307){}} N:Frame(angle=-CANO308A,option=0){N:ARM(NAME=CANO308N,angle=CANO308A,Option=400000,POWER=CANO308){}} N:Frame(angle=-CANO309A,option=0){N:ARM(NAME=CANO309N,angle=CANO309A,Option=400000,POWER=CANO309){}} N:Frame(angle=-CANO310A,option=0){N:ARM(NAME=CANO310N,angle=CANO310A,Option=400000,POWER=CANO310){}} }} //砲4 S:trim(angle=-DIR,Option=0){ S:WEIGHT(angle=ANG,Option=2){ N:Frame(angle=-CANO401A,option=0){N:ARM(NAME=CANO401N,angle=CANO401A,Option=400000,POWER=CANO401){}} N:Frame(angle=-CANO402A,option=0){N:ARM(NAME=CANO402N,angle=CANO402A,Option=400000,POWER=CANO402){}} N:Frame(angle=-CANO403A,option=0){N:ARM(NAME=CANO403N,angle=CANO403A,Option=400000,POWER=CANO403){}} N:Frame(angle=-CANO404A,option=0){N:ARM(NAME=CANO404N,angle=CANO404A,Option=400000,POWER=CANO404){}} N:Frame(angle=-CANO405A,option=0){N:ARM(NAME=CANO405N,angle=CANO405A,Option=400000,POWER=CANO405){}} N:Frame(angle=-CANO406A,option=0){N:ARM(NAME=CANO406N,angle=CANO406A,Option=400000,POWER=CANO406){}} N:Frame(angle=-CANO407A,option=0){N:ARM(NAME=CANO407N,angle=CANO407A,Option=400000,POWER=CANO407){}} N:Frame(angle=-CANO408A,option=0){N:ARM(NAME=CANO408N,angle=CANO408A,Option=400000,POWER=CANO408){}} N:Frame(angle=-CANO409A,option=0){N:ARM(NAME=CANO409N,angle=CANO409A,Option=400000,POWER=CANO409){}} N:Frame(angle=-CANO410A,option=0){N:ARM(NAME=CANO410N,angle=CANO410A,Option=400000,POWER=CANO410){}} }} //台座----------------WEIGHT CHIP Frame COWL trim rudder JET ARM RLW WHEEL N:WEIGHT(angle=-180,Option=8){ //足 W:WEIGHT(angle=-135,Option=8){ S:WEIGHT(angle=-80,Option=8){ S:WEIGHT(angle=-10,Option=8){ S:WEIGHT(angle=-90,Option=8){ W:WEIGHT(angle=-45,Option=8){} E:WEIGHT(angle=-45,Option=8){} } S:WEIGHT(angle=-0,Option=8){ S:WEIGHT(angle=-0,Option=8){ S:WEIGHT(angle=-0,Option=8){ }}}}}} W:WEIGHT(angle=135,Option=8){ S:WEIGHT(angle=80,Option=8){ S:WEIGHT(angle=10,Option=8){ S:WEIGHT(angle=90,Option=8){ W:WEIGHT(angle=45,Option=8){} E:WEIGHT(angle=45,Option=8){} } S:WEIGHT(angle=-0,Option=8){ S:WEIGHT(angle=-0,Option=8){ S:WEIGHT(angle=-0,Option=8){ }}}}}} E:WEIGHT(angle=-135,Option=8){ S:WEIGHT(angle=-80,Option=8){ S:WEIGHT(angle=-10,Option=8){ S:WEIGHT(angle=-90,Option=8){ W:WEIGHT(angle=-45,Option=8){} E:WEIGHT(angle=-45,Option=8){} } S:WEIGHT(angle=-0,Option=8){ S:WEIGHT(angle=-0,Option=8){ S:WEIGHT(angle=-0,Option=8){ }}}}}} E:WEIGHT(angle=135,Option=8){ S:WEIGHT(angle=80,Option=8){ S:WEIGHT(angle=10,Option=8){ S:WEIGHT(angle=90,Option=8){ W:WEIGHT(angle=45,Option=8){} E:WEIGHT(angle=45,Option=8){} } S:WEIGHT(angle=-0,Option=8){ S:WEIGHT(angle=-0,Option=8){ S:WEIGHT(angle=-0,Option=8){ }}}}}} } }}}} } //コアここまで } //ボディ制作終了 LUA { -- [OPTION] ---------------- --マウスの上下反転(通常=1 反転=-1) UDR=1 --ガイドラインの色 --カラー1 --明色 COL_R1L=255 --赤 COL_G1L=000 --緑 COL_B1L=160 --青 --暗色 COL_R1D=160 --赤 COL_G1D=000 --緑 COL_B1D=128 --青 --カラー2 --明 COL_R2L=0 --赤 COL_G2L=255 --緑 COL_B2L=196 --青 --暗 COL_R2D=0 --赤 COL_G2D=170 --緑 COL_B2D=128 --青 --モーション変数設定---------------- --{現在値,指定値,モードスイッチ,移動量,固定スイッチ,指定フレーム数,指定移動量} ang={ANG,ANG,0,0,0,0,5} dir={DIR,DIR,0,0,0,0,5} --メイン---------------- function main() POW_ALL=_E(CANO101N)+_E(CANO102N)+_E(CANO103N)+_E(CANO104N)+_E(CANO105N)+_E(CANO106N)+_E(CANO107N)+_E(CANO108N)+_E(CANO109N)+_E(CANO110N) +_E(CANO201N)+_E(CANO202N)+_E(CANO203N)+_E(CANO204N)+_E(CANO205N)+_E(CANO206N)+_E(CANO207N)+_E(CANO208N)+_E(CANO209N)+_E(CANO210N) +_E(CANO301N)+_E(CANO302N)+_E(CANO303N)+_E(CANO304N)+_E(CANO305N)+_E(CANO306N)+_E(CANO307N)+_E(CANO308N)+_E(CANO309N)+_E(CANO310N) +_E(CANO401N)+_E(CANO402N)+_E(CANO403N)+_E(CANO404N)+_E(CANO405N)+_E(CANO406N)+_E(CANO407N)+_E(CANO408N)+_E(CANO409N)+_E(CANO410N) POW=POW_ALL/16000000*100 out(0,"重箱") out(1,POW,"%") _ZOOM(100) dummy=_SPLIT(1) --マウス操作 --アナログ出力 M_dir_MAX=135 M_ang_MAX=90 M_ang=(_MY()-(_HEIGHT()/2))/(_HEIGHT()/2)*M_ang_MAX M_dir=-(_MX()-(_WIDTH()/2))/(_WIDTH()/2)*M_dir_MAX --首振り ang[2]=-M_ang+90 ang[3]=2 dir[2]=-M_dir+180 dir[3]=2 MOTION_CONTROL1() --モーション制御 --砲 --初期化 CANO101A=0 CANO102A=0 CANO103A=0 CANO104A=0 CANO105A=0 CANO106A=0 CANO107A=0 CANO108A=0 CANO109A=0 CANO110A=0 CANO201A=0 CANO202A=0 CANO203A=0 CANO204A=0 CANO205A=0 CANO206A=0 CANO207A=0 CANO208A=0 CANO209A=0 CANO210A=0 CANO301A=0 CANO302A=0 CANO303A=0 CANO304A=0 CANO305A=0 CANO306A=0 CANO307A=0 CANO308A=0 CANO309A=0 CANO310A=0 CANO401A=0 CANO402A=0 CANO403A=0 CANO404A=0 CANO405A=0 CANO406A=0 CANO407A=0 CANO408A=0 CANO409A=0 CANO410A=0 --発射 c_ang=55 if _ML()==1 and FIRE_ORDER==00 then FIRE_ORDER=FIRE_ORDER+1 CANO101A=c_ang elseif FIRE_ORDER==01 then FIRE_ORDER=FIRE_ORDER+1 CANO101A=c_ang CANO101=1000000 elseif _ML()==1 and FIRE_ORDER==02 then FIRE_ORDER=FIRE_ORDER+1 CANO102A=c_ang elseif FIRE_ORDER==03 then FIRE_ORDER=FIRE_ORDER+1 CANO102A=c_ang CANO102=1000000 elseif _ML()==1 and FIRE_ORDER==04 then FIRE_ORDER=FIRE_ORDER+1 CANO103A=c_ang elseif FIRE_ORDER==05 then FIRE_ORDER=FIRE_ORDER+1 CANO103A=c_ang CANO103=1000000 elseif _ML()==1 and FIRE_ORDER==06 then FIRE_ORDER=FIRE_ORDER+1 CANO104A=c_ang elseif FIRE_ORDER==07 then FIRE_ORDER=FIRE_ORDER+1 CANO104A=c_ang CANO104=1000000 elseif _ML()==1 and FIRE_ORDER==08 then FIRE_ORDER=FIRE_ORDER+1 CANO105A=c_ang elseif FIRE_ORDER==09 then FIRE_ORDER=FIRE_ORDER+1 CANO105A=c_ang CANO105=1000000 elseif _ML()==1 and FIRE_ORDER==10 then FIRE_ORDER=FIRE_ORDER+1 CANO106A=c_ang elseif FIRE_ORDER==11 then FIRE_ORDER=FIRE_ORDER+1 CANO106A=c_ang CANO106=1000000 elseif _ML()==1 and FIRE_ORDER==12 then FIRE_ORDER=FIRE_ORDER+1 CANO107A=c_ang elseif FIRE_ORDER==13 then FIRE_ORDER=FIRE_ORDER+1 CANO107A=c_ang CANO107=1000000 elseif _ML()==1 and FIRE_ORDER==14 then FIRE_ORDER=FIRE_ORDER+1 CANO108A=c_ang elseif FIRE_ORDER==15 then FIRE_ORDER=FIRE_ORDER+1 CANO108A=c_ang CANO108=1000000 elseif _ML()==1 and FIRE_ORDER==16 then FIRE_ORDER=FIRE_ORDER+1 CANO109A=c_ang elseif FIRE_ORDER==17 then FIRE_ORDER=FIRE_ORDER+1 CANO109A=c_ang CANO109=1000000 elseif _ML()==1 and FIRE_ORDER==18 then FIRE_ORDER=FIRE_ORDER+1 CANO110A=c_ang elseif FIRE_ORDER==19 then FIRE_ORDER=FIRE_ORDER+1 CANO110A=c_ang CANO110=1000000 elseif _ML()==1 and FIRE_ORDER==20 then FIRE_ORDER=FIRE_ORDER+1 CANO201A=c_ang elseif FIRE_ORDER==21 then FIRE_ORDER=FIRE_ORDER+1 CANO201A=c_ang CANO201=1000000 elseif _ML()==1 and FIRE_ORDER==22 then FIRE_ORDER=FIRE_ORDER+1 CANO202A=c_ang elseif FIRE_ORDER==23 then FIRE_ORDER=FIRE_ORDER+1 CANO202A=c_ang CANO202=1000000 elseif _ML()==1 and FIRE_ORDER==24 then FIRE_ORDER=FIRE_ORDER+1 CANO203A=c_ang elseif FIRE_ORDER==25 then FIRE_ORDER=FIRE_ORDER+1 CANO203A=c_ang CANO203=1000000 elseif _ML()==1 and FIRE_ORDER==26 then FIRE_ORDER=FIRE_ORDER+1 CANO204A=c_ang elseif FIRE_ORDER==27 then FIRE_ORDER=FIRE_ORDER+1 CANO204A=c_ang CANO204=1000000 elseif _ML()==1 and FIRE_ORDER==28 then FIRE_ORDER=FIRE_ORDER+1 CANO205A=c_ang elseif FIRE_ORDER==29 then FIRE_ORDER=FIRE_ORDER+1 CANO205A=c_ang CANO205=1000000 elseif _ML()==1 and FIRE_ORDER==30 then FIRE_ORDER=FIRE_ORDER+1 CANO206A=c_ang elseif FIRE_ORDER==31 then FIRE_ORDER=FIRE_ORDER+1 CANO206A=c_ang CANO206=1000000 elseif _ML()==1 and FIRE_ORDER==32 then FIRE_ORDER=FIRE_ORDER+1 CANO207A=c_ang elseif FIRE_ORDER==33 then FIRE_ORDER=FIRE_ORDER+1 CANO207A=c_ang CANO207=1000000 elseif _ML()==1 and FIRE_ORDER==34 then FIRE_ORDER=FIRE_ORDER+1 CANO208A=c_ang elseif FIRE_ORDER==35 then FIRE_ORDER=FIRE_ORDER+1 CANO208A=c_ang CANO208=1000000 elseif _ML()==1 and FIRE_ORDER==36 then FIRE_ORDER=FIRE_ORDER+1 CANO209A=c_ang elseif FIRE_ORDER==37 then FIRE_ORDER=FIRE_ORDER+1 CANO209A=c_ang CANO209=1000000 elseif _ML()==1 and FIRE_ORDER==38 then FIRE_ORDER=FIRE_ORDER+1 CANO210A=c_ang elseif FIRE_ORDER==39 then FIRE_ORDER=FIRE_ORDER+1 CANO210A=c_ang CANO210=1000000 elseif _ML()==1 and FIRE_ORDER==40 then FIRE_ORDER=FIRE_ORDER+1 CANO301A=c_ang elseif FIRE_ORDER==41 then FIRE_ORDER=FIRE_ORDER+1 CANO301A=c_ang CANO301=1000000 elseif _ML()==1 and FIRE_ORDER==42 then FIRE_ORDER=FIRE_ORDER+1 CANO302A=c_ang elseif FIRE_ORDER==43 then FIRE_ORDER=FIRE_ORDER+1 CANO302A=c_ang CANO302=1000000 elseif _ML()==1 and FIRE_ORDER==44 then FIRE_ORDER=FIRE_ORDER+1 CANO303A=c_ang elseif FIRE_ORDER==45 then FIRE_ORDER=FIRE_ORDER+1 CANO303A=c_ang CANO303=1000000 elseif _ML()==1 and FIRE_ORDER==46 then FIRE_ORDER=FIRE_ORDER+1 CANO304A=c_ang elseif FIRE_ORDER==47 then FIRE_ORDER=FIRE_ORDER+1 CANO304A=c_ang CANO304=1000000 elseif _ML()==1 and FIRE_ORDER==48 then FIRE_ORDER=FIRE_ORDER+1 CANO305A=c_ang elseif FIRE_ORDER==49 then FIRE_ORDER=FIRE_ORDER+1 CANO305A=c_ang CANO305=1000000 elseif _ML()==1 and FIRE_ORDER==50 then FIRE_ORDER=FIRE_ORDER+1 CANO306A=c_ang elseif FIRE_ORDER==51 then FIRE_ORDER=FIRE_ORDER+1 CANO306A=c_ang CANO306=1000000 elseif _ML()==1 and FIRE_ORDER==52 then FIRE_ORDER=FIRE_ORDER+1 CANO307A=c_ang elseif FIRE_ORDER==53 then FIRE_ORDER=FIRE_ORDER+1 CANO307A=c_ang CANO307=1000000 elseif _ML()==1 and FIRE_ORDER==54 then FIRE_ORDER=FIRE_ORDER+1 CANO308A=c_ang elseif FIRE_ORDER==55 then FIRE_ORDER=FIRE_ORDER+1 CANO308A=c_ang CANO308=1000000 elseif _ML()==1 and FIRE_ORDER==56 then FIRE_ORDER=FIRE_ORDER+1 CANO309A=c_ang elseif FIRE_ORDER==57 then FIRE_ORDER=FIRE_ORDER+1 CANO309A=c_ang CANO309=1000000 elseif _ML()==1 and FIRE_ORDER==58 then FIRE_ORDER=FIRE_ORDER+1 CANO310A=c_ang elseif FIRE_ORDER==59 then FIRE_ORDER=FIRE_ORDER+1 CANO310A=c_ang CANO310=1000000 elseif _ML()==1 and FIRE_ORDER==60 then FIRE_ORDER=FIRE_ORDER+1 CANO401A=c_ang elseif FIRE_ORDER==61 then FIRE_ORDER=FIRE_ORDER+1 CANO401A=c_ang CANO401=1000000 elseif _ML()==1 and FIRE_ORDER==62 then FIRE_ORDER=FIRE_ORDER+1 CANO402A=c_ang elseif FIRE_ORDER==63 then FIRE_ORDER=FIRE_ORDER+1 CANO402A=c_ang CANO402=1000000 elseif _ML()==1 and FIRE_ORDER==64 then FIRE_ORDER=FIRE_ORDER+1 CANO403A=c_ang elseif FIRE_ORDER==65 then FIRE_ORDER=FIRE_ORDER+1 CANO403A=c_ang CANO403=1000000 elseif _ML()==1 and FIRE_ORDER==66 then FIRE_ORDER=FIRE_ORDER+1 CANO404A=c_ang elseif FIRE_ORDER==67 then FIRE_ORDER=FIRE_ORDER+1 CANO404A=c_ang CANO404=1000000 elseif _ML()==1 and FIRE_ORDER==68 then FIRE_ORDER=FIRE_ORDER+1 CANO405A=c_ang elseif FIRE_ORDER==69 then FIRE_ORDER=FIRE_ORDER+1 CANO405A=c_ang CANO405=1000000 elseif _ML()==1 and FIRE_ORDER==70 then FIRE_ORDER=FIRE_ORDER+1 CANO406A=c_ang elseif FIRE_ORDER==71 then FIRE_ORDER=FIRE_ORDER+1 CANO406A=c_ang CANO406=1000000 elseif _ML()==1 and FIRE_ORDER==72 then FIRE_ORDER=FIRE_ORDER+1 CANO407A=c_ang elseif FIRE_ORDER==73 then FIRE_ORDER=FIRE_ORDER+1 CANO407A=c_ang CANO407=1000000 elseif _ML()==1 and FIRE_ORDER==74 then FIRE_ORDER=FIRE_ORDER+1 CANO408A=c_ang elseif FIRE_ORDER==75 then FIRE_ORDER=FIRE_ORDER+1 CANO408A=c_ang CANO408=1000000 elseif _ML()==1 and FIRE_ORDER==76 then FIRE_ORDER=FIRE_ORDER+1 CANO409A=c_ang elseif FIRE_ORDER==77 then FIRE_ORDER=FIRE_ORDER+1 CANO409A=c_ang CANO409=1000000 elseif _ML()==1 and FIRE_ORDER==78 then FIRE_ORDER=FIRE_ORDER+1 CANO410A=c_ang elseif FIRE_ORDER==79 then FIRE_ORDER=FIRE_ORDER+1 CANO410A=c_ang CANO410=1000000 elseif FIRE_ORDER==80 then FIRE_ORDER=0 end --[[ CANO101(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO102(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO103(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO104(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO105(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO106(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO107(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO108(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO109(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO110(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO201(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO202(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO203(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO204(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO205(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO206(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO207(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO208(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO209(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO210(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO301(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO302(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO303(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO304(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO305(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO306(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO307(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO308(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO309(default=-0,min=-1000000,max=1000000,step=0,disp=0) CANO310(default=-0,min=-1000000,max=1000000,step=0,disp=0) ]] --ガイドライン if _KEYDOWN(6)==1 then GLW=GLW+1 end --表示切り替え if GLW>2 then GLW=0 end if GLW<2 then G_line() end end --モーション制御---------------- function MOTION_CONTROL1() --角度 if ang[3]>0 and ang[3]<=2 then broker=ang MOTION_CONTROL_FINAL() ang=broker ANG=ang[1] end --方位 if dir[3]>0 and dir[3]<=2 then broker=dir MOTION_CONTROL_FINAL() dir=broker DIR=dir[1] end end function MOTION_CONTROL_FINAL() --総移動角 if broker[3]==2 and broker[1]~=0 and broker[2]==0 then broker[2]=-broker[1] --現在値から指定値(0) elseif broker[3]==2 then broker[2]=broker[2]-broker[1] end --現在値から指定値 --1フレームごとの移動角 if broker[6]>0 and broker[3]==2 and broker[2]>0 then broker[4]=broker[2]/broker[6] --フレーム数指定時+ elseif broker[6]>0 and broker[3]==2 and broker[2]<0 then broker[4]=-(broker[2]/broker[6]) --フレーム数指定時- elseif broker[6]==0 and broker[3]==2 then broker[4]=broker[7] end --指定移動角入力 --符号切り替え判定 if broker[3]==2 and broker[2]<0 then broker[4]=broker[4]*-1 end broker[3]=1 --最終移動 if (broker[2]<=broker[4] and broker[2]>=0) -- + or (broker[2]>=broker[4] and broker[2]<=0) then -- - pomp=broker[2] broker[2]=0 broker[3]=0 broker[4]=0 broker[5]=0 broker[6]=0 --移動 else pomp=broker[4] broker[2]=broker[2]-broker[4] end broker[1]=broker[1]+pomp end --ガイドライン---------------- Line_col_D=0 Line_col_L=0 G_col_Switch=0 G_col_MODE=1 GLW=0 function G_line() --ラインカラー if _KEYDOWN(12)==1 then if G_col_MODE==1 then G_col_MODE=0 --1>0 elseif G_col_MODE==0 then G_col_MODE=1 end --0>1 end LINE_COLOR() --3D --チェーンガン Length=500 LINE_Angle=(_TODEG(_AX(CGGL))) Dir_LINE=-(_TODEG(_AY(CGGL))+90) X = (Length * (math.cos(math.pi/180 * Dir_LINE))) Y = (Length * (math.tan(math.pi/180 * LINE_Angle))) Z = (Length * (math.sin(math.pi/180 * Dir_LINE))) dummy=_SETCOLOR(Line_col_L) dummy=_MOVE3D(_X(GL),_Y(GL),_Z(GL)) dummy=_LINE3D(X+_X(GL),(Y+_Y(GL)),Z+_Z(GL)) --コア if GLW==1 then --カラー逆転 if G_col_MODE==1 then G_col_MODE=0 elseif G_col_MODE==0 then G_col_MODE=1 end LINE_COLOR() --ライン描画 Length=500 LINE_Angle=(_TODEG(_AX(0))) Dir_LINE=-(_TODEG(_AY(0))+90) X = (Length * (math.cos(math.pi/180 * Dir_LINE))) Y = (Length * (math.tan(math.pi/180 * LINE_Angle))) Z = (Length * (math.sin(math.pi/180 * Dir_LINE))) dummy=_SETCOLOR(Line_col_L) dummy=_MOVE3D(_X(0),_Y(0),_Z(0)) dummy=_LINE3D(X+_X(0),(Y+_Y(0)),Z+_Z(0)) --カラーを元に戻す if G_col_MODE==1 then G_col_MODE=0 elseif G_col_MODE==0 then G_col_MODE=1 end LINE_COLOR() end --2D --中心点 if _TICKS()<150 then dummy=_SETCOLOR(Line_col_D) else dummy=_SETCOLOR(Line_col_L) end dummy=_MOVE2D(0,-0.05) dummy=_LINE2D(0,0.05) dummy=_MOVE2D(-0.05,0) dummy=_LINE2D(0.05,0) --リロードゲージ --カラー逆転 if G_col_MODE==1 then G_col_MODE=0 elseif G_col_MODE==0 then G_col_MODE=1 end LINE_COLOR() --ライン描画 if _TICKS()<150 then --フレーム数チェック --ウェイトマーク LINE_TIMER=0.1*((150-_TICKS())/150) dummy=_SETCOLOR(Line_col_L) dummy=_MOVE2D(-LINE_TIMER,0.015) dummy=_LINE2D(LINE_TIMER,0.015) dummy=_MOVE2D(-LINE_TIMER,-0.015) dummy=_LINE2D(LINE_TIMER,-0.015) end --カラーを元に戻す if G_col_MODE==1 then G_col_MODE=0 elseif G_col_MODE==0 then G_col_MODE=1 end LINE_COLOR() end function LINE_COLOR() --ラインカラー if G_col_MODE==0 then --カラー1 Line_col_L=math.floor(COL_R1L)*65536+math.floor(COL_G1L)*256+math.floor(COL_B1L) Line_col_D=math.floor(COL_R1D)*65536+math.floor(COL_G1D)*256+math.floor(COL_B1D) else --カラー2 Line_col_L=math.floor(COL_R2L)*65536+math.floor(COL_G2L)*256+math.floor(COL_B2L) Line_col_D=math.floor(COL_R2D)*65536+math.floor(COL_G2D)*256+math.floor(COL_B2D) end end }