start tok64 d64-pnvxUw 1 IFPEEK(56)>157THENPOKE52,157:POKE56,157:CLR 2 FORa=40192TO40827:READb:POKEa,b:NEXT 3 POKE772,0:POKE773,157:RUN50 10 DATA173,1,2,201,95,240,3,76,124,165,104,104,173,0,2,201 11 DATA78,208,93,169,32,141,20,3,169,157,141,21,3,76,116,164 12 DATA165,57,133,247,201,0,208,8,173,39,4,16,6,76,49,234 13 DATA141,37,157,165,58,48,246,133,248,160,4,169,255,133,249,133 14 DATA250,165,247,56,233,10,230,249,208,2,230,250,176,246,198,248 15 DATA16,241,105,186,153,35,4,173,134,2,153,35,216,136,48,205 16 DATA165,249,133,247,165,250,133,248,5,249,208,207,169,160,208,228 17 DATA201,79,208,79,169,8,141,2,8,32,51,165,165,34,24,105 18 DATA2,133,45,165,35,105,0,133,46,76,116,164,230,122,32,115 19 DATA0,201,36,208,32,169,0,133,100,133,101,32,115,0,240,34 20 DATA144,2,233,8,233,47,162,4,6,101,38,100,202,208,249,5 21 DATA101,133,101,80,230,32,124,165,230,122,230,123,32,138,173,32 22 DATA155,188,96,201,72,208,66,32,140,157,169,36,205,2,2,208 23 DATA10,165,100,166,101,32,205,189,76,116,164,32,210,255,162,0 24 DATA165,100,208,1,232,181,100,72,160,1,74,74,74,74,201,10 25 DATA144,2,105,6,105,48,32,210,255,136,48,5,104,41,15,16 26 DATA237,232,224,2,144,223,76,116,164,201,80,208,104,32,140,157 27 DATA165,100,133,252,165,101,133,251,32,215,170,165,252,166,251,32 28 DATA205,189,169,58,32,210,255,162,7,32,63,171,160,0,177,251 29 DATA72,160,2,74,74,74,74,201,10,144,2,105,6,105,48,32 30 DATA210,255,136,240,6,104,72,41,15,16,236,104,201,32,144,4 31 DATA201,96,144,2,169,46,149,96,230,251,208,2,230,252,202,16 32 DATA200,32,63,171,162,7,181,96,32,210,255,202,16,248,165,145 33 DATA48,166,76,116,164,201,68,208,99,169,36,141,0,2,169,58 34 DATA141,1,2,160,1,200,185,0,2,208,250,152,162,0,160,2 35 DATA32,189,255,169,8,162,8,160,0,32,186,255,32,192,255,162 36 DATA8,32,198,255,32,207,255,32,207,255,32,207,255,32,207,255 37 DATA32,183,255,208,4,165,145,48,5,32,40,245,144,109,169,13 38 DATA32,210,255,32,207,255,170,32,207,255,32,205,189,169,32,32 39 DATA210,255,32,207,255,240,211,32,210,255,208,246,72,160,255,200 40 DATA185,2,2,208,250,152,162,2,160,2,32,189,255,104,201,67 41 DATA240,62,162,8,160,1,32,186,255,201,83,240,37,201,82,240 42 DATA7,201,76,240,3,76,8,175,169,0,32,213,255,144,5,238 43 DATA0,2,176,23,196,44,144,19,196,56,176,15,134,45,132,46 44 DATA144,9,169,43,166,45,164,46,32,216,255,169,0,32,189,255 45 DATA169,15,162,8,168,32,186,255,32,192,255,162,15,32,198,255 46 DATA32,207,255,201,48,208,7,32,207,255,201,48,240,17,72,169 47 DATA13,32,210,255,104,32,210,255,32,207,255,201,13,208,246,32 48 DATA231,255,173,0,2,201,82,240,3,76,116,164,169,13,32,210 49 DATA255,169,167,72,169,173,72,169,0,76,113,168 50 POKE53280,.:POKE53281,. 51 PRINT"{clear}{white}kortkommandon f{pound}r c64 52 PRINT"{space*3}{light gray}per anders flordal, solna 53 PRINT"{down*2}{yellow}c{arrow left} {green}kommando till diskdriven 54 PRINT"{156}ex: {light blue}c{arrow left}r0:nyttnamn=gammaltnamn 55 PRINT"{space*4}c{arrow left}s0:gammalfil,[ldrefil 56 PRINT"{space*4}c{arrow left}{space*4}{blue}(visar status) 57 PRINT"{down}{yellow}d{arrow left} {green}visar diskens directory 58 PRINT"{156}ex: {light blue}d{arrow left}* 59 PRINT"{space*4}d{arrow left}z* 60 PRINT"{space*4}d{arrow left}*=s 61 PRINT"{down}{yellow}h{arrow left} {green}konverterar hex-dec och dec-hex 62 PRINT"{156}ex: {light blue}h{arrow left}$9{0*3} 63 PRINT"{space*4}h{arrow left}49152 64 PRINT"{space*4}h{arrow left}asc("CHR$(34)"@"CHR$(34)") 65 PRINT"{down*2}{white}tryck >":POKE198,.:WAIT198,1 71 PRINT"{clear}{white}kortkommandon f{pound}r c64 72 PRINT"{space*3}{light gray}per anders flordal, solna 73 PRINT"{down*2}{yellow}l{arrow left} {green}load,8,1 men du f]r ej ?out of memory{space*3}error sedan 74 PRINT"{156}ex: {light blue}l{arrow left}mittprogram 75 PRINT"{space*4}l{arrow left}menu 77 PRINT"{down}{yellow}n{arrow left} {green}trace-visar radnummer vid k{pound}rning av{space*4}basicprogram 78 PRINT"{156}ex: {light blue}n{arrow left} 81 PRINT"{down*2}{yellow}o{arrow left} {green}old 82 PRINT"{156}ex: {light blue}o{arrow left} 85 PRINT"{down*4}{white}tryck >":POKE198,.:WAIT198,1 91 PRINT"{clear}{white}kortkommandon f{pound}r c64 92 PRINT"{space*3}{light gray}per anders flordal, solna 93 PRINT"{down*2}{yellow}p{arrow left} {green}ger hex & alfanumerisk minnesdump 94 PRINT"{156}ex: {light blue}p{arrow left}43 95 PRINT"{space*4}c{arrow left}$c{0*3} 96 PRINT"{space*4}c{arrow left}200 97 PRINT"{down}{yellow}r{arrow left} {green}som l{arrow left}, men med automatisk run 98 PRINT"{156}ex: {light blue}r{arrow left}mittprogram 99 PRINT"{space*4}r{arrow left}menu 101 PRINT"{down*2}{yellow}s{arrow left} {green}save,8 102 PRINT"{156}ex: {light blue}s{arrow left}mittprogram 103 PRINT"{down*4}{white}tryck >":POKE198,.:WAIT198,1:POKE198,. stop tok64 (bastext 1.0)