AS V1.42 Beta [Bld 283] - Source File 440Hz.asm - Page 1 - 5/12/2025 22:57:33 1/ 0 : CPU 6502 2/ 0 : PAGE 0 3/ 0 : 4/ 0 : =$1A80 PAD EQU $1A80 5/ 0 : =$1A81 PADD EQU $1A81 6/ 0 : 7/ 300 : ORG $0300 8/ 300 : A9 FF START LDA #$FF ; FF als Ausgang, für das Datenrichtungsregister 9/ 302 : 8D 81 1A STA PADD ; Direktionsregister PADD: "OUT" 10/ 305 : A9 FF M1 LDA #$FF ; FF als DATEN, für das Datenregister 11/ 307 : 8D 80 1A STA PAD ; PAD: "FF" (später "00") 12/ 30A : 20 18 03 JSR SUB ; JumpToSubRoutine Zeitverzögerung DELAY. 13/ 30D : A9 00 LDA #$00 ; als DATEN, für das Datenregister 14/ 30F : 8D 80 1A STA PAD ; PAD: "00" (später "FF") 15/ 312 : 20 18 03 JSR SUB ; JumpToSubRoutine Zeitverzögerung DELAY. 16/ 315 : 4C 05 03 JMP M1 17/ 318 : 18/ 318 : A0 01 SUB LDY #$01 ; SR Beginn SUBROUTINE 19/ 31A : A2 DE M2 LDX #$DE ; mit ZP-ADRESSIERUNGSART sind durch IM ersetzt. 20/ 31C : CA M3 DEX 21/ 31D : D0 FD BNE M3 22/ 31F : 88 DEY 23/ 320 : D0 F8 BNE M2 24/ 322 : 60 RTS ; RETURN FROM SUBROUTINE 25/ 323 : 26/ 323 : END AS V1.42 Beta [Bld 283] - Source File 440Hz.asm - Page 2 - 5/12/2025 22:57:33 Symbol Table (* = unused): -------------------------- *ARCHITECTURE : "i386-unknown-win32" - | *CASESENSITIVE : 0 - | *CONSTPI : 3.141592653589793 - | *DATE : "5/12/2025" - | *FALSE : 0 - | *FLOATMAX : 1.797693134866E308 - | *HAS64 : 1 - | *LISTON : 1 - | M1 : 305 C | M2 : 31A C | M3 : 31C C | *MACEXP : 7 - | *MOMCPU : 6502 - | *MOMCPUNAME : "6502" - | *NESTMAX : 100 - | PAD : 1A80 - | PADD : 1A81 - | *RELAXED : 0 - | *START : 300 C | SUB : 318 C | *TIME : "22:57:33" - | *TRUE : 1 - | *VERSION : 142F - | 23 symbols 17 unused symbols AS V1.42 Beta [Bld 283] - Source File 440Hz.asm - Page 3 - 5/12/2025 22:57:33 Code Pages: ---------- STANDARD (0 changed characters) 1 code page 0.03 seconds assembly time 26 lines source file 2 passes 0 errors 0 warnings