on:keyhit16{
		event "khitq","global";
	}
	on:keyhit17{
		event "khitw","global";
	}
	on:keyhit18{
		event "khite","global";
	}
	on:keyhit19{
		event "khitr","global";
	}
	on:keyhit20{
		event "khitt","global";
	}
	on:keyhit21{
		event "khity","global";
	}
	on:keyhit22{
		event "khitu","global";
	}
	on:keyhit23{
		event "khiti","global";
	}
	on:keyhit24{
		event "khito","global";
	}
	on:keyhit25{
		event "khitp","global";
	}
	on:keyhit28{
		event "khitenter","global";
	}
	on:keyhit29{
		event "khitlctrl","global";
	}
	on:keyhit30{
		event "khita","global";
	}
	on:keyhit31{
		event "khits","global";
	}
	on:keyhit32{
		event "khitd","global";
	}
	on:keyhit33{
		event "khitf","global";
	}
	on:keyhit34{
		event "khitg","global";
	}
	on:keyhit35{
		event "khith","global";
	}
	on:keyhit36{
		event "khitj","global";
	}
	on:keyhit37{
		event "khitk","global";
	}
	on:keyhit38{
		event "khitl","global";
	}
	on:keyhit42{
		event "khitlshift","global";
	}
	on:keyhit44{
		event "khitz","global";
	}
	on:keyhit45{
		event "khitz","global";
	}
	on:keyhit46{
		event "khitc","global";
	}
	on:keyhit47{
		event "khitv","global";
	}
	on:keyhit48{
		event "khitb","global";
	}
	on:keyhit49{
		event "khitn","global";
	}
	on:keyhit50{
		event "khitm","global";
	}
	on:keyhit54{
		event "khitrshift","global";
	}
	on:keyhit56{
		event "khitalt","global";
	}
	on:keyhit57{
		event "khitspace","global";
	}
	on:keyhit157{
		event "khitrctrl","global";
	}
	on:keyhit200{
		event "khitup","global";
	}
	on:keyhit203{
		event "khitleft","global";
	}
	on:keyhit205{
		event "khitright","global";
	}
	on:keyhit208{
		event "khitdown","global";
	}

on:keyhit16{
		msg "KEYHIT";
	}
	on:keyhit17{
		msg "KEYHIT";
	}
	on:keyhit18{
		msg "KEYHIT";
	}
	on:keyhit19{
		msg "KEYHIT";
	}
	on:keyhit20{
		msg "KEYHIT";
	}
	on:keyhit21{
		msg "KEYHIT";
	}
	on:keyhit22{
		msg "KEYHIT";
	}
	on:keyhit23{
		msg "KEYHIT";
	}
	on:keyhit24{
		msg "KEYHIT";
	}
	on:keyhit25{
		msg "KEYHIT";
	}
	on:keyhit28{
		msg "KEYHIT";
	}
	on:keyhit29{
		msg "KEYHIT";
	}
	on:keyhit30{
		msg "KEYHIT";
	}
	on:keyhit31{
		msg "KEYHIT";
	}
	on:keyhit32{
		msg "KEYHIT";
	}
	on:keyhit33{
		msg "KEYHIT";
	}
	on:keyhit34{
		msg "KEYHIT";
	}
	on:keyhit35{
		msg "KEYHIT";
	}
	on:keyhit36{
		msg "KEYHIT";
	}
	on:keyhit37{
		msg "KEYHIT";
	}
	on:keyhit38{
		msg "KEYHIT";
	}
	on:keyhit42{
		msg "KEYHIT";
	}
	on:keyhit44{
		msg "KEYHIT";
	}
	on:keyhit45{
		msg "KEYHIT";
	}
	on:keyhit46{
		msg "KEYHIT";
	}
	on:keyhit47{
		msg "KEYHIT";
	}
	on:keyhit48{
		msg "KEYHIT";
	}
	on:keyhit49{
		msg "KEYHIT";
	}
	on:keyhit50{
		msg "KEYHIT";
	}
	on:keyhit54{
		msg "KEYHIT";
	}
	on:keyhit56{
		msg "KEYHIT";
	}
	on:keyhit57{
		msg "KEYHIT";
	}
	on:keyhit157{
		msg "KEYHIT";
	}
	on:keyhit200{
		msg "KEYHIT";
	}
	on:keyhit203{
		msg "KEYHIT";
	}
	on:keyhit205{
		msg "KEYHIT";
	}
	on:keyhit208{
		msg "KEYHIT";
	}

