341 0124 A 8048HC610.Txt
341 0124 A 8048HC610.Txt
| Filename | 341-0124-A_8048HC610.txt |
|---|---|
| Size | 0.04 MB |
| Subsection | apple / M0330_IIgs |
| Downloads | 3 |
Contents
; Date: Sat May 02 09:40:05 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 : 36 27 "6'" jt0 L0027
0023 : BD 01 " " mov r5,#001H
0025 : 04 29 " )" jmp L0029
;
0027 L0027:
0027 : BD 04 " " mov r5,#004H
0029 L0029:
0029 : C5 " " sel rb0
002A : 23 FF "# " mov a,#0FFH
002C : B8 3F " ?" mov r0,#03FH
002E : B9 17 " " mov r1,#017H
0030 L0030:
0030 : A0 " " mov @r0,a
0031 : C8 " " dec r0
0032 : E9 30 " 0" djnz r1,L0030
0034 : 18 " " inc r0
0035 : 90 " " movx @r0,a
0036 : AC " " mov r4,a
0037 : BA 01 " " mov r2,#001H
0039 : BF 00 " " mov r7,#000H
003B : A5 " " clr f1
003C : B5 " " …
Showing first 3,000 characters of 46,307 total. Open the full document →