Apple Getting Started With Type
| Filename | Apple_Getting_started_with_type.pdf |
|---|---|
| Size | 3.41 MB |
| Subsection | apple |
| Downloads | 1 |
Showing first 3,000 characters of 207,823 total. Open the full document →
| Filename | Apple_Getting_started_with_type.pdf |
|---|---|
| Size | 3.41 MB |
| Subsection | apple |
| Downloads | 1 |
Showing first 3,000 characters of 207,823 total. Open the full document →
| Filename | Apple_Guide_Complete_1995.pdf |
|---|---|
| Size | 21.41 MB |
| Year | 1995 |
| Subsection | apple |
| Downloads | 1 |
Showing first 3,000 characters of 1,312,086 total. Open the full document →
| Filename | Apple_manual_reminder_1991_030-1747-A.pdf-ebook.pdf |
|---|---|
| Size | 0.37 MB |
| Year | 1991 |
| Subsection | apple |
| Downloads | 1 |
Showing first 3,000 characters of 5,594 total. Open the full document →
| Filename | 341-0124-A_8048HC610.txt |
|---|---|
| Size | 0.04 MB |
| Subsection | apple / M0330_IIgs |
| Downloads | 8 |
; 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 " " cpl f1
003D : D5 " " sel rb1
003E : BA 00 " " mov r2,#000H
0040 : FF " " mov a,r7
0041 : 53 FD "S " anl a,#0FDH
0043 : AF " " mov r7,a
0044 L0044:
0044 : 25 "%" en tcnti
0045 : 45 "E" strt cnt
0046 : C5 " " sel rb0
0047 : 1D " " inc r5
0048 : 56 51 "VQ" jt1 L0051
004A : 76 52 "vR" jf1 L0052
004C : 42 "B" mov a,t
004D : 96 53 " S" jnz L0053
004F : 04 E9 " " jmp L00E9
;
0051 L0051:
0051 : A5 " " clr f1
0052 L0052:
0052 : B5 " " cpl f1
0053 L0053:
0053 : 27 "'" clr a
0054 : 62 "b" mov t,a
0055 : FC " " mov a,r4
0056 : 37 "7" cpl a
0057 : C6 5B " [" jz L005B
0059 : 44 2C "D," jmp L022C
;
005B L005B:
005B : EA 69 " i" djnz r2,L0069
005D : BA 58 " X" mov r2,#058H
005F : B9 3F " ?" mov r1,#03FH
0061 : BB 01 " " mov r3,#001H
0063 : 04 70 " p" jmp L0070
;
0065 L0065:
0065 : C9 " " dec r1
0066 : C9 " " dec r1
0067 : 04 70 " p" jmp L0070
;
0069 L0069:
0069 : FB " " mov a,r3
006A : C6 00 " " jz L0000
006C : E7 " " rl a
006D : AB " " mov r3,a
006E : 12 65 " e" jb0 L0065
0070 L0070:
0070 : 23 FF "# " mov a,#0FFH
0072 : 90 " " movx @r0,a
0073 : F9 " " mov a,r1
0074 : 77 "w" rr a
0075 : 53 0F "S " anl a,#00FH
0077 : 03 7A " z" add a,#07AH
0079 : B3 " " jmpp @a ;INFO: indirect jump
;
007A : 00 " " nop
007B : 00 " " nop
007C : 00 " " nop
007D : 00 " " nop
007E : 00 " " nop
007F : B1 AD " " mov @r1,#0ADH
0081 : A9 " " mov r1,a
0082 : A5 " " clr f1
0083 : A1 " " mov @r1,a
0084 : 9D " " anld p5,a
0085 : 99 95 " " anl p1,#095H
0087 : 91 " " movx @r1,a
0088 : 8D " " orld p5,a
0089 : B5 " " cpl f1
008A : 00 " " nop
008B : 04 00 " " jmp L0000
;
008D : 99 FE " " anl p1,#0FEH
008F : 04 C2 " " jmp L00C2
;
0091 : 99 FD " " anl p1,#0FDH
0093 : 04 C2 " " jmp L00C2
;
0095 : 99 FB " " anl p1,#0FBH
0097 : 04 C2 " " jmp L00C2
;
0099 : 99 F7 " " anl p1,#0F7H
009B : 04 C2 " " jmp L00C2
;
009D : 99 EF " " anl p1,#0EFH
009F : 04 C2 " " jmp L00C2
;
00A1 : 99 DF " " anl p1,#0DFH
00A3 : 04 C2 " " jmp L00C2
;
00A5 : 99 BF " " anl p1,#0BFH
00A7 : 04 C2 " " jmp L00C2
;
00A9 : 99 7F " " anl p1,#07FH
00AB : 04 C2 " " jmp L00C2
;
00AD : 9A FE " " anl p2,#0FEH
00AF : 04 C2 " " jmp L00C2
;
00B1 : 9A FD " " anl p2,#0FDH
00B3 : 04 C2 " " jmp L00C2
;
00B5 : FB " " mov a,r3
00B6 : F2 BB " " jb7 L00BB
00B8 : 0A " " in a,p2
00B9 : 04 C7 " " jmp L00C7
;
00BB L00BB:
00BB : 27 "'" clr a
00BC : 86 C7 " " jni L00C7
00BE : 23 FF "# " mov a,#0FFH
00C0 : 04 C7 " " jmp L00C7
;
00C2 L00C2:
00C2 : 08 " " ins a,bus
00C3 : 8A 7F " " orl p2,#07FH
00C5 : 89 FF " " orl p1,#0FFH
00C7 L00C7:
00C7 : AC " " mov r4,a
00C8 : C9 " " dec r1
00C9 : D1 " " xrl a,@r1
00CA : 5B "[" anl a,r3
00CB : C6 D5 " " jz L00D5
00CD : FB " " mov a,r3
00CE : D1 " " xrl a,@r1
00CF : A1 " " mov @r1,a
00D0 : 19 " " inc r1
00D1 L00D1:
00D1 : BC FF " " mov r4,#0FFH
00D3 L00D3:
00D3 : 04 44 " D" jmp L0044
;
00D5 L00D5:
00D5 : 19 " " inc r1
00D6 : FC " " mov a,r4
00D7 : D1 " " xrl a,@r1
00D8 : 5B "[" anl a,r3
00D9 : C6 D1 " " jz L00D1
00DB : FA " " mov a,r2
00DC : 03 99 " " add a,#099H
00DE : E3 " " movp3 a,@a
00DF : 2C "," xch a,r4
00E0 : 5B "[" anl a,r3
00E1 : C6 D3 " " jz L00D3
00E3 : FC " " mov a,r4
00E4 : 43 80 "C " orl a,#080H
00E6 : AC " " mov r4,a
00E7 : 04 44 " D" jmp L0044
;
00E9 L00E9:
00E9 : D5 " " sel rb1
00EA : B9 52 " R" mov r1,#052H
00EC L00EC:
00EC : 56 F9 "V " jt1 L00F9
00EE : E9 EC " " djnz r1,L00EC
00F0 : B9 88 " " mov r1,#088H
00F2 L00F2:
00F2 : 56 F9 "V " jt1 L00F9
00F4 : E9 F2 " " djnz r1,L00F2
00F6 : 00 " " nop
00F7 : 04 00 " " jmp L0000
;
00F9 L00F9:
00F9 : BC F0 " " mov r4,#0F0H
00FB : 85 " " clr f0
00FC : FE " " mov a,r6
00FD : 47 "G" swap a
00FE : AB " " mov r3,a
00FF : 5F "_" anl a,r7
0100 : 37 "7" cpl a
0101 : 32 04 "2 " jb1 L0104
0103 : 95 " " cpl f0
0104 L0104:
0104 : B9 09 " " mov r1,#009H
0106 : B8 01 " " mov r0,#001H
0108 : 74 26 "t&" call L0326
010A : DB " " xrl a,r3
010B : 5C "\" anl a,r4
010C : C6 1C " " jz L011C
010E : B6 12 " " jf0 L0112
0110 : 04 44 " D" jmp L0044
;
0112 L0112:
0112 : 8A 80 " " orl p2,#080H
0114 : B9 1C " " mov r1,#01CH
0116 L0116:
0116 : E9 16 " " djnz r1,L0116
0118 : 9A 7F " " anl p2,#07FH
011A : 04 44 " D" jmp L0044
;
011C L011C:
011C : B9 23 " #" mov r1,#023H
011E L011E:
011E : 56 24 "V$" jt1 L0124
0120 : E9 1E " " djnz r1,L011E
0122 : 44 DB "D " jmp L02DB
;
0124 L0124:
0124 : 27 "'" clr a
0125 : 62 "b" mov t,a
0126 : FB " " mov a,r3
0127 : 53 0F "S " anl a,#00FH
0129 : 03 2C " ," add a,#02CH
012B : B3 " " jmpp @a ;INFO: indirect jump
;
012C : 3C "<" movd p4,a
012D : 67 "g" rrc a
012E : 58 "X" anl a,r0
012F : 58 "X" anl a,r0
0130 : 58 "X" anl a,r0
0131 : 58 "X" anl a,r0
0132 : 58 "X" anl a,r0
0133 : 58 "X" anl a,r0
0134 : 58 "X" anl a,r0
0135 : 58 "X" anl a,r0
0136 : 58 "X" anl a,r0
0137 : 3F "?" movd p7,a
0138 : DB " " xrl a,r3
0139 : 58 "X" anl a,r0
013A : A1 " " mov @r1,a
;
013B : 87 " " db 087H
;
013C : 00 " " nop
013D : 04 00 " " jmp L0000
;
013F : 27 "'" clr a
0140 : AC " " mov r4,a
0141 : AB " " mov r3,a
0142 : B9 1A " " mov r1,#01AH
0144 L0144:
0144 : 46 4A "FJ" jnt1 L014A
0146 : E9 44 " D" djnz r1,L0144
0148 : 44 DB "D " jmp L02DB
;
014A L014A:
014A : B9 09 " " mov r1,#009H
014C : B8 02 " " mov r0,#002H
014E : 74 03 "t " call L0303
0150 : AC " " mov r4,a
0151 : FB " " mov a,r3
0152 : 96 5A " Z" jnz L015A
0154 : FC " " mov a,r4
0155 : 53 2F "S/" anl a,#02FH
0157 : AE " " mov r6,a
0158 L0158:
0158 : 04 44 " D" jmp L0044
;
015A L015A:
015A : D3 01 " " xrl a,#001H
015C : C6 7A " z" jz L017A
015E : D3 05 " " xrl a,#005H
0160 : C6 7A " z" jz L017A
0162 : FB " " mov a,r3
0163 : D3 FF " " xrl a,#0FFH
0165 : 96 69 " i" jnz L0169
0167 : 04 29 " )" jmp L0029
;
0169 L0169:
0169 : D3 02 " " xrl a,#002H
016B : 96 7E " ~" jnz L017E
016D : 0A " " in a,p2
016E : 72 58 "rX" jb3 L0158
0170 L0170:
0170 : FC " " mov a,r4
0171 : 53 0F "S " anl a,#00FH
0173 : 2E "." xch a,r6
0174 : 53 20 "S " anl a,#020H
0176 : 4E "N" orl a,r6
0177 : AE " " mov r6,a
0178 : 04 44 " D" jmp L0044
;
017A L017A:
017A : FB " " mov a,r3
017B : AD " " mov r5,a
017C : 04 44 " D" jmp L0044
;
017E L017E:
017E : D3 03 " " xrl a,#003H
0180 : 96 58 " X" jnz L0158
0182 : FF " " mov a,r7
0183 : 52 58 "RX" jb2 L0158
0185 : 24 70 "$p" jmp L0170
;
0187 : FE " " mov a,r6
0188 : 53 F0 "S " anl a,#0F0H
018A : AC " " mov r4,a
018B : C5 " " sel rb0
018C : FD " " mov a,r5
018D : D5 " " sel rb1
018E : 53 0F "S " anl a,#00FH
0190 : 4C "L" orl a,r4
0191 : AC " " mov r4,a
0192 : 0A " " in a,p2
0193 : 53 10 "S " anl a,#010H
0195 : E7 " " rl a
0196 : E7 " " rl a
0197 : 4C "L" orl a,r4
0198 : AC " " mov r4,a
0199 : FD " " mov a,r5
019A : AB " " mov r3,a
019B : B9 08 " " mov r1,#008H
019D : 54 63 "Tc" call L0263
019F : 04 44 " D" jmp L0044
;
01A1 : 0A " " in a,p2
01A2 : 77 "w" rr a
01A3 : 77 "w" rr a
01A4 : AC " " mov r4,a
01A5 : 53 0F "S " anl a,#00FH
01A7 : 03 C8 " " add a,#0C8H
01A9 : A3 " " movp a,@a
01AA : 86 AE " " jni L01AE
01AC : 43 20 "C " orl a,#020H
01AE L01AE:
01AE : 2C "," xch a,r4
01AF : 92 B5 " " jb4 L01B5
01B1 : 23 FB "# " mov a,#0FBH
01B3 : 5C "\" anl a,r4
01B4 : AC " " mov r4,a
01B5 L01B5:
01B5 : 99 7F " " anl p1,#07FH
01B7 : 08 " " ins a,bus
01B8 : 89 FF " " orl p1,#0FFH
01BA : 72 C0 "r " jb3 L01C0
01BC : 23 BF "# " mov a,#0BFH
01BE : 5C "\" anl a,r4
01BF : AC " " mov r4,a
01C0 L01C0:
01C0 : BB 00 " " mov r3,#000H
01C2 : B9 02 " " mov r1,#002H
01C4 : 54 63 "Tc" call L0263
01C6 L01C6:
01C6 : 04 44 " D" jmp L0044
01C8 : C4 C6 " " jmp L06C6
;
01CA : C5 " " sel rb0
01CB : C7 …
Showing first 20,000 characters of 46,307 total. Open the full document →
| Filename | 341-0232-A.txt |
|---|---|
| Size | 0.04 MB |
| Subsection | apple / M0330_IIgs |
| Downloads | 8 |
;
; 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 " " mov a,r7
003B : 53 FD "S " anl a,#0FDH
003D : AF " " mov r7,a
003E L003E:
003E : 25 "%" en tcnti
003F : 45 "E" strt cnt
0040 : C5 " " sel rb0
0041 : 1D " " inc r5
0042 : 56 4B "VK" jt1 L004B
0044 : 76 4C "vL" jf1 L004C
0046 : 42 "B" mov a,t
0047 : 96 4D " M" jnz L004D
0049 : 04 E3 " " jmp L00E3
;
004B L004B:
004B : A5 " " clr f1
004C L004C:
004C : B5 " " cpl f1
004D L004D:
004D : 27 "'" clr a
004E : 62 "b" mov t,a
004F : FC " " mov a,r4
0050 : 37 "7" cpl a
0051 : C6 55 " U" jz L0055
0053 : 44 19 "D " jmp L0219
;
0055 L0055:
0055 : EA 63 " c" djnz r2,L0063
0057 : BA 58 " X" mov r2,#058H
0059 : B9 3F " ?" mov r1,#03FH
005B : BB 01 " " mov r3,#001H
005D : 04 6A " j" jmp L006A
;
005F L005F:
005F : C9 " " dec r1
0060 : C9 " " dec r1
0061 : 04 6A " j" jmp L006A
;
0063 L0063:
0063 : FB " " mov a,r3
0064 : C6 00 " " jz L0000
0066 : E7 " " rl a
0067 : AB " " mov r3,a
0068 : 12 5F " _" jb0 L005F
006A L006A:
006A : 23 FF "# " mov a,#0FFH
006C : 90 " " movx @r0,a
006D : F9 " " mov a,r1
006E : 77 "w" rr a
006F : 53 0F "S " anl a,#00FH
0071 : 03 74 " t" add a,#074H
0073 : B3 " " jmpp @a ;INFO: indirect jump
;
0074 : 00 " " nop
0075 : 00 " " nop
0076 : 00 " " nop
0077 : 00 " " nop
0078 : 00 " " nop
0079 : AB " " mov r3,a
007A : A7 " " cpl c
007B : A3 " " movp a,@a
007C : 9F " " anld p7,a
;
007D : 9B " " db 09BH
;
007E : 97 " " clr c
007F : 93 " " retr
;
0080 : 8F " " orld p7,a
;
0081 : 8B 87 " " db 08BH, 087H
;
0083 : AF " " mov r7,a
0084 : 00 " " nop
0085 : 04 00 " " jmp L0000
;
0087 : 99 FE " " anl p1,#0FEH
0089 : 04 BC " " jmp L00BC
;
008B : 99 FD " " anl p1,#0FDH
008D : 04 BC " " jmp L00BC
;
008F : 99 FB " " anl p1,#0FBH
0091 : 04 BC " " jmp L00BC
;
0093 : 99 F7 " " anl p1,#0F7H
0095 : 04 BC " " jmp L00BC
;
0097 : 99 EF " " anl p1,#0EFH
0099 : 04 BC " " jmp L00BC
;
009B : 99 DF " " anl p1,#0DFH
009D : 04 BC " " jmp L00BC
;
009F : 99 BF " " anl p1,#0BFH
00A1 : 04 BC " " jmp L00BC
;
00A3 : 99 7F " " anl p1,#07FH
00A5 : 04 BC " " jmp L00BC
;
00A7 : 9A FE " " anl p2,#0FEH
00A9 : 04 BC " " jmp L00BC
;
00AB : 9A FD " " anl p2,#0FDH
00AD : 04 BC " " jmp L00BC
;
00AF : FB " " mov a,r3
00B0 : F2 B5 " " jb7 L00B5
00B2 : 0A " " in a,p2
00B3 : 04 C1 " " jmp L00C1
;
00B5 L00B5:
00B5 : 27 "'" clr a
00B6 : 86 C1 " " jni L00C1
00B8 : 23 FF "# " mov a,#0FFH
00BA : 04 C1 " " jmp L00C1
;
00BC L00BC:
00BC : 08 " " ins a,bus
00BD : 8A 7F " " orl p2,#07FH
00BF : 89 FF " " orl p1,#0FFH
00C1 L00C1:
00C1 : AC " " mov r4,a
00C2 : C9 " " dec r1
00C3 : D1 " " xrl a,@r1
00C4 : 5B "[" anl a,r3
00C5 : C6 CF " " jz L00CF
00C7 : FB " " mov a,r3
00C8 : D1 " " xrl a,@r1
00C9 : A1 " " mov @r1,a
00CA : 19 " " inc r1
00CB L00CB:
00CB : BC FF " " mov r4,#0FFH
00CD L00CD:
00CD : 04 3E " >" jmp L003E
;
00CF L00CF:
00CF : 19 " " inc r1
00D0 : FC " " mov a,r4
00D1 : D1 " " xrl a,@r1
00D2 : 5B "[" anl a,r3
00D3 : C6 CB " " jz L00CB
00D5 : FA " " mov a,r2
00D6 : 03 99 " " add a,#099H
00D8 : E3 " " movp3 a,@a
00D9 : 2C "," xch a,r4
00DA : 5B "[" anl a,r3
00DB : C6 CD " " jz L00CD
00DD : FC " " mov a,r4
00DE : 43 80 "C " orl a,#080H
00E0 : AC " " mov r4,a
00E1 : 04 3E " >" jmp L003E
;
00E3 L00E3:
00E3 : D5 " " sel rb1
00E4 : B9 52 " R" mov r1,#052H
00E6 L00E6:
00E6 : 56 F3 "V " jt1 L00F3
00E8 : E9 E6 " " djnz r1,L00E6
00EA : B9 88 " " mov r1,#088H
00EC L00EC:
00EC : 56 F3 "V " jt1 L00F3
00EE : E9 EC " " djnz r1,L00EC
00F0 : 00 " " nop
00F1 : 04 00 " " jmp L0000
;
00F3 L00F3:
00F3 : BC F0 " " mov r4,#0F0H
00F5 : 85 " " clr f0
00F6 : FE " " mov a,r6
00F7 : 47 "G" swap a
00F8 : AB " " mov r3,a
00F9 : 5F "_" anl a,r7
00FA : 37 "7" cpl a
00FB : 32 FE "2 " jb1 L00FE
00FD : 95 " " cpl f0
00FE L00FE:
00FE : B9 09 " " mov r1,#009H
0100 : B8 01 " " mov r0,#001H
0102 : 74 26 "t&" call L0326
0104 : DB " " xrl a,r3
0105 : 5C "\" anl a,r4
0106 : C6 16 " " jz L0116
0108 : B6 0C " " jf0 L010C
010A : 04 3E " >" jmp L003E
;
010C L010C:
010C : 8A 80 " " orl p2,#080H
010E : B9 1C " " mov r1,#01CH
0110 L0110:
0110 : E9 10 " " djnz r1,L0110
0112 : 9A 7F " " anl p2,#07FH
0114 : 04 3E " >" jmp L003E
;
0116 L0116:
0116 : B9 23 " #" mov r1,#023H
0118 L0118:
0118 : 56 1E "V " jt1 L011E
011A : E9 18 " " djnz r1,L0118
011C : 04 3E " >" jmp L003E
;
011E L011E:
011E : 27 "'" clr a
011F : 62 "b" mov t,a
0120 : FB " " mov a,r3
0121 : 53 0F "S " anl a,#00FH
0123 : 03 26 " &" add a,#026H
0125 : B3 " " jmpp @a ;INFO: indirect jump
;
0126 : F0 " " mov a,@r0
0127 : 58 "X" anl a,r0
0128 : 52 52 "RR" jb2 L0152
012A : 52 52 "RR" jb2 L0152
012C : 52 52 "RR" jb2 L0152
012E : 52 52 "RR" jb2 L0152
0130 : 52 39 "R9" jb2 L0139
0132 : C8 " " dec r0
0133 : 52 8E "R " jb2 L018E
0135 : 74 00 "t " call L0300
0137 : 04 00 " " jmp L0000
;
0139 L0139:
0139 : 27 "'" clr a
013A : AC " " mov r4,a
013B : AB " " mov r3,a
013C : B9 1A " " mov r1,#01AH
013E L013E:
013E : 46 44 "FD" jnt1 L0144
0140 : E9 3E " >" djnz r1,L013E
0142 : 04 3E " >" jmp L003E
;
0144 L0144:
0144 : B9 09 " " mov r1,#009H
0146 : B8 02 " " mov r0,#002H
0148 : 74 03 "t " call L0303
014A : AC " " mov r4,a
014B : FB " " mov a,r3
014C : 96 54 " T" jnz L0154
014E : FC " " mov a,r4
014F : 53 2F "S/" anl a,#02FH
0151 : AE " " mov r6,a
0152 L0152:
0152 : 04 3E " >" jmp L003E
;
0154 L0154:
0154 : D3 FF " " xrl a,#0FFH
0156 : 96 5A " Z" jnz L015A
0158 : 04 23 " #" jmp L0023
;
015A L015A:
015A : D3 02 " " xrl a,#002H
015C : 96 6B " k" jnz L016B
015E : 0A " " in a,p2
015F : 72 52 "rR" jb3 L0152
0161 L0161:
0161 : FC " " mov a,r4
0162 : 53 0F "S " anl a,#00FH
0164 : 2E "." xch a,r6
0165 : 53 20 "S " anl a,#020H
0167 : 4E "N" orl a,r6
0168 : AE " " mov r6,a
0169 : 04 3E " >" jmp L003E
;
016B L016B:
016B : D3 03 " " xrl a,#003H
016D : 96 52 " R" jnz L0152
016F : FF " " mov a,r7
0170 : 52 52 "RR" jb2 L0152
0172 : 24 61 "$a" jmp L0161
;
0174 : FE " " mov a,r6
0175 : 53 F0 "S " anl a,#0F0H
0177 : AC " " mov r4,a
0178 : C5 " " sel rb0
0179 : FD " " mov a,r5
017A : D5 " " sel rb1
017B : 53 0F "S " anl a,#00FH
017D : 4C "L" orl a,r4
017E : AC " " mov r4,a
017F : 0A " " in a,p2
0180 : 53 10 "S " anl a,#010H
0182 : E7 " " rl a
0183 : E7 " " rl a
0184 : 4C "L" orl a,r4
0185 : AC " " mov r4,a
0186 : FD " " mov a,r5
0187 : AB " " mov r3,a
0188 : B9 08 " " mov r1,#008H
018A : 54 50 "TP" call L0250
018C : 04 3E " >" jmp L003E
;
018E L018E:
018E : 0A " " in a,p2
018F : 77 "w" rr a
0190 : 77 "w" rr a
0191 : AC " " mov r4,a
0192 : 53 0F "S " anl a,#00FH
0194 : 03 B5 " " add a,#0B5H
0196 : A3 " " movp a,@a
0197 : 86 9B " " jni L019B
0199 : 43 20 "C " orl a,#020H
019B L019B:
019B : 2C "," xch a,r4
019C : 92 A2 " " jb4 L01A2
019E : 23 FB "# " mov a,#0FBH
01A0 : 5C "\" anl a,r4
01A1 : AC " " mov r4,a
01A2 L01A2:
01A2 : 99 7F " " anl p1,#07FH
01A4 : 08 " " ins a,bus
01A5 : 89 FF " " orl p1,#0FFH
01A7 : 72 AD "r " jb3 L01AD
01A9 : 23 BF "# " mov a,#0BFH
01AB : 5C "\" anl a,r4
01AC : AC " " mov r4,a
01AD L01AD:
01AD : BB 00 " " mov r3,#000H
01AF : B9 02 " " mov r1,#002H
01B1 : 54 50 "TP" call L0250
01B3 L01B3:
01B3 : 04 3E " >" jmp L003E
01B5 : C4 C6 " " jmp L06C6
;
01B7 : C5 " " sel rb0
01B8 : C7 " " mov a,psw
01B9 : D4 D6 " " call L06D6
01BB : D5 " " sel rb1
01BC : D7 " " mov psw,a
01BD : CC " " dec r4
01BE : CE " " dec r6
01BF : CD " " dec r5
01C0 : CF " " dec r7
01C1 : DC " " xrl a,r4
01C2 : DE " " xrl a,r6
01C3 : DD " " xrl a,r5
01C4 : DF " " xrl a,r7
01C5 : 00 " " nop
01C6 : 04 00 " " jmp L0000
;
01C8 : FF " " mov a,r7
01C9…
Showing first 20,000 characters of 46,608 total. Open the full document →
| Filename | 690-5217-A_f.jpg |
|---|---|
| Size | 0.05 MB |
| Subsection | apple / Zorro_Coax-Twinax_Card / MacDFT |
| Downloads | 5 |
| Filename | 4.JPG |
|---|---|
| Size | 0.73 MB |
| Subsection | apple / Zorro_Coax-Twinax_Card / 630-4180_pcb |
| Downloads | 8 |
| Filename | PCB_Taiwan.JPG |
|---|---|
| Size | 0.92 MB |
| Subsection | apple / G5431 |
| Downloads | 3 |
| Filename | SNAps_Print_Application.dc42 |
|---|---|
| Size | 0.80 MB |
| Subsection | apple / Zorro_Coax-Twinax_Card / SNAps |
| Downloads | 1 |
This is a Disk Copy 4.2 image — a binary artifact that can't be previewed in the browser. Mount with Mini vMac, SheepShaver, or an equivalent Classic Mac emulator.
| Filename | ApplPrimaryInit.a |
|---|---|
| Size | 0.01 MB |
| Subsection | apple / Zorro_Coax-Twinax_Card / diag |
| Downloads | 4 |
;===================================================================================
;
; File: ApplPrimaryInit.a
;
; Entry: VendorPI
;
; Function: Zorro initialization code
; {
; for (count = loopcount; ((count >0) && (bcpTestState != DONE)); count--) {};
; if ((bcpTestState != DONE) || (bcpTestErr))
; error();
; stop_bcp();
; Test 8344 Data RAM locations 0x0000-0x3FFF with patterns FF, AA, 55, and 00;
; Test 8344 address lines;
; }
;
; Input: D0 = Current current test state
; A2 = slot address
; A3 = ptr to Slot Manager parameter block
;
; Output: D1 = PASS or FAIL
; ($138) = 32 bit failure code if D1 == FAIL
;
; Update: D0, A2, A3 preserved
;
; History: 12/03/87: initial version
;
;===================================================================================
EJECT
;bcpRIC equ $420001 ; 8344 remote interface configuration register
;bcpPC equ $400001 ; Dummy address for writing to 8344 PC
;bcpDRAM equ $400001 ; 8344 Data RAM address base
;bcpDMEnd equ $4000 * 2 + bcpDRAM ; Last data memory + 1
;RIC_DRAM equ $30 ; Select 8344 Data RAM
;PASS equ 0
;FAIL equ -1
VendorPI:
move.l D0, -(sp) ; save test state
move.l A2, -(sp) ; save slot address
move.l A3, -(sp) ; save Slot Mgr Parameter block ptr
move.l D0, $150(A2)
move.l D1, $154(A2)
move.l D2, $158(A2)
move.l D3, $15C(A2)
move.l A0, $160(A2)
move.l A1, $164(A2)
move.l A2, $168(A2)
move.l A3, $16C(A2)
;
; - Test 8344 Data RAM
;
movea.l #bcpDRAM, A4 ; point to location 0000 of data memory
adda.l A2, A4 ; add slot address
movea.l #bcpDMEnd, A3 ; ending location
adda.l A2, A3 ; add slot address
jsr zi_RAM ; test interface area (0x0000 - 0x3FFF)
bne.s zi_err ; skip if error
move.l #PASS, D1 ; no error
bra.s zi_rtn ; exit
;---------------------------------------
; - Error exit
;---------------------------------------
zi_err:
move.l #FAIL, D1 ; test failed
;---------------------------------------
; - Exit
;---------------------------------------
zi_rtn:
move.l D0, $170(A2)
move.l D1, $174(A2)
move.l D2, $178(A2)
move.l D3, $17C(A2)
move.l A0, $180(A2)
move.l A1, $184(A2)
move.l A2, $188(A2)
move.l A3, $18C(A2)
move.l (sp)+, A3 ; restore Slot Mgr Parameter block ptr
move.l (sp)+, A2 ; restore slot address
move.l (sp)+, D0 ; restore test state
move.l D0, $190(A2)
move.l D1, $194(A2)
move.l D2, $198(A2)
move.l D3, $19C(A2)
move.l A0, $1A0(A2)
move.l A1, $1A4(A2)
move.l A2, $1A8(A2)
move.l A3, $1AC(A2)
rts
EJECT
;===================================================================================
;
; Name: zi_RAM
;
; Function: Test 8344 Data Memory
;
; Input: A4 = starting RAM address
; A3 = ending RAM address + 1
; A2 = slot address
;
; Output: Z flag set => no error
; Z flag clear => error (D1 = data written; D2 = data read back;
; A4 = failed address)
;
; Update: None
;
; History: 12/03/87: initial version
;
;===================================================================================
zi_RAM:
movea.l #bcpRIC, A1 ; address of 8344 RIC
adda.l A2, A1 ; NuBus address
move.l A4, D3 ; save starting location
moveq #RIC_DRAM, D0 ; select Data memory
move.b D0, (A1) ;
move.b #$FF,D1 ; data pattern
@1:
move.b D1, (A4) ; write to memory
cmp.b (A4), D1 ; read it back check
bne.s @90 ; jump if errror
addq.l #2, A4 ; addr.ptr++
cmp.l A3, A4 ; check if reached end
bne.s @1
movea.l D3, A4 ; reset pointer to where it started
moveq #$55,D1 ; data pattern
@2:
move.b D1, (A4) ; write to memory
cmp.b (A4), D1 ; read it back check
bne.s @90 ; jump if errror
addq.l #2, A4 ; addr.ptr++
cmp.l A3, A4 ; check if reached end
bne.s @2
movea.l D3, A4 ; reset pointer to where it started
move.b #$AA,D1 ; data pattern
@3:
move.b D1, (A4) ; write to memory
cmp.b (A4), D1 ; read it back check
bne.s @90 ; jump if errror
addq.l #2, A4 ; addr.ptr++
cmp.l A3, A4 ; check if reached end
bne.s @3
movea.l D3, A4 ; reset pointer to where it started
moveq #$00,D1 ; data pattern
@4:
move.b D1, (A4) ; write to memory
cmp.b (A4), D1 ; read it back check
bne.s @90 ; jump if errror
addq.l #2, A4 ; addr.ptr++
cmp.l A3, A4 ; check if reached end
bne.s @4
rts ; good return
@90:
move.b (A4), D2 ; D2 = data read back
move.b #1, D3 ; insure Z = 0
rts ; return
;===================================================================================
; Entry: (Status indicator routines)
;
; Function:
; When execution of primary init begins, ShowInProgress (which could turn on all LEDs)
; is called, indicating that the test is in progress. if primary init crashes
; it will then be evident that testing did not complete. If any tests fail,
; the routine ShowFail is called (perhaps to leave on a red LED), and if all
; self-tests pass, the routine ShowPass is called (perhaps to leave on a red LED).
; ShowOff is called to turn off all indicator status.
;
; Remember that the following routines are executed across NuBus, and therefore
; 32 bit NuBus addressing must be used.
;===================================================================================
ShowInProgress: ;turn on red & green LED or do whatever to indicate test running
;Reg A2 contains the 32 bit base address of the card
move.l d1, -(sp) ;save & restore any registers changed
move.l #$600001, d1 ;currently defined Zorro LED control register
move.b #$3, (a2, d1.l) ;write to LED control register (turn on red & green)
move.l (sp)+, d1
rts
ShowPass: ;turn on green LED or do whatever to indicate good status
;Reg A2 contains the 32 bit base address of the card
move.l d1, -(sp) ;save & restore any registers changed
move.l #$600001, d1 ;currently defined Zorro LED control register
move.b #$1, (a2, d1.l) ;write to LED control register (turn on green only)
move.l (sp)+, d1
rts
ShowFail: ;turn on red LED
;Reg A2 contains the 32 bit base address of the card
move.l d1, -(sp) ;save & restore any registers changed
move.l #$600001, d1 ;currently defined Zorro LED control register
move.b #$2, (a2, d1.l) ;write to LED control register (turn on red only)
move.l (sp)+, d1
rts
ShowOff: ;turn off green & red LED
;Reg A2 contains the 32 bit base address of the card
move.l d1, -(sp) ;save & restore any registers changed
move.l #$600001, d1 ;currently defined Zorro LED control register
move.b #$0, (a2, d1.l) ;write to LED control register (turn off green & red)
move.l (sp)+, d1
rts
EJECT