/PROGRAMM ZUR ERSTELLUNG DER LOCHSTREIFEN FUER DAS /SPEICHERTESTGERAET /ANFANGSADRESSE DER LISTE MIT DEM BITMUSTER IST /DIE ADRESSE 0 IN FELD 1 /WENN DIE SPEICHERKAPAZITAET GROESSER ALS 4K IST /MUSS DAS PROGRAMM ERWEITERT WERDEN AUF FELD 2 /4 ODER 8 BIT WORTLAENGE *1000 LINE TDC 4323 4320 4305 4311 4303 4310 4305 4322 4315 4325 4323 4324 4305 322 RTCHAR /UEBERSCHRIFT SPEICHERMUSTER: CHECK /CHECK AUF RETURN 215 SKP JMP .-4 LINE TDC /WORTLAENGE:4 ODER 8 BIT 4327 4317 4322 4324 4314 4301 4305 4316 4307 4305 4272 4264 4240 4317 4304 4305 4322 4240 4270 4240 4302 4311 324 LINE RTCHAR CHECK 264 JMP .+3 AND M260 DCA CNTLEN RTCHAR CHECK 270 TYDER AND M260 DCA CNTLEN START, CLA TAD CNTLEN DCA CARCNT TAD ADRPOI DCA CARPOI LOOP1, TAD MASKLI DCA MASKPO CDF 10 TAD I MASKPO CDF 0 ISZ MASKPO SPA JMP ENDE DCA I CARPOI ISZ CARPOI ISZ CARCNT JMP LOOP1 TAD CNTLEN DCA CARCNT TAD ADRPOI DCA CARPOI LOOP2, CLL TAD I CARPOI RAL ISZ CARPOI ISZ CARCNT JMP LOOP2 RAR TCHAR JMP START ENDE, MOSTSR CNTLEN, 0 CARCNT, 0 ADRPOI, CARADR CARPOI, 0 CARADR, 0;0;0;0 MASKLI, 0 /ANFANGSADRESSE DER LISTE IN FELD 1 MASKPO, 0 M260, 260