graphics: eye_new: room for a {B9}

2021-03-16 15:07:13 -04:00 · 2021-03-16 15:07:13 -04:00 · b17b23b57a
parent f52d98cd37
commit b17b23b57a
1 changed files with 2 additions and 5 deletions
--- a/graphics/gr/bitmap/eye_new.bas
+++ b/graphics/gr/bitmap/eye_new.bas
@ -1,6 +1,3 @@
-1GR
-2FORI=0TO135:C=PEEK(2174+I)-35
-3IFI<8THENA(I)=C:NEXT
-4FORX=XTOX+1:COLOR=A(C-INT(C/8)*8):PLOT12+X,9+I/8:C=C/8:NEXT:X=X*(X<15):NEXT
-5GOTO1
+1GR:FORI=0TO135:C=PEEK(2162+I)-35:IFI<8THENA(I)=C:NEXT
+4FORX=XTOX+1:COLOR=A(C-INT(C/8)*8):PLOT12+X,9+I/8:C=C/8:NEXT:X=X*(X<15):NEXT:GOTO1
 6".+#'2*/(#,#34,-%+$345555,3455555$455>655+5=>HO654=A5RG@M5V65]H?M5>955H?E8V655R@E7>955=>EO=A55V6HG=VAAA6GH8>VV>MGLO5>>5HO+0O55HO,#+,,,,,#