From f6fe81d721f369c0be0987c1852084b902a7b5c5 Mon Sep 17 00:00:00 2001
From: Vince Weaver <vince@deater.net>
Date: Thu, 29 Oct 2020 17:11:21 -0400
Subject: [PATCH] appleiibot: horizon, some other minor optimizations

---
 appleiibot/horizon.bas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/appleiibot/horizon.bas b/appleiibot/horizon.bas
index 7ee29075..2cb5e1cf 100644
--- a/appleiibot/horizon.bas
+++ b/appleiibot/horizon.bas
@@ -1,5 +1,5 @@
 1HGR2
 2FORJ=0TO7:HCOLOR=2:S=96+12*J:POKE230,32+32*P:P=NOTP:POKE49236+P,0:CALL-3086
 3S=S/2:Y=96+S:HPLOT0,YTO279,Y:IFS>1THEN3
-4HCOLOR=3:Y=101:K=2.5:A=-220:FORI=1TO8:IFY>191THENY=191
-7X=A*(A>0):HPLOTX,YTO4+I*16,96:HPLOT279-X,YTO272-I*16,96:A=A+48:K=K+K:Y=Y+K:NEXTI,J:GOTO2
+4HCOLOR=3:HPLOT140,9:Y=101:K=2.5:A=-220:FORI=1TO8:IFY>191THENY=191
+7X=A*(A>0):HPLOTX,YTO4+I*16,96TO272-I*16,96TO279-X,Y:A=A+48:K=K+K:Y=Y+K:NEXTI,J:GOTO2