168 Tanx
1060 SYMBOL 233,170,85,170035,170,85,170
,es
1070 RETURN
1080 RESTORE 1090:FOR X=360 TO 366:READ A: POKE X,A:NEXT:RESTORE:RETURN
1090 DATA 205,96,187,50,111,1,201
1100 INPUT X$:PRINT ASC(X$);:GOTO 1100