5 REM MCP9701 10 D="#9#9#9#8#7#7#6#5#5#4#3#3#2#1#1#0-9-9-8-7-7-6-5-5-4-3-3-2-2-1-1 0 1 1 2 2 3 4 4 5 6 6 7 8 8 91010111212131414151616171818192020212222232424252626272828293030313232333434353636373838394040 20 A=250:REM A=ANA() 30 A=A/4:A=A*2 40 PRINT CHR$(PEEK(D+A+0)); 50 PRINT CHR$(PEEK(D+A+1))