script=start
	on:trnof{
		$shooting=0;
		closemenu;
	}
	on:khitf{
		$sid=currentid();
		$state=gotstate("unit",$sid,"action");
		if($state==1){
			if($shooting==0){
				event "rapid";
			}
			else{
				event "trnof";
			}
		}
	}
	on:khitg{
		$sid=currentid();
		$state=gotstate("unit",$sid,"action");
		if($state==1){
			if($shootingr==0){
				event "rapidr";
			}
			else{
				event "trnofr";
			}
		}
	}
	on:khitr{
		$sid=currentid();
		$state=gotstate("unit",$sid,"action");
		if($state==1){
			event "bombdrop";
		}
	}
	on:rapid{
		$shooting=1;
		timer "self",50,1,"rgun";
	}
	on:trnofr{
		$skipr=1;
	}
	on:rapidr{
		$skipr=0;
		timer "self",50,1,"rgunr";
	}
	on:rgunr{
		if($skipr==1){
			skip;
		}
		if($poison==0){
			if(count_stored("self",79)>0){
				$rocket=79;
				$rshot=1;
			}
			else{
				$rshot=0;
				msg "No regular rockets stored",3;
				msg "Press 'y' to switch to poison rockets",3;
			}
		}
		elseif($poison==1){
			if(count_stored("self",80)>0){
				$rocket=80
				$rshot=1;
			}
			else{
				$rshot=0;
				msg "No poison rockets stored",3;
				msg "Press 'y' to switch to regular rockets",3;
			}
		}
		else{
			$rshot=0;
		}
		if($rshot==1){
			$randomr=random(25,60);
			projectile $rocket,getx("self"),(gety("self")+20),getz("self"),3,getpitch("self"),getyaw("self"),150,0,$randomr,100,0;
			freestored "self",$rocket,1;
			timer "self",200,1,"rgunr";
		}
	}

	on:rgun{
		if($shooting==1){
			if(count_stored("self",29)>0){
				$randomm=random(25,60);
				projectile 29,getx("self"),(gety("self")+20),getz("self"),3,getpitch("self"),getyaw("self"),150,0,$randomm,100,0;
				freestored "self",29,1;
				timer "self",50,1,"rgun";
			}
			else{
				msg "No bullets stored",3;
				$shooting=0;
			}
		}
		else{
			msg "Rapidfire gun off";
		}
	}
	on:khitt{
		$sid=currentid();
		$state=gotstate("unit",$sid,"action");
		if($state==1){
			event "shoot";
		}
	}
	on:shoot{
		if($poison==0){
			if(count_stored("self",79)>0){
				$rocket=79;
				$rshot=1;
			}
			else{
				$rshot=0;
				msg "No regular rockets stored",3;
				msg "Press 'y' to switch to poison rockets",3;
			}
		}
		elseif($poison==1){
			if(count_stored("self",80)>0){
				$rocket=80
				$rshot=1;
			}
			else{
				$rshot=0;
				msg "No poison rockets stored",3;
				msg "Press 'y' to switch to regular rockets",3;
			}
		}
		else{
			$rshot=0;
		}
		if($rshot==1){
			$randomr=random(25,60);
			projectile $rocket,getx("self"),(gety("self")+20),getz("self"),3,getpitch("self"),getyaw("self"),150,0,$randomr,100,0;
			freestored "self",$rocket,1;
		}
	}
	on:use{
		ride;
		event "instructions";
	}
	on:khity{
		if($poison==0){
			$poison=1;
			msg "Poison rocket mode",4;
		}
		else{
			$poison=0;
			msg "Normal rocket mode",4;
		}
	}
	on:instructions{
		$sid=currentid();
		$state=gotstate("unit",$sid,"action");
		if($state==1){
			msg "PRESS 'i' TO REPEAT INSTRUCTIONS",4,3500;
			msg "Press 'r' to reload",4,4000;
			msg "Press 'f' to turn on/off rapidfire gun",4,4100;
			msg "Press 'g' to turn on/off rapidfire launcher",4,4300;
			msg "Press 'b' to drop a bomb",4,4500;
			msg "Press 't' to shoot a single rocket",4,4700;
			msg "Press 'y' to switch between poison or regular rockets",4,4900;
		}
		else{
			ride;
		}
	}
	on:khitr{
		exchange "self",1,29,79,80,150;
	}
	on:khiti{
		event "instructions";
	}
	on:bombdrop{
		if(count_stored("self",150)>0){
			$x=getx("self");
			$y=gety("self");
			$z=getz("self");
			projectile 150,$x,$y,$z,3,90,0,30,0,4,1,0;
			freestored "self",150,1;
			msg "Bomb Dropped",4;
		}
		else{
			msg "No bombs stored",3;
		}
	}
	on:kill{
		explosion getx("self"),gety("self"),getz("self"),200,10;
		free "self";
	}
script=end