Snake: Difference between revisions

Line 35:

STACK 16

CLR-SCR

MSET(C, quit, nHead, dir, Size, SCORE, counter, T )

MSET(C, quit, nHead, dir, Size, SCORE, counter, T,ConsPrey )

SET( symbol, " $@" )

Line 194:

LET( counter := 0 )

CEND

++ConsPrey

COLOR-FG(10)

LOCATE(20,52) SET-ROUND(3),PRNL("SPEED: ")

LOC-ROW(21), PRNL( INV(TLimit), " CM/S" ),SET-ROUND(-1)

LOC-ROW(23) PRNL("CONSUMED PREY:")

LOC-ROW(24) PRNL(ConsPrey,"\OFF")

TIC( T ),{TIME, 12, 52} GOSUB( put time )

EXIT

Line 216:

Line 223:

LOCATE(10,52) PRNL("\033[38;5;11mTIME\OFF")

{TIME, 12, 52} GOSUB( put time )

COLOR-FG(15)

LOCATE(26,52) SET-ITALIC, PRNL(" S P E E D")

LOC-ROW(27) PRNL("S N A K E!\OFF")

RET

Line 355:

Line 366:

@ @

@ @ ███ ███

@ @ █ █ █ █

@ @ █ █ █

@ @ ~~███~~ █ █

@ @ █ █ █

@ @ █ ███

Line 362:

Line 373:

@ @

@ ~~~~~~ @

@ ~~~~~~ @ SPEED:

@ ~ @

@ ~ @ 0.011 CM/S

@ ~ @

@ ~~~~~~ $ @

@ ~~~~~~ $ @ CONSUMED PREY:

@ @

@ @ 11

⚫

@ @

⚫

@ @

@ @ S P E E D

⚫

@ @ S N A K E!

@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

Line 386:

Line 397:

@ @ TIME

@ @

@ ▄▄ ▄ ▄ ▄ ▄▄ @ ~~███~~ ███

@ ▄▄ ▄ ▄ ▄ ▄▄ @ █ █ ███

@ █ ▄ █▄█ █ █ █ █▀ @ █ █ █ █

@ ▀▀ ▀ ▀ ▀ ▀ ▀ ▀▀ @ ███ █ █

Line 394:

Line 405:

@ ~ @

@ ~ @ SPEED:

@ ~ @

@ ~ @ 0.012 CM/S

@ ~~~~~~~~~~~~~ @

⚫

@ ~ @ CONSUMED PREY:

⚫

@ ~ @ 17

@ ~ @

@ ~ @ S P E E D

@ ~ @

@ ~ $ @ S N A K E!

⚫

@ ~ @

⚫

@ ~ $ @

@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@