// [RCD] 
// 起動/停止 :  V/ A
// 上昇/下降 :  S/ X
// 左右回頭  :  Z/ C
// 前進/後退 : ↑/↓
// 左右旋回  : ←/→
Val
{
	C1(default=0, min=-1, max=1, step=1, disp=0)
	C2(default=0, min=-1, max=1, step=1, disp=0)
	CR(default=0, min=-10, max=10, step=5, disp=0)
	ENGINE(default=0, max=70000, step=1000)
	K1(default=0, max=1, disp=0)
	NS(default=30, max=30, disp=0)
	R11(default=15, min=-5, max=45, step=2, disp=0)
	R12(default=15, min=-5, max=45, step=2, disp=0)
	R21(default=15, min=-5, max=45, step=2, disp=0)
	R22(default=15, min=-5, max=45, step=2, disp=0)
	ROLL(default=0, min=-600, max=600, step=20)
	UD(default=0, min=-15, max=15, step=7, disp=0)
	WING(default=0, min=-30, max=30, step=5)
}
Key
{
	0:C1(step=-1)
	1:C1(step=1)
	2:C2(step=-1)
	3:C2(step=1)
	4:CR(step=-1)
	5:UD(step=-3)
	6:CR(step=1)
	7:K1(step=-1), AS(step=-1)
	8:UD(step=3)
	10:ENGINE(step=1000), K1(step=1)
}
Body
{
	Core(name=core) {
		N:Frame(angle=165) {
			N:Frame() {
				N:Frame(angle=-165, name=ncore) {
					W:Trim(angle=-WING) { }
					E:Trim(angle=WING) { }
					N:Frame(angle=NS) { }
					W:Frame(angle=NS) { }
					E:Frame(angle=NS) { }
					S:TrimF(angle=90) { }
				}
			}
			N:Frame(angle=15) { }
		}
		S:Frame(angle=-30) {
			S:Frame(angle=-60) {
				S:Wheel(angle=-90, power=ROLL, option=1, color=#000000, effect=1, name=main) {
					S:Wheel(angle=180, power=-ENGINE) {
						N:TrimF(angle=R12, name=p1) {
							N:Chip() {
								N:Chip() { }
							}
						}
						S:TrimF(angle=R11, name=p3) {
							S:Chip() {
								S:Chip() { }
							}
						}
					}
					S:Wheel(angle=180, power=ENGINE, name=ROT1) {
						N:TrimF(angle=-R21, name=p2) {
							N:Chip() {
								N:Chip() { }
							}
						}
						S:TrimF(angle=-R22, name=p4) {
							S:Chip() {
								S:Chip() { }
							}
						}
					}
				}
			}
			S:Cowl(angle=-150) {
				S:Cowl(angle=-15, color=#008040, effect=#C000) {
					S:Cowl(angle=-30, color=#008040, effect=#C000) {
						E:Cowl(angle=-90, option=4) { }
						W:Cowl(angle=-90, option=3) { }
						S:Cowl(angle=-130) { }
					}
				}
				W:Cowl(angle=-90) {
					N:Cowl(angle=-30) { }
				}
				E:Cowl(angle=-90) {
					N:Cowl(angle=-30) {
						N:Cowl(angle=30, option=4) {
							W:Cowl(angle=90, option=5) { }
							W:Cowl(angle=-90, option=5) { }
						}
					}
				}
			}
		}
	}
}
Script
{
	if K1>0{WING=_TODEG(_EX(core))}

	if K1>0 & _VY()>=1{NS=NS-3}
	if K1=0{NS=NS+3}

	if K1>0 & _VY()<0{ENGINE=ENGINE+100}
	if K1>0 & _VY()>0{ENGINE=ENGINE-100}

	if K1>0{ROLL=20*(CR-_WY()*10)}

	R11=-C1*_COS(_RY(ncore,p3))+C2*_SIN(_RY(core,p3))+UD+15
	R22=-C1*_COS(_RY(ncore,p4))+C2*_SIN(_RY(core,p4))+UD+15
	R12=C1*_COS(_RY(ncore,p3))-C2*_SIN(_RY(core,p3))+UD+15
	R21=C1*_COS(_RY(ncore,p4))-C2*_SIN(_RY(core,p4))+UD+15

	if K1>0 & _VY()>1{AS=AS+1}
	PX=_WIDTH()/2-_MX()
	PZ=_HEIGHT()/3-_MY()
	if AS>0 & PX> 0{AX=(_ABS(PX)/_WIDTH())*50 TRIM3=(_ABS(PX)/_WIDTH())*-50}
	if AS>0 & PX<=0{AX=(_ABS(PX)/_WIDTH())*-50 TRIM3=(_ABS(PX)/_WIDTH())*50}
	if AS>0 & PZ<=0{AZ=(_ABS(PZ)/_HEIGHT())*-30}
	if AS>0 & _ML()=1 {ARM=ARM+100000}
	if AS>0{AG=AG-5}

	PRINT 1,"cruising_speed : ",_VZ()*-3.6," km/h"
	PRINT 2,"climbing_speed : ",_VY()* 3.6," km/h"
}