⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 sloid_1.lst

📁 该程序是用汇编语言编写的用于测试石油凝固点的程序,该程序对于应用汇编编程的初学者有很大的参考 价值
💻 LST
📖 第 1 页 / 共 2 页
字号:
01A6 2403            270             add   a,#03h
01A8 F9              271             mov   r1,a
01A9 E7              272             mov   a,@r1
01AA 547F            273             anl   a,#7fh          ;第三位要显示小数点
01AC F7              274             mov   @r1,a
01AD 793C            275             mov   r1,#lcd_buf
                     276             ;-----------------------
01AF E7              277     tsr_pa: mov   a,@r1         
01B0 31BA            278             acall transbyte
01B2 09              279             inc   r1
01B3 DFFA            280             djnz  r7,tsr_pa
01B5 1201EC          281             lcall wr_53
01B8 01FB            282             ajmp  circe
                     283             
                     284             
                     285     ;-----------------------------------        
01BA                 286     transbyte:
01BA 7808            287             mov   r0,#08h
01BC 13              288     tsb_pa: rrc   a
01BD 31C3            289             acall transbit
01BF D8FB            290             djnz  r0,tsb_pa
01C1 13              291             rrc   a
01C2 22              292             ret
01C3                 293     transbit:
01C3 9291            294             mov   lcd_do,c     ;先送数据到数据口线DI
01C5 D290            295             setb  lcd_clk      ;再使时钟口线发一个负脉冲
01C7 C290            296             clr   lcd_clk
01C9 D290            297             setb  lcd_clk        
01CB 22              298             ret
                     299     
                     300     ;*************************************
01CC E4              301     tlc549: clr   a
01CD D281            302             setb  tlc_do
01CF C2A3            303             clr   tlc_cs       ;/cs
01D1 7F02            304             mov   r7,#02h
01D3 1201E2          305             lcall readata
01D6 FD              306             mov   r5,a
01D7 7F08            307             mov   r7,#08h
01D9 1201E2          308             lcall readata
01DC FE              309             mov   r6,a
01DD D2A3            310             setb  tlc_cs
01DF C280            311             clr   tlc_clk
                     312           
                     313             
01E1 22              314             ret
                     315     ;------------------------------------------
01E2 C280            316     readata:clr   tlc_clk      ;clk
01E4 A281            317             mov   c,tlc_do     ;do
01E6 33              318             rlc   a
01E7 D280            319             setb  tlc_clk
A51 MACRO ASSEMBLER  SLOID_1                                                              09/16/2005 20:22:45 PAGE     6

01E9 DFF7            320             djnz  r7,readata
01EB 22              321             ret
                     322                     
                     323             
                     324     
                     325             
                     326             
                     327     ;*************************************        
01EC C292            328     wr_53:  clr   p1.2
01EE C293            329             clr   p1.3
01F0 90FBFF          330             mov   dptr,#tim8253co
01F3 7436            331             mov   a,#36h
01F5 F0              332             movx  @dptr,a
01F6 7472            333             mov   a,#72h
01F8 F0              334             movx  @dptr,a
01F9 74B0            335             mov   a,#0b0h
01FB F0              336             movx  @dptr,a
01FC 90F8FF          337             mov   dptr,#tim8253a
01FF 7412            338             mov   a,#12h
0201 F0              339             movx  @dptr,a 
0202 E4              340             clr   a
0203 F0              341             movx  @dptr,a
0204 90F9FF          342             mov   dptr,#tim8253b
0207 743C            343             mov   a,#3ch
0209 F0              344             movx  @dptr,a
020A 74E9            345             mov   a,#0e9h
020C F0              346             movx  @dptr,a
020D D292            347             setb  p1.2
020F 90FAFF          348             mov   dptr,#tim8253c
0212 74FF            349             mov   a,#0ffh
0214 F0              350             movx  @dptr,a
0215 F0              351             movx  @dptr,a
0216 D293            352             setb  p1.3
0218 22              353             ret                
                     354             
                     355             
                     356     ;*************************************        
0219 120220          357     dog:    lcall readsr
021C 30E00E          358             jnb   acc.0,writesr1
021F 22              359             ret
                     360     ;------------------
0220 7405            361     readsr: mov   a,#rdsr
0222 C2A4            362             clr   dog_cs
0224 12024A          363             lcall write8
0227 120259          364             lcall read8
022A D2A4            365             setb  dog_cs
022C 22              366             ret
                     367     ;-----------------
