Mes coses

This commit is contained in:
2017-02-02 13:47:20 +01:00
parent 0864cdcf89
commit 6831f39d55
5 changed files with 7 additions and 6 deletions

View File

@@ -1,6 +1,6 @@
BORDER INK_BLACK
COLOR INK_WHITE + PAPER_BLACK
CLRSCR
CLS
LOCATE 4 2 PRINT CHR &h87, CHR &h85, CHR &h87, CHR &h85, CHR &h87, CHR &h85, CHR &h87, CHR &h81
LOCATE 4 3 PRINT CHR &h85, CHR &h85, CHR &h85, CHR &h85, CHR &h85, CHR &h85, CHR &h85, CHR &h84
LOCATE 4 4 PRINT CHR &h87, CHR &h81, CHR &h8D, CHR &h85, CHR &h85, CHR &h85, CHR &h8D, CHR &h85
@@ -24,7 +24,7 @@ MENU_BLINK2:
W = 0
GOTO MENU_BLINK
MAIN_GAME:
CLRSCR
CLS
GOSUB PINTA_RED
LOCATE 6 1 PRINT "0"
LOCATE 9 1 PRINT "0"
@@ -38,3 +38,4 @@ PINTA_RED:
PUTCHAR 7 8 &HD1 INK_WHITE + PAPER_BLACK
PUTCHAR 7 10 &HD1 INK_WHITE + PAPER_BLACK
RETURN