10 REM: LETTER DROP WRITER LOADER
20 :
30 DV=PEEK(186):IFDV<8THENDV=8
40 POKE646,PEEK(53281):PRINT"[147]LOAD"CHR$(34)"L/D.PKD"CHR$(34)","DV
50 PRINT"RUN"
60 POKE631,13:POKE632,13:POKE198,2:END
10000 N$="B.LD WRITE"
10001 OPEN1,8,15,"I0":CLOSE1
10002 OPEN1,8,15,"S0:"+N$:CLOSE1:SAVEN$,8:END