341 0232 A.Txt
341 0232 A.Txt
| Filename | 341-0232-A.txt |
|---|---|
| Size | 0.04 MB |
| Subsection | apple / M0330_IIgs |
| Downloads | 2 |
Contents
;
; Date: Sat May 02 09:40:17 2020
;
; CPU: Intel 8048 (MCS-48 family)
;
;
;
org 00000H
;
0000 L0000:
0000 : E5 " " sel mb0
0001 : 04 0B " " jmp L000B
;
0003 : E5 " " sel mb0
0004 : 00 " " nop
0005 : 04 00 " " jmp L0000
;
0007 : E5 " " sel mb0
0008 : 04 00 " " jmp L0000
000A L000A:
000A : 93 " " retr
;
000B L000B:
000B : 23 7F "# " mov a,#07FH
000D : 3A ":" outl p2,a
000E : 15 " " dis i
000F : 35 "5" dis tcnti
0010 : 65 "e" stop tcnt
0011 : A5 " " clr f1
0012 : 14 0A " " call L000A
0014 : 89 FF " " orl p1,#0FFH
0016 : 27 "'" clr a
0017 : D7 " " mov psw,a
0018 : 62 "b" mov t,a
0019 : B8 3F " ?" mov r0,#03FH
001B L001B:
001B : A0 " " mov @r0,a
001C : E8 1B " " djnz r0,L001B
001E : D5 " " sel rb1
001F : BE 22 " "" mov r6,#022H
0021 : BD 01 " " mov r5,#001H
0023 L0023:
0023 : C5 " " sel rb0
0024 : 23 FF "# " mov a,#0FFH
0026 L0026:
0026 : B8 3F " ?" mov r0,#03FH
0028 : B9 17 " " mov r1,#017H
002A L002A:
002A : A0 " " mov @r0,a
002B : C8 " " dec r0
002C : E9 2A " *" djnz r1,L002A
002E : 18 " " inc r0
002F : 90 " " movx @r0,a
0030 : AC " " mov r4,a
0031 : BA 01 " " mov r2,#001H
0033 : BF 00 " " mov r7,#000H
0035 : A5 " " clr f1
0036 : B5 " " cpl f1
0037 : D5 " " sel rb1
0038 : BA 00 " " mov r2,#000H
003A : FF " " mo…
Showing first 3,000 characters of 46,608 total. Open the full document →