Val
{
	PBrake(default=0,min=0,max=100,step=80)
	HaBrake(default=0,min=0,max=200,step=100,disp=0)
	Handle(default=-61,min=-90,max=-30,step=3)
	HandleB(default=-61,min=-90,max=-30,step=3)
	spoira(default=0,min=-30,max=30,step=3)
	Handle_i(default=0,min=-10000,max=10000,step=0)
	HandleK(default=0,min=-10000,max=10000,step=1)
	spoira_i(default=0,min=-10000,max=10000,step=1)
	Engine(default=0,min=-6000,max=5000,step=1000)
//ヒンジ角度制限用
	Hbane(default=0,min=0,max=1,step=0,disp=0)
	Hdam(default=0,min=0,max=1,step=0,disp=0)
	Hkaku(default=0,min=-1000,max=1000,step=0,disp=0)
//切り離し制御用
	kiri(default=0,min=0,max=1,step=0,disp=0)
	asikiri(default=30,min=-80,max=100,step=0,disp=0)
//ボディーカラー
	BodyColorA(default=#b00030,disp=0)
	BodyColorB(default=#a08010,disp=0)
	BodyColorC(default=#606060,disp=0)
	GlassColor(default=#005080,disp=0)
	UnderColor(default=#505050,disp=0)
}
Key
{
	0:Engine(step=-400)
	1:Engine(step=200)
	2:Handle(step=-2),HandleB(step=2),spoira(step=2)
	3:HandleB(step=-2),Handle(step=2),spoira(step=-2)
	7:PBrake(step=50),HaBrake(step=70)
	6:Engine(step=-400)
	5:HaBrake(step=70)
}
Body {
	Core(color=UnderColor){
		S:Chip(angle=-15,color=#FF0000){
			E:chip(angle=-95,color=UnderColor){}
			W:chip(angle=-95,color=UnderColor){}
			S:Frame(angle=-120){
				S:Frame(angle=135,spring=0.05,damper=0,name=kibu){	//ヒンジＸ回転
					N:Rudderf(angle=Hkaku,spring=Hbane,damper=Hdam,name=hingi){	//ヒンジY回転
						N:Frame(angle=-90){
							N:Frame(angle=-160){
								N:Frame(angle=70){
									N:Frame(){
										N:Frame(angle=-40){
											N:Frame(angle=asikiri){}	//切り離し用足
											N:Frame(angle=40){
												N:Frame(){
													N:Frame(){
														N:Frame(angle=-25,spring=0.16,damper=0.5){	//コンテナ前サス
															N:Frame(angle=18){
																N:Trimf(spring=0.25,damper=0.25){	//コンテナ前スタビライザ
																	E:Frame(angle=45){
																		E:Wheel(angle=-135,brake=PBrake,brake=HaBrake,effect=4){}
																	}
																	W:Frame(angle=45){
																		W:Wheel(angle=-135,brake=PBrake,brake=HaBrake,effect=4){}
																	}
																}
															}
														}
														N:Frame(){
															N:Frame(){
																N:Frame(){
																	N:Frame(angle=-155,spring=0.16,damper=0.5){	//コンテナ後サス
																		N:Frame(angle=150){
																			N:Trimf(spring=0.25,damper=0.25){	//コンテナ後スタビライザ
																				W:Frame(angle=45){
																					W:Wheel(angle=-135,brake=PBrake,brake=HaBrake,effect=4){}
																				}
																				E:Frame(angle=45){
																					E:Wheel(angle=-135,brake=PBrake,brake=HaBrake,effect=4){}
																				}
																			}
																		}
																	}
																	N:Frame(){
																		N:Frame(){
																			N:Frame(angle=-20){
																				E:Frame(){}
																				W:Frame(){}
																			}
																		}
																	}
																}
																E:Trim(angle=-45,color=BodyColorB){
																	N:Cowl(angle=-45,color=BodyColorB){
																		N:Cowl(color=BodyColorB){
																			N:Cowl(angle=-30,color=BodyColorB){}
																		}
																	}
																}
																W:Trim(angle=45,color=BodyColorB){
																	N:Cowl(angle=-45,color=BodyColorB){
																		N:Cowl(color=BodyColorB){
																			N:Cowl(angle=-30,color=BodyColorB){}
																		}
																	}
																}
															}
														}
														E:Frame(angle=10){
															E:Cowl(angle=171,color=BodyColorB){
																N:Cowl(color=BodyColorB){
																	N:Cowl(color=BodyColorB){}
																}
																S:Cowl(color=BodyColorB){
																	S:Cowl(color=BodyColorB){
																		E:Cowl(angle=-1,color=BodyColorB){}
																		S:Cowl(angle=-30,option=4,color=BodyColorB){}
																	}
																}
																E:Cowl(color=BodyColorB){}
															}
														}
														W:Frame(angle=10){
															W:Cowl(angle=171,color=BodyColorB){
																S:Cowl(color=BodyColorB){
																	S:Cowl(color=BodyColorB){
																		S:Cowl(angle=-30,option=3,color=BodyColorB){}
																	}
																	W:Cowl(color=BodyColorB){}
																}
																N:Cowl(color=BodyColorB){
																	W:Cowl(color=BodyColorB){}
																	N:Cowl(color=BodyColorB){}
																}
															}
														}
														N:Cowl(angle=10,color=BodyColorB){
															N:Cowl(angle=-10,color=BodyColorB){
																N:Cowl(color=BodyColorB){
																	N:Cowl(color=BodyColorB){
																		N:Cowl(color=BodyColorB){
																			N:Cowl(angle=-30,color=BodyColorB){
																				W:Cowl(color=BodyColorB){}
																				E:Cowl(color=BodyColorB){}
																			}
																			W:Cowl(color=BodyColorB){}
																			E:Cowl(color=BodyColorB){}
																		}
																	}
																}
															}
														}
													}
												}
											}
										}
										N:Cowl(angle=-30,color=BodyColorB){}
									}
								}
							}
						}
					}
				}
			}
		}	//コンテナここまで
		N:Frame(angle=-25,spring=0.2,damper=0.5){	//後サス
			N:Frame(angle=-140){
				N:Trimf(spring=0.25,damper=0.25){	//後スタビライザ
					N:Frame(angle=-120){
						W:Frame(angle=60){
							W:Wheel(angle=30,power=engine,brake=PBrake,brake=HaBrake,effect=5){}
						}
						E:Frame(angle=60){
							E:Wheel(angle=30,power=-engine,brake=PBrake,brake=HaBrake,effect=5){}
						}
					}
				}
			}
		}
		N:Chip(color=underColor){
			N:weight(color=underColor){
				N:weight(angle=-160,color=underColor){}
				N:Cowl(angle=-30,color=underColor){
					N:Cowl(angle=-60,color=#9999AA){
						N:Cowl(angle=-83,color=BodyColorA){
							N:Cowl(color=BodyColorA){}
						}
						E:Cowl(angle=-70,color=BodyColorA){
							E:Cowl(angle=-10,color=BodyColorA){}
						}
						W:Cowl(angle=-70,color=BodyColorA){
							W:Cowl(angle=-10,color=BodyColorA){}
						}
					}
				}
				N:Frame(angle=-150,spring=0.2,damper=0.5){	//後前サス
					N:Trimf(spring=0.25,damper=0.25){	//後前スタビライザ
						N:Frame(angle=-140){
							W:Frame(angle=60){
								W:Wheel(power=engine,brake=HaBrake,brake=PBrake,angle=30,effect=5){}
							}
							E:Frame(angle=60){
								E:Wheel(angle=30,power=-engine,brake=HaBrake,brake=PBrake,effect=5){}
							}
						}
					}
				}
			}
			E:Chip(angle=-110,color=underColor){
				E:trim(angle=spoira,color=UnderColor){}
				E:Cowl(angle=145,color=underColor){
					E:Cowl(angle=-125,color=BodyColorA){
						E:Cowl(color=glassColor){
							E:Cowl(angle=-90,color=BodyColorA){
								N:Cowl(angle=-45,color=glassColor){}
								S:Cowl(angle=-90,color=BodyColorA){}
							}
						}
					}
				}
			}
			W:Chip(angle=-110,color=underColor){
				W:trim(angle=spoira,color=UnderColor){}
				W:Cowl(angle=145,color=underColor){
					W:Cowl(angle=-125,color=BodyColorA){
						W:Cowl(color=glassColor){
							W:Cowl(angle=-90,color=BodyColorA){
								N:Cowl(angle=-45,color=glassColor){}
								S:Cowl(angle=-90,color=BodyColorA){}
							}
						}
					}
				}
			}
			E:Cowl(color=BodyColorC){
				N:Cowl(angle=-80,color=BodyColorC){
					N:Cowl(angle=60,color=BodyColorC){
						N:Cowl(angle=60,color=BodyColorC){}
					}
				}
			S:Cowl(angle=-70,color=BodyColorC){}
			}
			W:Cowl(color=BodyColorC){
				N:Cowl(angle=-80,color=BodyColorC){
					N:Cowl(angle=60,color=BodyColorC){
						N:Cowl(angle=60,color=BodyColorC){}
					}
				}
			S:Cowl(angle=-70,color=BodyColorC){}
			}
			S:Frame(angle=-85,spring=0.26,damper=0.5){	//前サス
				S:Frame(angle=-105){
					S:Trimf(spring=0.25,damper=0.25){	//前スタビライザ
						S:Frame(angle=15){
							S:Frame(angle=-90){
								W:Frame(angle=-30){
									W:Wheel(angle=Handle,power=-engine,brake=PBrake,option=1,effect=2){}
								}
								E:Frame(angle=-30){
									E:Wheel(angle=HandleB,power=engine,brake=PBrake,option=1,effect=2){}
								}
								S:Frame(angle=165){
									W:Frame(angle=15){}
									E:Frame(angle=15){}
								}
							}
						}
					}
				}
			}
		}
		N:Frame(angle=-90){
			N:Frame(angle=-10){}
		}
	}
}
Script {
//後部デッキ部切り離し
	print 0,"Push Z to remove trailer"
	if _KEY(4)>0 {
	kiri=1
	}
	if kiri=1 {
	asikiri=asikiri-2
	}
	if asikiri=-20 {
	_bye (hingi)
	}
	if asikiri=-80 {
	kiri=0
	}
//ヒンジ角度制限

	if _Ry(hingi,kibu)<-1.8 {
	Hbane=0.3
	Hdam=0.5
	Hkaku=_todeg(1.79)
	}
	if _Ry(hingi,kibu)>-2 &_Ry(hingi,kibu)<2{
	Hbane=0
	Hdam=0
	}
	if _Ry(hingi,kibu)>1.8 {
	Hbane=0.3
	Hdam=0.5
	Hkaku=_todeg(-1.79)
	}

//アナログ対応
	print 1,_VEL(0)

	if _key(2)+_key(3)<>0 {
	goto pass
	}
	if _ANALOG(0)>-300 & _ANALOG(0)<300 & Handle_i=0 {
	handle_i=0
	goto pass
	}
	if _ANALOG(0)>Handle_i {
	Handle_i=Handle_i+200
	spoira_i=spoira_i+100
	}
	if _ANALOG(0)<Handle_i {
	Handle_i=Handle_i-200
	spoira_i=spoira_i-100
	}
	handleK=0.008
	if _VEL(0)<25 {
	handleK=(0.025-(_VEL(0)*0.001))+0.008
	}
	Handle=-Handle_i*handleK-60.3
	HandleB=Handle_i*handleK-60.3
	spoira=spoira_i*0.03

	label pass
}