!"Eek!"
c14
s
]"Start"
@0,1,"    **** CHIP&GRAN 99 NASIC M1 ****    "
@0,1,"    **** Gran's  m5ness  r5 v1 ****    "
b6

@9,17,"Press TAB to skip GOTO"
@4,18,"thus breaking the infinite loop"
]"flash"
@17,1,"m5ness"
r25
c1
@17,1,"m5ness"
r15
c14
g"flash"

@0,24,"C-NASIC:constricted NASIC Parser."
@0,3,"VAR PRAM SYSTEM  UP TO 16000000 BYTES !"
c1
@30,22,"TESTING BOUNDS!!!"


]"TAO"

c14
@0,5,"THE TAO IS WITH ME,"
@0,6,"BUT THE INTERPETER IS"
@0,7,"NOT READY YET!"
c7
@10,9,"YELLOW"
 c13
@0,10,"LT GRN ; 1 SPC"
c1
c2
@20,20,"20 20!"
@21,21,"21 21!"

  c1
@0,11,"WHITE   NUFF SPC"


 c7       
@21,5,"TAO WITH ME IS THE,"
   @21,6,"BUT THE INTERPETER,"

]"tao2"


@27,7,"C'EST `PONG`!"
c0
b1
@30,15,"CBM BLACK"

c1
b2
@0,17,"_-+?!|#&^%@~\\/$YmB0l[]{}Z"
b6


g"TAO"

!"don't use the [ thingy!"

["error"

c6
b14
l0,8
?"AlMost READY!"

b6
c14
@0,23,"Gran:I AM "
c1
b0
@11,23,"NOT"
b6
c14
@14,23," A WILSON!"

c4
b13
l0,20
?"SCROLL TEST #1 FOR M5nessismness!"
l20,21
?"SCROLL TEST #2 FOR M5nessismness!"
c7
b6
l20,24
?"SCROLL TEST #3 FOR M5nessismness!"
?"SCROLL TEST #4 FOR M5nessismness!"
?"SCROLL TEST #5 FOR M5nessismness!"

b6
c14
r500
/rest for half a sec

]"X"
c13
@0,0,"X"
c14
@0,0,"Y"
b1
@0,0,"Z"
b6
g"X"
!"out of XYZ loop"

c1
@0,0,"W"

c1
b11
s0
l0,5
?"ALMOST READY!"

l0,7

c15
?"pausing one and a half-seconds!"
r1500


b6
c14
m0
/a silly label
]"ding!"
@0,1,"-   **** CHIP&GRAN 99 NASIC M1 ****    "
@0,1,"+  **** Granitor's m5ness r5 v1 ****   "
g"ding!"

b14
c6
l0,5
/reversed colors!
]"loopback"
@0,3,"-VAR PRAM SYSTEM  UP TO 16000000 BYTES!"

?"    **** CHIP&GRAN 99 NASIC M1 ****     "
c11
?"    **** CHIP&GRAN 99 NASIC M1 ****     "
c15
?" ** now featuring : Infinite loops!! ** "
c6
g"loopback"
!"Out of loopback...."

m0
@0,0,"W"


b6
c14
s2 //maybe this number would be GDCOL...

@0,1,"    **** CHIP&GRAN 99 NASIC M1 ****    "
@0,3,"VAR PRAM SYSTEM  UP TO 16000000 BYTES !"
l0,5
?"READY?"
l0,6

m2
?"muhahahaha! Multiple modes now!"
m0
?"Upper/Upper\n"
m1
?"Upper/Graphics\n"
m2
?"And lower/Upper\n"

l0,12
?"And more coolness to come! muwhahaha!"

!"Comment test follows!"

/* long comment test 1 */

!"pass 1, wnd next"

/* long 
 comment 2
*/

!"Final commands now.."
m0
@0,24,"    **** C-NASIC - m5ness r5 v1 ****   "

!"EOF - This is last valid line!"
-

!"INTERNAL ERROR: EOF NOT REACHED!!!"
s0
@0,0,"O"
@0,1,"INTERNAL ERROR: EOF NOT REACHED!!!"
?"INTERNAL ERROR: EOF NOT REACHED!!!"
---
---]


All of this is ignored!!!

/* --- Chip's QuickBasic Code:
CCOLOR 9 'Something the C64 never had but really needed...
CCLS
CPRINT CHR$(13) '13 = Enter, like C++ I'm making \n required so that INPUT and the like
               'will work later, if you have a better idea feel free to tell me :)
CPRINT "    **** GRAN&CHIP 99 BASIC V2 ****    " + CHR$(13)
CPRINT CHR$(13)
CPRINT " 64K RAM SYSTEM  38911 BASIC BYTES FREE" + CHR$(13)
CPRINT CHR$(13)
IF C64.DebugMode THEN CPRINT "DEBUG MODE ENABLED." + CHR$(13)
CPRINT "READY." + CHR$(13)
--- Included cause this is what I modeled the into screen on,
it was easier than moving my C64's monitor back into this room
and off of my VCR. --- */

