📄 calc.lst
字号:
+ 00050 0050 SignT
+ 0004F 004F SignAns
+ 00052 0052 BufferTan
+
+Area Addr Size Decimal Bytes (Attributes)
+------------------------------- ----- ---- ------- ----- ------------
+Tan_code 0DF10 191A = 6426. bytes (CODE,REL,CON)
+
+ Phy. Value Global
+ ----- ----- --------------------------------
+ 0EA24 EA24 Chk1
+ 0E770 E770 GetData1
+ 0E76B E76B Tan90
+ 0E73D E73D Tan45
+ 0E827 E827 CheckQuadrandtal
+ 0EAB7 EAB7 GetXX
+ 0E7B9 E7B9 GetData
+ 0E27D E27D Tan
+ 0E07F E07F Cos
+ 0EB0C EB0C Pdata
+ 0DF10 DF10 Sin
+ 0EA1C EA1C InputErr
+ 0EE33 EE33 Ln
+ 0E758 E758 Tan180
+ 0E76B E76B Tan270
+ 0E758 E758 Tan360
+ 0ECB3 ECB3 Ex
+
+Area Addr Size Decimal Bytes (Attributes)
+------------------------------- ----- ---- ------- ----- ------------
+Keyscan 0F82A 01F9 = 505. bytes (CODE,REL,CON)
+
+ Phy. Value Global
+ ----- ----- --------------------------------
+ 0F82A F82A .KeyScan
+
+Area Addr Size Decimal Bytes (Attributes)
+------------------------------- ----- ---- ------- ----- ------------
+ICETrapCode 0FC00 0400 = 1024. bytes (CODE,ABS,CON)
+
+Files Linked [ module(s) ]
+
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\base.obj [ base.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\basensyntax.obj [ basensyntax.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\baseposfix.obj [ baseposfix.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\BcdHex.obj [ BcdHex.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\calcedit.obj [ calcedit.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\calcmain.obj [ calcmain.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\caldisp.obj [ caldisp.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\fract.obj [ fract.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\getkeycode.obj [ getkeycode.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\hyperbolic.obj [ hyperbolic.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\memtools.obj [ memtools.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\Mod.obj [ Mod.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\oppotriangle_0225.obj [ oppotriangle_022 ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\POSTFIX.obj [ POSTFIX.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\TEST.obj [ TEST.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\calculate.obj [ calculate.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\postfixValume.obj [ postfixValume.as ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\sat.obj [ sat.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\storedata.obj [ storedata.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\Cal_Lcd.obj [ Cal_Lcd.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\syntax.obj [ syntax.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\calctools.obj [ calctools.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\trigonom.obj [ trigonom.asm ]
+E:\KingB\sci_82tl\sci_82tl\SciCalculator_0528\keyscan.obj [ keyscan.asm ]
+
+User Global Definitions
+
+SP_INIT=0x7F
+
+###########################################################
+### e:\kingb\sci_82tl\sci_82tl\scicalculator_0528\base.asl ###
+###########################################################
0008 1 HEX_DIGITS equ 8
000A 2 BIN_DIGITS equ 10
000A 3 OCT_DIGITS equ 10
+ 4
+ 5
+ 6 .area base_code(code,rel)
+ 7 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+ 8 ;
+ 9 ; Public functions
+ 10 ;
+ 11 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+ 12
+ 13 ;Base-10 -> Base-2
+ 14 ;Input:OperandX (Dec)
+ 15 ;Output:OperandZ (Bin)
+B 00 01
0C3A 16 Base_Dec2Bin::
0C3A F5 10 17 lda0 SignX
0C3C F9 34 18 sta0 SignTmp
0C3E DB 00 19 ora #0
0C40 06 0C 90 20 brz 1$
0C43 F3 00 21 lda #0
0C45 F9 10 22 sta0 SignX
0C47 20 D8 DB 23 call .X_trans_R
0C4A 20 D6 1E 24 call .ClrY
0C4D F3 05 25 lda #05h
0C4F F9 21 26 sta0 OperandY+5
0C51 F3 13 27 lda #13h
0C53 F9 22 28 sta0 OperandY+6
0C55 20 88 B2 29 call LineUp
0C58 F3 12 30 lda #OperandX
0C5A FD 0A 31 sta Addr1
0C5C F3 1C 32 lda #OperandY
0C5E FD 0B 33 sta Addr2
0C60 F3 07 34 lda #07h
0C62 FD 08 35 sta DpCount
0C64 20 8A 99 36 call CompareData
0C67 F1 02 37 lda Temp1
0C69 A7 02 38 cmpe #2
0C6B 06 0C 75 39 brz 0$
0C6E F3 01 40 lda #1
0C70 F9 0E 41 sta0 ErrorFlag
0C72 02 0C C4 42 br 3$
+ 43 ;OperandX<0
+ 44 0$:
0C75 20 DB E7 45 call .R_trans_X
0C78 F5 34 46 lda0 SignTmp
0C7A F9 10 47 sta0 SignX
0C7C 20 D6 1E 48 call .ClrY
0C7F F3 10 49 lda #10h
0C81 F9 21 50 sta0 OperandY+5
0C83 F3 24 51 lda #24h
0C85 F9 22 52 sta0 OperandY+6
0C87 20 82 69 53 call Addition
0C8A 20 DA 2F 54 call .Z_trans_X
0C8D 02 0C C1 55 br 2$
+ 56 1$:
0C90 20 D8 DB 57 call .X_trans_R
0C93 20 D6 1E 58 call .ClrY
0C96 F3 05 59 lda #05h
0C98 F9 21 60 sta0 OperandY+5
0C9A F3 12 61 lda #12h
0C9C F9 22 62 sta0 OperandY+6
0C9E 20 88 B2 63 call LineUp
0CA1 F3 12 64 lda #OperandX
0CA3 FD 0A 65 sta Addr1
0CA5 F3 1C 66 lda #OperandY
0CA7 FD 0B 67 sta Addr2
0CA9 F3 07 68 lda #07h
0CAB FD 08 69 sta DpCount
0CAD 20 8A 99 70 call CompareData
0CB0 F1 02 71 lda Temp1
0CB2 A7 02 72 cmpe #2
0CB4 06 0C BE 73 brz 22$
0CB7 F3 01 74 lda #1
0CB9 F9 0E 75 sta0 ErrorFlag
0CBB 02 0C C4 76 br 3$
+ 77 22$:
0CBE 20 DB E7 78 call .R_trans_X
+ 79 2$:
0CC1 20 0F 82 80 call Dec2Bin
+ 81 3$:
0CC4 24 82 ret
+ 83
+ 84 ;Base-10 -> Base-8
+ 85 ;Input:OperandX (Dec)
+ 86 ;Output:OperandZ (Oct)
0CC5 87 Base_Dec2Oct::
0CC5 F5 10 88 lda0 SignX
0CC7 F9 34 89 sta0 SignTmp
0CC9 DB 00 90 ora #0
0CCB 06 0D 30 91 brz 1$
0CCE F3 00 92 lda #0
0CD0 F9 10 93 sta0 SignX
0CD2 20 D8 DB 94 call .X_trans_R
0CD5 20 D6 1E 95 call .ClrY
0CD8 F3 05 96 lda #05h
0CDA F9 1E 97 sta0 OperandY+2
0CDC F3 36 98 lda #36h
0CDE F9 1F 99 sta0 OperandY+3
0CE0 F3 87 100 lda #87h
0CE2 F9 20 101 sta0 OperandY+4
0CE4 F3 09 102 lda #09h
0CE6 F9 21 103 sta0 OperandY+5
0CE8 F3 13 104 lda #13h
0CEA F9 22 105 sta0 OperandY+6
0CEC 20 88 B2 106 call LineUp
0CEF F3 12 107 lda #OperandX
0CF1 FD 0A 108 sta Addr1
0CF3 F3 1C 109 lda #OperandY
0CF5 FD 0B 110 sta Addr2
0CF7 F3 07 111 lda #07h
0CF9 FD 08 112 sta DpCount
0CFB 20 8A 99 113 call CompareData
0CFE F1 02 114 lda Temp1
0D00 A7 02 115 cmpe #2
0D02 06 0D 0C 116 brz 0$
0D05 F3 01 117 lda #1
0D07 F9 0E 118 sta0 ErrorFlag
0D09 02 0D 33 119 br 2$
+ 120 ;OperandX<0
+ 121 0$:
0D0C 20 DB E7 122 call .R_trans_X
0D0F F5 34 123 lda0 SignTmp
0D11 F9 10 124 sta0 SignX
0D13 20 D6 1E 125 call .ClrY
0D16 F3 10 126 lda #10h
0D18 F9 1E 127 sta0 OperandY+2
0D1A F3 73 128 lda #73h
0D1C F9 1F 129 sta0 OperandY+3
0D1E F3 74 130 lda #74h
0D20 F9 20 131 sta0 OperandY+4
0D22 F3 18 132 lda #18h
0D24 F9 21 133 sta0 OperandY+5
0D26 F3 24 134 lda #24h
0D28 F9 22 135 sta0 OperandY+6
0D2A 20 82 69 136 call Addition
0D2D 20 DA 2F 137 call .Z_trans_X
+ 138 1$:
0D30 20 0F 9A 139 call Dec2Oct
+ 140 2$:
0D33 24 141 ret
+ 142
+ 143 ;Base-10 -> Base-16
+ 144 ;Input:OperandX (Dec)
+ 145 ;Output:OperandZ (Hex)
0D34 146 Base_Dec2Hex::
0D34 F5 10 147 lda0 SignX
0D36 F9 34 148 sta0 SignTmp
0D38 20 0E 7C 149 call CheckDecLimit
0D3B F5 0E 150 lda0 ErrorFlag
0D3D A7 01 151 cmpe #1
0D3F 04 0D 6D 152 brc 2$
0D42 F5 34 153 lda0 SignTmp
0D44 DB 00 154 ora #0
0D46 06 0D 6A 155 brz 1$
+ 156 ;OperandX<0
+ 157 0$:
0D49 F5 34 158 lda0 SignTmp
0D4B F9 10 159 sta0 SignX
0D4D 20 D6 1E 160 call .ClrY
0D50 F3 42 161 lda #42h
0D52 F9 1E 162 sta0 OperandY+2
0D54 F3 94 163 lda #94h
0D56 F9 1F 164 sta0 OperandY+3
0D58 F3 96 165 lda #96h
0D5A F9 20 166 sta0 OperandY+4
0D5C F3 72 167 lda #72h
0D5E F9 21 168 sta0 OperandY+5
0D60 F3 96 169 lda #96h
0D62 F9 22 170 sta0 OperandY+6
0D64 20 82 69 171 call Addition
0D67 20 DA 2F 172 call .Z_trans_X
+ 173 1$:
0D6A 20 0F 8E 174 call Dec2Hex
+ 175 2$:
0D6D 24 176 ret
+ 177 ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -