17
List 3 (Continued)
LINE LOC OBJ SOURCE
69 A * If MSB/LSB–first bit = 1 go to MSB
70 A F849 39 RETURN RTS
71 A *
72 A * S’routine stores MSByte in even address
73 A * LSByte in odd address
74 A * Channel 0 result in $30 and $31
75 A * Channel 1 result in $32 and $33 etc.
76 A * (Reserve addresses $30–$4B for results
77 A * of all channels)
78 A F84A A603 STORE LDAA PORTC,X
79 A F84C CE0030 LDX #$30
80 A F84F 97F2 STAA TEMP
81 A F851 86F0 LDAA #$F0
82 A F853 94F2 ANDA TEMP
83 A F855 46 RORA
84 A F856 46 RORA
85 A F857 46 RORA
86 A F858 46 RORA
87 A F859 16 TAB
88 A F85A 8602 LDAA #$02
89 A F85C 3D MUL
90 A F85D DDF2 STD TEMP
91 A F85F 96F0 LDAA MSBYTE
92 A F861 A7F2 STAA TEMP,X
93 A F863 08 INX
94 A F864 96F1 LDAA LSBYTE
95 A F866 A7F2 STAA TEMP,X
95 A F866 A7F2 STAA TEMP,X
96 A F868 39 RTS
97 A END
Comentários a estes Manuais