022D                 368     writesr1:
022D C2A4            369             clr   dog_cs
022F 7406            370             mov   a,#wren  ; 00000110b设置写使能锁存器(准许)
0231 12024A          371             lcall write8
0234 D2A4            372             setb  dog_cs
0236 C2A4            373             clr   dog_cs
0238 7401            374             mov   a,#wrsr1
023A 12024A          375             lcall write8
023D 7400            376             mov   a,#00h
023F 12024A          377             lcall write8
0242 D2A4            378             setb  dog_cs
0244 C2A4            379             clr   dog_cs
0246 00              380             nop
0247 D2A4            381             setb  dog_cs
0249 22              382             ret
                     383     ;------------
024A 7B08            384     write8: mov   r3,#08h
024C                 385     write81:
A51 MACRO ASSEMBLER  SLOID_1                                                              09/16/2005 20:22:45 PAGE     7

024C 33              386             rlc   a
024D 9281            387             mov   dog_si,c
024F C282            388             clr   dog_sck
0251 12026C          389             lcall atly
0254 D282            390             setb  dog_sck
0256 DBF4            391             djnz  r3,write81
0258 22              392             ret
                     393     ;------------
0259 7B08            394     read8:  mov   r3,#08h   
025B D280            395     read81: setb  dog_so
025D D282            396             setb  dog_sck
025F 12026C          397             lcall atly
0262 C282            398             clr   dog_sck
0264 A280            399             mov   c,dog_so
0266 33              400             rlc   a
0267 DBF2            401             djnz  r3,read81
0269 D282            402             setb  dog_sck
026B 22              403             ret
                     404     ;---------------------------------
026C 7E1E            405     atly:   mov   r6,#30 
026E DEFE            406             djnz  r6,$
0270 22              407             ret  
                     408             
                     409     ;********************************
0271 7F10            410     dubcd:  mov   r7,#10h 
0273 E4              411             clr   a 
0274 FC              412             mov   r4,a 
0275 FD              413             mov   r5,a 
0276 FE              414             mov   r6,a 
0277 C3              415     lp0:    clr   c 
0278 E8              416             mov   a,r0 
0279 33              417             rlc   a 
027A F8              418             mov   r0,a 
027B E9              419             mov   a,r1 
027C 33              420             rlc   a 
027D F9              421             mov   r1,a 
027E EC              422             mov   a,r4 
027F 3C              423             addc  a,r4 
0280 D4              424             da    a 
0281 FC              425             mov   r4,a 
0282 ED              426             mov   a,r5 
0283 3D              427             addc  a,r5 
0284 D4              428             da    a 
0285 FD              429             mov   r5,a 
0286 EE              430             mov   a,r6 
0287 3E              431             addc  a,r6 
0288 D4              432             da    a 
0289 FE              433             mov   r6,a   
028A DFEB            434             djnz  r7,lp0       
028C 22              435             ret
                     436     ;*********************************
028D C3              437     dubcds: clr   c
028E 7499            438             mov   a,#99h
0290 9B              439             subb  a,r3
0291 FB              440             mov   r3,a
0292 C3              441             clr   c
0293 749A            442             mov   a,#9ah
0295 9A              443             subb  a,r2
0296 2C              444             add   a,r4
0297 D4              445             da    a
0298 FC              446             mov   r4,a
0299 EB              447             mov   a,r3
029A 3D              448             addc  a,r5
029B D4              449             da    a
029C FD              450             mov   r5,a
029D 22              451             ret
A51 MACRO ASSEMBLER  SLOID_1                                                              09/16/2005 20:22:45 PAGE     8

                     452             end                        
A51 MACRO ASSEMBLER  SLOID_1                                                              09/16/2005 20:22:45 PAGE     9

SYMBOL TABLE LISTING
------ ----- -------


N A M E             T Y P E  V A L U E   ATTRIBUTES

