100 REM *** SENDEN ***
110 CIA=56576
120 POKE CIA+4,2
130 POKE CIA+5,0
140 POKE CIA+14,PEEK(CIA+14) AND 247
150 POKE CIA+14,PEEK(CIA+14) OR 1
160 POKE CIA+14,PEEK(CIA+14) OR 64
170 POKE CIA+3,0
180 INPUT "STARTADRESSE";SA
190 INPUT "ANZAHL";AZ
200 FOR I = SA TO SA+AZ
210 : IF (PEEK(CIA+1) AND 1) = 0 THEN 210
220 : POKE CIA+12,PEEK(I)
230 NEXT I
240 END