s232.asm

学林电子实验箱源码 完整板

ORG 0000H
AJMP main0
ORG 0030H
main0: MOV 20H,#00H	;设置串口工作方式
MOV TMOD,#22H
MOV SCON,#40H
MOV TH1,#0F3H		;设置速率4800,(12M晶体）
MOV PCON,#80H
SETB TR1
SETB REN		;允许接收
clr p2.6		;开数码管的最后一位
ajmp start

start:
l1:jnb p3.3,l3		;检测键盘，如果P3.3按下则执行L3
jnb p3.4,l4
jnb p3.5,l5
JNB P3.2,L6
jbc ri,rec
mov p0,#0ffh
;jmp l1
rec: mov a,sbuf		;缓冲数据送到a
mov p1,a
 CJNE A,#00110001b,T00
	MOV P0,#07eH          ;数码管显示2
; call delay
 mov p0,#0ffh
t00: CJNE A,#00110010b,T2
	MOV P0,#0A2H          ;数码管显示2
 ; call delay
 mov p0,#0ffh
T2: 	CJNE A,#00110011b,T3
	MOV P0,#62H
 ; call delay
; mov p0,#0ffh
T3: 	CJNE A,#00110100b,T4
MOV 	P0,#74H
 ;call delay
 ;mov p0,#0ffh
T4: 	CJNE A,#00110101b,T5
	MOV P0,#61H
 ; call delay
; mov p0,#0ffh
T5: 	CJNE A,#00110110b,T6

	MOV P0,#21H
 ; call delay
 ;mov p0,#0ffh
T6:	CJNE A,#00110111b,T7
	MOV P0,#7AH
 ; call delay
 ;mov p0,#0ffh
T7:	 CJNE A,#00111000b,T8
	MOV P0,#20H
 ; call delay
 ;mov p0,#0ffh
T8:	CJNE A,#00111001b,t9
	MOV P0,#60H
 ; call delay
 ;mov p0,#0ffh
T9: CJNE A,#00110000b,t10
MOV P0,#28H
; call delay

t10:ljmp L1

l3: 	mov dptr,#ok1	;置表头1
	ajmp	senda3

senda3: clr a ;
	movc a,@a+dptr
	cjne a,#'$',senda_3
	ajmp start	;遇到$则从头开始执行。

senda_3:mov sbuf,a	;发送数据
	JNB TI,$;
	CLR TI ;
	inc dptr
	Ljmp senda3

l4: 	mov dptr,#ok2	;置表头2
	ajmp	senda3

l5: 	mov dptr,#ok3	;置表头3
	ajmp	senda3

l6: 	mov dptr,#ok4	;置表头4
	ajmp	senda3

ok1: db 0dh,0ah,0dh,0ah,"如果我还有一天寿命，那天我要做你女友。我还有一天的命吗？..没有。所以，很可惜。我今生仍然不是你的女友。如果我有翅膀，我要从天堂飞下来看你。我有翅膀吗？..没有。所以，很遗憾。我从此无法再看到你。",0dh,0ah,'$'
ok2: db 0dh,0ah,0dh,0ah,"倚天版开发套件是51测试网在志强版开发套件的基础上开发的增强型编程试验一体化开发套件，适合于零基础，或者初中级单片机爱好者 使用。并适合于单片机程序员的前期试",0dh,0ah,'$'
ok3: db 0dh,0ah,0dh,0ah,"89c51text-xp是51测试网为初学者量身定做的一套编程试验一体化51开发套件。采用单片机精确时序编程，质量非常稳定，决不会因为编程器的原因烧毁芯片。由一个51编程器和一个51标准",0dh,0ah,'$'
ok4: db 0dh,0ah,0dh,0ah," 2002年11月15日本站申请国际域名成功名称  http://www.51c51.com 我要c51!!!2002年9月推出标准版开发套件2002年10月推出xp版",0dh,0ah,'$'
end