AAQ. . . . . . . .  C ADDR   0185H   A   
ABB. . . . . . . .  C ADDR   0062H   A   
ABC. . . . . . . .  C ADDR   005EH   A   
ABD. . . . . . . .  C ADDR   0064H   A   
ABH. . . . . . . .  C ADDR   0164H   A   
ACC. . . . . . . .  D ADDR   00E0H   A   
ARRY . . . . . . .  C ADDR   0191H   A   
ATLY . . . . . . .  C ADDR   026CH   A   
BREAK. . . . . . .  C ADDR   00C2H   A   
CIRCE. . . . . . .  C ADDR   00FBH   A   
COUNT. . . . . . .  N NUMB   0035H   A   
DATA_LCD . . . . .  C ADDR   01A1H   A   
DC1. . . . . . . .  C ADDR   0143H   A   
DOG. . . . . . . .  C ADDR   0219H   A   
DOG_CS . . . . . .  B ADDR   00A0H.4 A   
DOG_SCK. . . . . .  B ADDR   0080H.2 A   
DOG_SI . . . . . .  B ADDR   0080H.1 A   
DOG_SO . . . . . .  B ADDR   0080H.0 A   
DUBCD. . . . . . .  C ADDR   0271H   A   
DUBCDS . . . . . .  C ADDR   028DH   A   
FINSH. . . . . . .  B ADDR   0020H.2 A   
HAV_KEY. . . . . .  C ADDR   004EH   A   
IE . . . . . . . .  D ADDR   00A8H   A   
INTA . . . . . . .  C ADDR   00DEH   A   
INTP . . . . . . .  C ADDR   0030H   A   
JUDGE_KEY. . . . .  B ADDR   0020H.3 A   
KEY. . . . . . . .  N NUMB   0030H   A   
KEY_BIT. . . . . .  B ADDR   0020H.0 A   
KEY_ON . . . . . .  B ADDR   0020H.1 A   
LCD_BUF. . . . . .  N NUMB   003CH   A   
LCD_CLK. . . . . .  B ADDR   0090H.0 A   
LCD_DO . . . . . .  B ADDR   0090H.1 A   
LP0. . . . . . . .  C ADDR   0277H   A   
MAIN . . . . . . .  C ADDR   00C7H   A   
P0 . . . . . . . .  D ADDR   0080H   A   
P1 . . . . . . . .  D ADDR   0090H   A   
P11. . . . . . . .  C ADDR   0119H   A   
P2 . . . . . . . .  D ADDR   00A0H   A   
PSW. . . . . . . .  D ADDR   00D0H   A   
QQ1. . . . . . . .  C ADDR   0074H   A   
QQ2. . . . . . . .  C ADDR   00ABH   A   
RAY_VO3H . . . . .  N NUMB   0033H   A   
RAY_VO3L . . . . .  N NUMB   0034H   A   
RAY_VOH. . . . . .  N NUMB   0032H   A   
RAY_VOL. . . . . .  N NUMB   0031H   A   
RDSR . . . . . . .  N NUMB   0005H   A   
READ8. . . . . . .  C ADDR   0259H   A   
READ81 . . . . . .  C ADDR   025BH   A   
READATA. . . . . .  C ADDR   01E2H   A   
READSR . . . . . .  C ADDR   0220H   A   
READ_TEMP. . . . .  C ADDR   0120H   A   
SLOID_SIGN . . . .  N NUMB   0036H   A   
SLOID_TEMPH. . . .  N NUMB   0037H   A   
SLOID_TEMPL. . . .  N NUMB   0038H   A   
SP . . . . . . . .  D ADDR   0081H   A   
TEMPH. . . . . . .  N NUMB   003AH   A   
TEMPL. . . . . . .  N NUMB   003BH   A   
TEMP_SIGN. . . . .  N NUMB   0039H   A   
TH0. . . . . . . .  D ADDR   008CH   A   
TIM8253A . . . . .  N NUMB   F8FFH   A   
A51 MACRO ASSEMBLER  SLOID_1                                                              09/16/2005 20:22:45 PAGE    10

TIM8253B . . . . .  N NUMB   F9FFH   A   
TIM8253C . . . . .  N NUMB   FAFFH   A   
TIM8253CO. . . . .  N NUMB   FBFFH   A   
TL0. . . . . . . .  D ADDR   008AH   A   
TLC549 . . . . . .  C ADDR   01CCH   A   
TLC_CLK. . . . . .  B ADDR   0080H.0 A   
TLC_CS . . . . . .  B ADDR   00A0H.3 A   
TLC_DO . . . . . .  B ADDR   0080H.1 A   
TMOD . . . . . . .  D ADDR   0089H   A   
TR0. . . . . . . .  B ADDR   0088H.4 A   
TRANSBIT . . . . .  C ADDR   01C3H   A   
TRANSBYTE. . . . .  C ADDR   01BAH   A   
TSB_PA . . . . . .  C ADDR   01BCH   A   
TSR_PA . . . . . .  C ADDR   01AFH   A   
WRDI . . . . . . .  N NUMB   0004H   A   
WREN . . . . . . .  N NUMB   0006H   A   
WRITE8 . . . . . .  C ADDR   024AH   A   
WRITE81. . . . . .  C ADDR   024CH   A   
WRITESR1 . . . . .  C ADDR   022DH   A   
WRSR1. . . . . . .  N NUMB   0001H   A   
WR_53. . . . . . .  C ADDR   01ECH   A   
WR_LCD . . . . . .  C ADDR   0158H   A   


REGISTER BANK(S) USED: 0 

ASSEMBLY COMPLETE.  0 WARNING(S), 0 ERROR(S)

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -