diff --git a/appleiibot/horizon.bas b/appleiibot/horizon.bas
index 9c5f9a79..02f34ea2 100644
--- a/appleiibot/horizon.bas
+++ b/appleiibot/horizon.bas
@@ -1,8 +1,5 @@
-1HGR:HGR2:HCOLOR=2
-2FORJ=1TO8:A=192+25*J:POKE230,(1+NOTP)*32:POKE49236+P,0:CALL-3086
+1HGR2:HCOLOR=2
+2FORJ=1TO8:A=192+25*J:POKE230,32+NOTP*32:POKE49236+P,0:CALL-3086
 3A=A/2:Y=96+A:Y=Y*(Y<192):HPLOT0,YTO279,Y:IFA>1THEN3
-4B=101:K=2.5:A=-220
-5FORI=1TO8:W=96:Y=B:IFY>191THENY=191
-7X=A*(A>0):V=I*16:GOSUB9:HPLOT279-X,YTO(17-I)*16,96
-8A=A+48:K=K+K:B=B+K:NEXT:P=NOTP:NEXT:GOTO2
-9HPLOTX,YTOV,W:RETURN
+4Y=101:K=2.5:A=-220:FORI=1TO8:IFY>191THENY=191
+7X=A*(A>0):HPLOTX,YTOI*16,96:HPLOT279-X,YTO272-I*16,96:A=A+48:K=K+K:Y=Y+K:NEXT:P=NOTP:NEXT:GOTO2