diff --git a/ksp/Makefile b/ksp/Makefile
index 193a6a3e..5e632cf7 100644
--- a/ksp/Makefile
+++ b/ksp/Makefile
@@ -9,6 +9,9 @@ basic:	VAB.BAS THEME.BAS
 ACMPLX.BAS:	acmplx.bas
 	$(TXT2BAS) < acmplx.bas > ACMPLX.BAS
 
+FLIGHT.BAS:	flight.bas
+	$(TXT2BAS) < flight.bas > FLIGHT.BAS
+
 LAUNCH.BAS:	launch.bas
 	$(TXT2BAS) < launch.bas > LAUNCH.BAS
 
@@ -24,6 +27,7 @@ VAB.BAS:	vab.bas
 
 
 ksp.dsk:	ACMPLX.BAS \
+		FLIGHT.BAS \
 		LAUNCH.BAS GLOBE.HGR LAUNCHPAD.HGR ORBIT_TOP.HGR ORBIT_RIGHT.HGR \
 		LOADING.BAS LOADING.HGR SQUAD.HGR TITLE.HGR \
 		PHYSICS.BAS \
@@ -41,6 +45,7 @@ ksp.dsk:	ACMPLX.BAS \
 	$(DOS33) -y ksp.dsk SAVE B ORBIT_RIGHT.HGR
 	$(DOS33) -y ksp.dsk SAVE B ORBIT_TOP.HGR
 	$(DOS33) -y ksp.dsk SAVE A PHYSICS.BAS
+	$(DOS33) -y ksp.dsk SAVE A FLIGHT.BAS
 
 
 LAUNCHPAD.HGR:	launchpad.pcx
diff --git a/ksp/flight.bas b/ksp/flight.bas
new file mode 100644
index 00000000..cb41ace2
--- /dev/null
+++ b/ksp/flight.bas
@@ -0,0 +1,19 @@
+7000 HIMEM:8144
+7020 POKE 232,208:POKE 233,31
+7030 FOR L=8144 TO 8175: READ B:POKE L,B:NEXT L
+7035 HGR:ROT=0:SCALE=2
+7040 XDRAW 1 AT 140,80
+7050 GET A$
+7060 IF A$="Q" THEN END
+7062 IF A$="A" THEN R=R-8
+7063 IF A$="D" THEN R=R+8
+7070 IF R=64 THEN R=0
+7072 IF R=-8 THEN R=56
+7075 XDRAW 1 AT 140,80
+7080 ROT=R
+7085 GOTO 7040
+7090 END
+7100 DATA 1,0,4,0,219,36,36,44,44,44
+7101 DATA 53,53,53,54,54,54,54,63,63,45
+7102 DATA 46,46,62,63,63,39,37,37,63,36
+7103 DATA 36,0
diff --git a/ksp/ship2.table b/ksp/ship2.table
new file mode 100644
index 00000000..50373550
--- /dev/null
+++ b/ksp/ship2.table
@@ -0,0 +1,66 @@
+# Number of shapes
+1
+# 
+START
+# Get to edge
+NLT
+NLT
+NLT
+UP
+UP
+UP
+UP
+# Start on Capsule
+UP
+RT
+UP
+RT
+UP
+RT
+RT
+DN
+RT
+DN
+RT
+DN
+# TANK AGAIN
+DN
+DN
+DN
+DN
+# TANK TWO
+DN
+DN
+DN
+DN
+LT
+LT
+LT
+LT
+RT
+RT
+# BELL
+DN
+RT
+DN
+RT
+DN
+LT
+LT
+LT
+LT
+LT
+LT
+UP
+RT
+UP
+RT
+UP
+# TANK AGAIN
+LT
+LT
+UP
+UP
+UP
+UP
+STOP