// [RCD] 
Val
{
	AIRLON(default=0, min=-10, max=10, step=2)
	ARMP1(default=0, max=10001, step=10000, disp=0)
	ARMP2(default=0, max=50001, step=10000, disp=0)
	BREAK(default=0, max=60, step=5)
	BUT(default=0, max=1, disp=0)
	BUTTON(default=0, max=4, disp=0)
	DRIVE(default=0, max=50000, step=50000, disp=0)
	ELEVATOR(default=0, min=-20, max=10, step=3)
	EM(default=0, max=1, disp=0)
	EN(default=0, min=-1, max=5, step=0.1, disp=0)
	ENGINE(default=0, min=-30000, max=100000, step=10000)
	JET(default=0, min=-30000, max=50000, step=3000)
	PAA(default=-90, min=-100, max=0, step=3, disp=0)
	PAK(default=0, max=300001, step=100000, disp=0)
	PAKA(default=90, min=90, max=180, step=3, disp=0)
	PAKB(default=0, min=-80, max=80, step=5, disp=0)
	PITA(default=180, min=90, max=190, step=3, disp=0)
	RUDDER(default=0, min=-20, max=20, step=1)
	RUDDERL(default=-90, min=-110, max=-70, step=1, disp=0)
	RUDDERR(default=90, min=70, max=110, step=2, disp=0)
	V(default=0, min=-100, disp=0)
	WHEELA(default=-90, min=-180, max=-90, step=3, disp=0)
	WHEELB(default=0, max=180, step=6, disp=0)
	WINGA(default=30, min=30, max=45, disp=0)
	WINGB(default=150, min=135, max=150, disp=0)
	Y(default=0, min=-10000, disp=0)
	YB(default=0, min=-1000, disp=0)
	YL(default=0, min=-1000, disp=0)
	YLMR(default=0, min=-10000)
	YR(default=0, min=-1000, disp=0)
	YT(default=0, min=-1000, disp=0)
	YTMB(default=0, min=-1000)
}
Key
{
	0:elevator(step=-1)
	1:elevator(step=1)
	2:airlon(step=-2)
	3:airlon(step=2)
	4:jet(step=-3000)
	5:armP1(step=100000), armP2(step=50000)
	6:break(step=5)
	8:rudderR(step=-1), rudderL(step=-1), rudder(step=1)
	9:rudderR(step=1), rudderL(step=1), rudder(step=-1)
}
Body
{
	Core(name=n) {
		S:RudderF(angle=PAKb, option=1) {
			S:Frame(angle=pita, option=1) {
				S:Chip(angle=-180) {
					E:RudderF(angle=75, option=1) {
						E:RudderF(angle=-165.5, option=1) {
							E:Arm(power=armP1, option=10000) { }
						}
					}
					W:RudderF(angle=-75, option=1) {
						W:RudderF(angle=165.5, option=1) {
							W:Arm(power=armP1, option=10000) { }
						}
					}
					N:Frame(angle=170, option=1) {
						N:Chip(angle=10) {
							N:Chip() {
								N:Chip() {
									N:Trim(name=T, angle=90, damper=0.9, spring=0.9) {
										E:Chip(angle=90) {
											N:Chip(angle=-elevator) {
												E:Rudder(angle=-45) {
													E:Rudder(angle=-135) {
														E:Chip() { }
													}
												}
											}
										}
										E:Chip(angle=-90) {
											N:Chip(angle=elevator) {
												E:Rudder(angle=-45) {
													E:Rudder(angle=-135) {
														E:Chip() { }
													}
												}
											}
										}
										N:Chip() {
											E:Chip() { }
										}
										S:Jet(angle=-90, power=-ENGINE) {
											S:Chip(angle=rudderR) { }
											S:Chip(angle=-90) {
												W:Chip(angle=-90) { }
											}
										}
										S:Jet(angle=90, power=ENGINE) {
											S:Chip(angle=rudderL) { }
											S:Chip(angle=90) {
												W:Chip(angle=90) { }
											}
										}
										N:Trim(name=B, angle=90) {
											S:Frame() {
												N:RudderF(angle=da) { }
											}
										}
									}
								}
								N:RudderF(angle=PAKb) {
									N:Frame(angle=PAKa, damper=0.9, spring=0.9) {
										N:Frame(damper=0.9, spring=0.9) {
											N:Arm(angle=-PAa, power=PAK, option=300000) { }
										}
									}
								}
							}
							S:Chip() {
								S:Chip(name=T) {
									S:Arm(power=armP2, option=50000) { }
								}
								E:Trim(angle=elevator) {
									E:Wheel(angle=wheela, brake=40) { }
								}
								W:Trim(angle=-elevator) {
									W:Wheel(angle=wheela, brake=40) { }
								}
							}
							E:Rudder(angle=-winga, damper=0.9, spring=0.9) {
								E:Chip() {
									E:Chip() {
										E:Chip(name=R) {
											N:Rudder(angle=-winga) {
												N:Chip() {
													N:Chip() { }
												}
											}
										}
									}
									N:RudderF(angle=-wingb, damper=0.9, spring=0.9, option=1) {
										S:Chip(angle=airlon) {
											W:Chip() { }
										}
									}
								}
							}
							W:Rudder(angle=winga, damper=0.9, spring=0.9) {
								W:Chip() {
									W:Chip() {
										W:Chip(name=L) {
											N:Rudder(angle=winga) {
												N:Chip() {
													N:Chip() { }
												}
											}
										}
									}
									N:RudderF(angle=wingb, option=1) {
										S:Chip(angle=-airlon) {
											E:Chip() { }
										}
									}
								}
							}
							E:Frame(angle=90, option=1) {
								N:RudderF(angle=-45, spring=0.2) {
									N:Wheel(angle=wheelb, brake=10) { }
								}
								N:Chip(angle=break) { }
								N:Chip(angle=-break) { }
							}
							W:Frame(angle=90, option=1) {
								N:RudderF(angle=45, spring=0.2) {
									N:Wheel(angle=wheelb, brake=10) { }
								}
								N:Chip(angle=break) { }
								N:Chip(angle=-break) { }
							}
							N:Trim(angle=-90) {
								S:Chip(angle=-rudder) { }
								N:Chip(angle=-rudder) { }
							}
						}
					}
				}
			}
		}
	}
}
Script
{






print 1,"  FPS=",_FPS(),"
print 2,"  Vel=",_VEL(), "    VELOCITY=",_VEL()*3.57
print 5," X=",_X()," Y=",_Y()," Z=",_Z()," 

Y = _Y()
V = _VEL()
YL = _Y(L)
YR = _Y(R)
YLMR = YL-YR
YT = _Y(T)
YB = _Y(B)
YTMB =YT-YB
ENGINE = jet + drive
if _KEYDOWN(7)=1 & En < 5 & En > 0.5 {Em=1}
if _KEY(7)=1 {En=En+1 jet=jet+5000}
if Em=1 {drive=50000}
if _KEY(7)=0 {Em=0 }
if _KEY(7)=0 & En=5 {En=0}
if Y > 100 {wheela=wheela-3 wheelb=wheelb+6}
if _KEYDOWN(16)=1 {Button=Button+1}
if Button = 4 &  _KEYDOWN(16)=1 {Button=0}
if Button = 0 {GOTO C}
if Button = 2 {GOTO B}


LABEL A // ロール
if YLMR > 0.01 {airlon=YLMR*-2}
if -0.01 > YLMR {airlon=YLMR*-2}
if Button < 3 {GOTO C}

LABEL B // ピッチ
if YTMB>0.01 & 1.0>=YTMB {elevator=1.4-YTMB*4 }
if YTMB>1.0 {elevator=4-YTMB*4   }
if -0.005>YTMB & YTMB>=-1.0 {elevator=2.0-YTMB*4 }
if -1.0>YTMB  {elevator=5-YTMB*4 }
if Y < 30 {elevator=6-YTMB*5}


LABEL C // none
if Button = 3 {jet=jet}
if Button = 1 {print 3," Auto airlon " print 4," test  "}
if Button = 2 {print 3," Auto pitch "}
if Button = 3 {print 3," Auto Pilot "}

if Button = 3 & _KEYDOWN(15)=1 {but=but+1}
if Button < 3 {but=0}
if but < 1 {PAa=PAa+4 PAKa=PAKa+3 GOTO D}
if but > 0.9 { print 4,"CANON mode" }

if _KEY(14)=1 {PAK=PAK+100000}
if _KEY(12)=1 {PAKb=PAKb+1}
if _KEY(13)=1 {PAKb=PAKb-1}
if _KEY(10)=1 {PAa=PAa-1 Pita=Pita+1}
if _KEY(11)=1 {PAa=PAa+1 Pita=Pita-1}

LABEL D




}