// [RCD]
Val{
COL1(default=#0000FF,disp=0)
FW(default=0,min=-15,max=15,disp=0)
JL(default=0,min=-200000,max=550000,disp=0)
JR(default=0,min=-200000,max=550000,disp=0)
RO2L(default=0,min=-15,max=15,disp=0)
RO2R(default=0,min=-15,max=15,disp=0)
RO3L(default=0,min=-15,max=15,disp=0)
RO3R(default=0,min=-15,max=15,disp=0)
ROFL(default=0,min=-30,max=20,disp=0)
ROFR(default=0,min=-30,max=20,disp=0)
RORL(default=0,min=-20,max=20,disp=0)
RORR(default=0,min=-20,max=20,disp=0)
YOL(default=0,min=-50,max=50,disp=0)
YOR(default=0,min=-50,max=50,disp=0)
}
Key{
}
Body{
Core(){
S:Frame(angle=120){
S:Frame(){
S:Frame(angle=0){
S:Chip(angle=-120,color=COL1){
S:Trim(color=COL1){
E:Chip(color=COL1){
S:Chip(color=COL1){}
}
W:Chip(color=COL1){
S:Chip(color=COL1){}
}
S:Trim(color=COL1){
S:Trim(color=COL1){
S:Trim(color=COL1){
S:Trim(color=COL1){
E:Chip(angle=0,color=COL1){
E:Chip(angle=90,color=COL1){
N:Jet(angle=90,power=jr,color=COL1){
N:Cowl(angle=90,color=COL1){}
E:Cowl(angle=90,color=COL1){}
}
E:Weight(color=COL1){
S:Chip(angle=yor,color=COL1){}
E:Chip(angle=90,color=COL1){
S:Chip(color=COL1){}
W:Trim(angle=ro3r,color=COL1){}
}
}
}
E:Trim(angle=RORR,color=COL1,name=wrr){}
}
W:Chip(angle=0,color=COL1){
W:Chip(angle=90,color=COL1){
N:Jet(angle=90,power=jl,color=COL1){
N:Cowl(angle=90,color=COL1){}
W:Cowl(angle=90,color=COL1){}
}
W:Weight(color=COL1){
S:Chip(angle=yol,color=COL1){}
W:Chip(angle=90,color=COL1){
S:Chip(color=COL1){}
E:Trim(angle=-ro3l,color=COL1){}
}
}
}
W:Trim(angle=-RORL,color=COL1,name=wrl){}
}
S:Cowl(angle=-87){
W:Cowl(){}
E:Cowl(){}
}
}
}
}
}
}
N:Trim(color=COL1){
N:Chip(angle=fw,color=COL1){
N:Chip(color=COL1){}
}
W:Chip(color=COL1){
W:Trim(angle=-ROFL,color=COL1,name=wfl){}
W:Chip(angle=90,color=COL1){
W:Chip(color=COL1){
W:Frame(angle=-90,option=COL1){
N:Chip(angle=-ro2l,color=COL1){}
}
}
}
W:Cowl(angle=-70){
N:Cowl(angle=-20){
N:Cowl(){
N:Cowl(angle=-20){
N:Cowl(angle=-40,option=5){}
W:Cowl(angle=-113){}
}
W:Cowl(angle=-110){}
}
W:Cowl(angle=-110){}
}
W:Cowl(angle=-110){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(angle=-92,option=3){}
W:Cowl(angle=-1){}
}
}
}
}
}
}
}
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(angle=-92,option=4){}
}
}
}
}
}
}
}
}
E:Chip(color=COL1){
E:Trim(angle=ROFR,color=COL1,name=wfr){}
E:Chip(angle=90,color=COL1){
E:Chip(color=COL1){
E:Frame(angle=-90,option=COL1){
N:Chip(angle=-ro2r,color=COL1){}
}
}
}
E:Cowl(angle=-70){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(angle=-92,option=3){}
}
}
}
}
}
}
N:Cowl(angle=-20){
N:Cowl(){
N:Cowl(angle=-20){
N:Cowl(angle=-40,option=5){}
E:Cowl(angle=-113){}
}
E:Cowl(angle=-110){}
}
E:Cowl(angle=-110){}
}
E:Cowl(angle=-110){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(angle=-92,option=4){}
E:Cowl(angle=-1){}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
N:Cowl(angle=5){
N:Cowl(angle=25){
N:Cowl(angle=0){
E:Cowl(angle=30){}
W:Cowl(angle=30){}
N:Cowl(angle=0){
W:Cowl(angle=30,option=4){}
E:Cowl(angle=30,option=3){}
N:Cowl(angle=-60,option=5){}
}
}
W:Cowl(angle=30){
S:Cowl(angle=-2,option=3){}
W:Cowl(angle=60){
N:Cowl(){}
S:Cowl(){}
}
}
E:Cowl(angle=30){
S:Cowl(angle=-2,option=4){}
E:Cowl(angle=60){
N:Cowl(){}
S:Cowl(){}
}
}
}
W:Cowl(angle=-1,option=4){}
E:Cowl(angle=1,option=3){}
}
W:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){}
}
}
W:Cowl(angle=90){
W:Cowl(){
S:Cowl(){
S:Cowl(angle=1){}
}
N:Cowl(angle=10){}
}
S:Cowl(){
S:Cowl(angle=1){}
}
N:Cowl(angle=20,option=4){}
}
}
E:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(){}
}
}
E:Cowl(angle=90){
S:Cowl(){
S:Cowl(angle=1){}
}
E:Cowl(){
S:Cowl(){
S:Cowl(angle=1){}
}
N:Cowl(angle=10){}
}
N:Cowl(angle=20,option=3){}
}
}
S:Cowl(){
S:Cowl(){
S:Cowl(){
S:Cowl(angle=110){
S:Cowl(angle=-110){
S:Cowl(angle=70){
W:Cowl(){
W:Cowl(angle=91){}
}
E:Cowl(){
E:Cowl(angle=91){}
}
}
W:Cowl(){
W:Cowl(angle=90){
N:Cowl(angle=1){}
}
}
E:Cowl(){
E:Cowl(angle=90){
N:Cowl(angle=1){}
}
}
}
W:Cowl(){
W:Cowl(angle=90,color=COL1){
N:Cowl(option=3,color=COL1){}
S:Cowl(color=COL1){}
}
}
E:Cowl(){
E:Cowl(angle=90,color=COL1){
N:Cowl(option=4,color=COL1){}
S:Cowl(color=COL1){}
}
}
}
}
}
}
}
}
Lua{
function ang(m,n,v)
if m-n<v and m-n>-v then m=n
elseif m<n then m=m+v
elseif m>n then m=m-v
end
return m
end

pow=0
yo=0
mode=0


brk=0
function main()
if _KEYDOWN(4)==1 then mode=math.mod(mode+1,2) end

if mode==0 then -----------------------------------------------------------
out(2,"[Z:�Ø‚è‘Ö‚¦] (’ᑬƒ‚�[ƒh)")

FW=ang(FW,-8,3)

RO2L=ang(RO2L,0,3)
RO2R=ang(RO2R,0,3)

RO3L=ang(RO3L,0,3)
RO3R=ang(RO3R,0,3)

ROFL=ang(RORL,5,3)
ROFR=ang(RORL,5,3)

RORL=ang(RORL,5,3)
RORR=ang(RORL,5,3)

if _KEY(0)==1 then pow=math.min(pow+5000,70000)
elseif _KEY(1)==1 then pow=math.max(pow-3000,-15000)
else pow=ang(pow,0,15000) end


if _KEY(2)+_KEY(3)==1 then
yo=math.min(math.max(yo+_KEY(2)*3-_KEY(3)*3,-20),20)
else
yo=ang(yo,0,3)
end

if _KEY(2)+_KEY(3)==2 then
brk=math.min(brk+5,30)
else
brk=math.max(brk-5,0)
end

if yo>0 then
YOL=-yo*1.5 -brk
YOR=yo -brk
else
YOL=-yo -brk
YOR=yo*1.5 -brk
end


JL=pow-yo*2000
JR=pow+yo*2000
elseif mode==1 then ------------------------------------------------------------
out(2,"[Z:�Ø‚è‘Ö‚¦] (�‚‘¬ƒ‚�[ƒh)")

RO2L=ang(RO2L,10,3)
RO2R=ang(RO2R,10,3)

RO3L=ang(RO3L,3,3)
RO3R=ang(RO3R,3,3)


if _KEY(2)+_KEY(3)==1 then
yo=math.min(math.max(yo+_KEY(2)*1.5-_KEY(3)*1.5,-16),16)
else
yo=ang(yo,0,2)
end

if _KEY(2)+_KEY(3)==2 then
brk=math.min(brk+5,30)
else
brk=math.max(brk-5,0)
end

if yo>0 then
YOL=-yo*1.5 -brk
YOR=yo -brk
else
YOL=-yo -brk
YOR=yo*1.5 -brk
end


if _KEY(0)==1 then pow=pow+5000
elseif _KEY(1)==1 then pow=math.max(pow-3000,-15000)
else pow=ang(pow,0,15000) end

if _Y(WFL)+_Y(WFR)>0 and _Y(WFL)+_Y(WFR)<1.5 then
pow=math.min(pow,200000)
JL=pow-yo*1000
JR=pow+yo*1000
else
pow=math.min(pow,40000)
JL=pow-yo*3000
JR=pow+yo*3000
end

--out(7,_Y(WFL))
if _Y(WFL)+_Y(WFR)>1 then
FW=ang(FW,2,3)
else
FW=ang(FW,0,3)
end

ROFL=ang(ROFL,-(_Y(WFL)-0.7)*20-18,3)
ROFR=ang(ROFR,-(_Y(WFR)-0.7)*20-18,3)

RORL=ang(RORL,-(_Y(WRL)-0.7)*18-16,3)
RORR=ang(RORR,-(_Y(WRR)-0.7)*18-16,3)


end

local zoom=_ZOOM(90)
out(0,string.format(" FPS : %2.1f Chips : %d Weight : %.1f %3.1f km/h ( %3.1f knot )",_FPS(),_CHIPS(),_WEIGHT(),-(_VZ(0)*3.6),-(_VZ(0)*1.9438)))
end
}