Email: Password: Remember Me | Create Account (Free)

Back to Subject List

Old thread has been locked -- no new posts accepted in this thread
???
12/09/06 15:09
Read: times


 
#129223 - to erik
Responding to: ???'s previous message
;this is a bald program
B9600 equ 0fdh ;reload 9600 Baud-hoz
REN equ 09ch
RI equ 098h
TI equ 099h
EA equ 0afh
ES equ 0ach
SBUF equ 099h
TCON equ 088h
PCON equ 087h
TMOD equ 089h
SM0 equ 09fh
SM1 equ 09eh
TH1 equ 08dh
WORK equ 40h
EX0 equ 0a8h
EX1 equ 0aah
ET0 equ 0a9h
ET1 equ 0abh

ORG 00h
ljmp begin

org 23h
ljmp serial

ORG 30h
begin:
lcall init
ljmp $
serial:
clr EA
jb RI,rec
ljmp serki
rec:
clr RI
mov a,SBUF
mov WORK,a
inc WORK
mov SBUF,WORK
jnb TI,$
serki:
setb EA
clr TI
reti

init:
mov TMOD,#20h ;Timer1=mode2-rs232-h”z
clr RI
mov PCON,#0 ;baud rate 1 szeres(pcon.7=0)
clr SM0 ;Serial port=mode1
setb SM1 ;
mov TH1,#B9600 ;reload value for 9600 baud
setb TCON.6 ;start Timer1
setb REN
clr ET1 ;Timer1 IT disable
setb ES ;soros IT enable
clr ex0 ;kls‹ IT-k tilt
clr ex1
clr ET0 ;Timer0 IT tilt
setb EA ;minden IT eng.
RET
end


List of 16 messages in thread
TopicAuthorDate
serial problem            01/01/70 00:00      
   what is "IT"?            01/01/70 00:00      
   why not?            01/01/70 00:00      
      serial            01/01/70 00:00      
         so, evidently you are using some kind of monitor            01/01/70 00:00      
            re erik            01/01/70 00:00      
               HOW?            01/01/70 00:00      
                  re how.            01/01/70 00:00      
                     you are clearly using some 'patent' downloa            01/01/70 00:00      
                        thank's erik            01/01/70 00:00      
                           Serial to EXCEL            01/01/70 00:00      
                              What EXCEL?            01/01/70 00:00      
                                 to Andy            01/01/70 00:00      
                              to stefan            01/01/70 00:00      
                                 To Sandor            01/01/70 00:00      
   to erik            01/01/70 00:00      

Back to Subject List