Source Code
1 REM "CHAR SET2"
2 REM 'ITALICS'
3 REM By Ben Stagnell
4 REM ZX Computing Monthly
5 REM To use in any memory addr CLEAR addr-1, LOAD "code name" CODE addr, play tape then type or include as pgm lines POKE 23606,addr -256*INT (addr/256): POKE 23607,INT (addr/256) Where "addr" is any address you wish to put the code at.
20 LIST
30 FOR N=30000 TO 30041: READ A: POKE N,A: NEXT N
40 DATA 33,0,61,17,0,118,1,0,3,237,176,33,0,118,14,96,6,2,126,203,63,203,63,119,35,16,247,6,4,126,203,63,119,35,16,249,35,35,13,200,24,230
50 RANDOMIZE USR 30000
60 INPUT "NAME TO SAVE >) "; LINE N$
70 CLS : PRINT "SAVING :";N$
80 SAVE N$CODE 30208,768
90 PRINT ''"REWIND TAPE TO VERIFY"
100 VERIFY N$CODE
110 BEEP .1,10: PRINT "SAVE COMPLETE"
120 NEW
