用汇编语言写程序0到50000计数

51单片机用计数器中断实现100以内的按键计数，汇编语言程序~

试试下列程序：
ORG 0000H
JMP START
ORG 000BH
JMP T0_INT
;------------------------------
START:
MOV TMOD, #06H
MOV TH0, #255
MOV TL0, #255
MOV IE, #82H
SETB TR0
MOV R2, #0
MOV R3, #0
MOV DPTR, #TAB
;------------------------------
M_LOOP:
MOV A, R3
MOVC A, @A + DPTR
MOV P2, A
MOV A, R2
MOVC A, @A + DPTR
MOV P0, A
SJMP M_LOOP
;------------------------------
T0_INT:
JNB P3.4, T0_INT
INC R3
CJNE R3, #10, T0_END
MOV R3, #0
INC R2
CJNE R2, #10, T0_END
MOV R2, #0
T0_END:
RETI
;------------------------------
TAB: DB 0x3f, 0x06, 0x5b, 0x4f, 0x66, 0x6d, 0x7d, 0x07, 0x7f, 0x6f
;------------------------------
END

; 本程序通过编译，运行正确
Code Segment
Assume CS:Code,DS:Code
CR equ 000DH
LF equ 000AH
KBBack equ 0008H
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：显示指定地址（Str_Addr）的字符串
; 入口：
; Str_Addr＝字符串地址（要求在数据段）
; 用法: Output Str_Addr
; 用法举例：Output PromptStr
Output MACRO Str_Addr
lea dx,Str_Addr
mov ah,9
int 21h
EndM
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：输出回车换行
Output_CTLF proc Near
push ax
push dx
mov ah,02h
mov dl,0dh
int 21h
mov dl,0ah
int 21h
pop dx
pop ax
ret
Output_CTLF endp
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：取光标位置
; 入口：无
; 出口：DH=行号，DL=列号
GetCursor Proc Near
PUSH AX
PUSH BX
PUSH CX
XOR BX,BX
MOV AH,3
INT 10H
MOV Cursor_Row,DH
MOV Cursor_Col,DL
POP CX
POP BX
POP AX
RET
Cursor_Row DB ?
Cursor_Col DB ?
GetCursor EndP
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：置光标位置
; 入口：Cursor_Row=行坐标; Cursor_Col: 列坐标)
SetCursor Proc Near
PUSH CX
PUSH BX
PUSH AX
MOV DH,Cursor_Row
MOV DL,Cursor_Col
XOR BX,BX
MOV AH,2
INT 10H
POP AX
POP BX
POP CX
RET
SetCursor EndP
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：键盘输入一个指定位数的十进制数字，将其转换成二进制数并保存在指定的内存单元。
; 入口：@@Digits=数字位数；di=保存输入的数字地址
; @@Type_Data=保存的数据类型，B=字节类型，W=字类型。
; 出口：转换后的二进制数保存在di所指的单元
Input_Digit Proc Near
push dx
push cx
push bx
push di
lea di,@@Save_Tmp
push di
cld
mov cl,@@Digits
xor ch,ch
push cx
@@Input: call GetCursor ;取光标位置
mov ah,1 ;从键盘接受一个字符
int 21h
cmp al,CR ;若键入的是回车，已经键入的数字不足N位
jz @@ASC_Dec ;转去处理已经键入的数字
cmp al,KBBack
jz @@KB_Back ;若是回空键，重新输入
cmp al,'0'
jb @@KBBack ;若低于数字'0'，重新输入
cmp al,'9'
ja @@KBBack ;若低于数字'9'，重新输入
jmp @@Save_Dig
@@KB_Back: dec Cursor_Col
inc cx
dec di
@@KBBack: call SetCursor ;置光标位置
jmp @@Input
@@Save_Dig: and al,0fh ;转换成二进制数
stosb ;保存
loop @@Input ;接受下一个数字
@@ASC_Dec: mov ax,cx
pop cx
pop si
sub cx,ax ;实际输入的数字位数
xor bp,bp
xor dx,dx
xor ax,ax
jcxz @@Save_Ret ;若直接回车，没有输入任何数字，按输入'0'处理
dec cx ;实际输入的数字位数减1，准备把输入的这一串数字转换成二进制数
jcxz @@One_Digit ;若输入的数字只有一位，转去直接保存这个二进制数
mov bx,10
@@Mul_Ten: lodsb
cbw
add ax,bp
mul bx
mov bp,ax
loop @@Mul_Ten
@@One_Digit:lodsb
cbw
add ax,bp
@@Save_Ret: pop di
cmp @@Type_Data,'B' ;字节类型？
jz $+5
stosw
jmp $+3
stosb
pop bx
pop cx
pop dx
ret
@@Digits db ? ;十进制数字位数
@@Type_Data db 'B' ;保存的数据类型。B=字节类型，W=字类型
@@Save_Tmp db 16 dup(?)
Input_Digit EndP
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：把AX中的二进制无符号数转换成显式的十进制ASCII码，并送显示屏显示
; 入口：AX=二进制数
; 出口：在当前光标位置显示转换后的ASCII码数字
Dec_ASCII Proc Near
push dx
push bx
push di
mov bx,10
lea di,@@Temp_Save[6]
mov byte ptr [di],'$'
dec di
cld
@@Divide: xor dx,dx
div bx
or dl,30h
mov [di],dl
dec di
test ax,0ffffh
jnz @@Divide
inc di
push di
pop dx
mov ah,9
int 21h
pop di
pop bx
pop dx
ret
@@Temp_Save db 7 dup(?)
Dec_ASCII EndP
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
Number dw ?
Prompt_Str db 'Please input a number(<65535): $' ;输入提示信息
Prompt_1 db CR,LF,"1's in the number: $"
Prompt_0 db CR,LF,"1's in the number: $"
Continue db CR,LF,CR,LF,'Continue(y/n)?$'
Start: push cs
pop ds
push cs
pop es
@@Input_Dec:mov @@Digits,5 ;十进制数字位数
mov @@Type_Data,'w' ;保存的数据类型。B=字节类型，W=字类型
lea di,Number ;保存输入的数字地址
Output Prompt_Str ;提示输入十进制数字
call Input_Digit ;键盘输入指定位数的十进制数
mov ax,Number ;输入的十进制数传送给AX
xor bx,bx ;计数器置0，BH=1的个数，BL=0的个数
mov cx,16 ;16位二进制数
clc ;清进位标志
Left_Move: shl ax,1 ;左移1位
jc $+6 ;若CF=1，1计数
inc bl ;若CF=0，0计数
jmp $+4
inc bh ;1计数
loop Left_Move
Output Prompt_1 ;提示显示1的个数
mov al,bh
xor ah,ah
call Dec_ASCII ;把AX中的二进制无符号数转换成显式的十进制ASCII码，并送显示屏显示
Output Prompt_0 ;提示显示0的个数
mov al,bl
xor ah,ah
call Dec_ASCII
Output Continue ;提示是否输入下一个数
Next_One: mov ah,1
int 21h
and al,0dfh ;转换成大写
cmp al,'N'
jz Exit_Proc ;不继续，结束程序
cmp al,'Y'
jnz Next_One ;不是有效字母，重新输入
call Output_CTLF ;输出一个回车、换行
call Output_CTLF
jmp @@Input_Dec ;继续，转去键盘输入数字
Exit_Proc: mov ah,4ch ;结束程序
int 21h
Code ENDS
END Start ;编译到此结束

CALL DELAY
MOV AL,00000000B ;PC2置0,（LCD E端置0）
OUT DX, AL
CALL DELAY
RET
CMD_SETUP ENDP
DATA_SETUP PROC
MOV DX,IO_ADDRESS ;指向8255控制端口
ADD DX,2
MOV AL,00000001B ;PC1置0，PC0=1 （LCD I端=1）
OUT DX, AL
NOP

mov cx,50000
mov ax,1
next:
inc ax
loop next
;计数在AX中

用两个寄存器，一个的比较数是200.另一个是250.但一个够时另一个加一，这一个再0开始计数

xor cx,cx
mov ax,0
cmp cx,50000
jb l2
l2:
inc ax
inc cx

---

怀远县18065728585： 跪求一计数器汇编语言程序 - ？
狄章润洁： ORG 0000HAJMP MAIN MAIN: MOV 20H,#05HMOV 21H,#05HMOV 22H,#0FH MAINL1: CLR CMOV C,P0.0JC SIGNAL1CLR CMOV C,P0.1JC SIGNAL2CLR CMOV C,P0.2JC SIGNAL2AJMP MAINL1 SIGNAL1: DJNZ 20H,MAINL1...

怀远县18065728585： 求用汇编语言编0~255的计数程序 - ？
狄章润洁： #includesbit D=P2^3;void init_time(){ TMOD=0x01; /*工作方式*/ TH0=(65535-50000)/256; /*初始值*/ TLO=(65535-50000)%256;EA=1; /*开总中断*/ TR0=1; /*TCON中的控制触发方式*/ ET0=1; /*中断允许寄存器*/}void main(){ init_time() while(1) { ; }}void time0() interrupt 1{ THO=(65535-50000)/256; /*初始值*/ TLO=(65535-50000)%256; D=0;}

怀远县18065728585： 如何用汇编语言编写:INT0与INT1中断计数 - ？
狄章润洁： 先开中断寄存器把相应标志位置1,然后将中断源与中断引脚相连,在中断子程序中进行累加计数,最后再把计数结果读出就可以了

怀远县18065728585： 51单片机,用汇编语言编写程序,10秒内对外部脉冲进行计数,并数出外部脉冲频率.求高手编写程序. - ？
狄章润洁： ORG 0000H LJMP MAIN ORG 000BH LJMP T0ISR ORG 0030H MAIN: MOV TMOD,#51H MOV TH0,#HIGH(65536-50000) MOV TL0,#LOW(65536-50000) MOV TH1,#0 MOV TL1,#0 SETB TR0 SETB TR1 SETB ET0 SETB EA CLR A MOV R2,#0...

怀远县18065728585： 求汇编语言 编计数器的代码段 - ？
狄章润洁： ; 本程序在MASMPlus 1.2集成环境下通过编译,经过调试,运行正确.Code Segment Assume CS:Code,DS:Code Press_Key db 7,13,10,10,'The complated. Press any key to exit...$' ; ------------------------------------- Start: push cs pop ds push cs ...

怀远县18065728585： 单片机计数程序 汇编语言 - ？
狄章润洁： ORG 0H AJMP START ORG 100H START:MOV SP,#60HMOV P1,#0FFHMOV R5,#0 LOOP:JNB P3.1,LOOP0JB P3.1,LOOP LOOP0:JNB P3.1,LOOP0INC R5CJNE R5,#1,LOOP1CLR P1.0 LOOP1:CJNE R5,#2,LOOP2CLR P1.1 LOOP...

怀远县18065728585： 51单片机用计数器中断实现100以内的按键计数,汇编语言程序 - ？
狄章润洁： 试试下列程序: ORG 0000H JMP START ORG 000BH JMP T0_INT;------------------------------ START: MOV TMOD, #06H MOV TH0, #255 MOV TL0, #255 MOV IE, #82H SETB TR0 MOV R2, #0 MOV R3, #0 MOV DPTR, #TAB;------------------------------ ...

怀远县18065728585： 用汇编语言编写将片外RAM中0000H~001FH单元依次赋值为从5开始的自然数的程序. - ？
狄章润洁： org 0000h ;复位启动 ljmp start ; org 0100h ; ; ;主控程序 start: mov dptr,#0000h mov b,#32 mov a,#5 loop: mov @dptr,a inc a inc dptr djnz b,loop jmp $ ;死循环 end ;

怀远县18065728585： 汇编语言:怎样编写0 - 999的计数程序,用1602显示出来? - ？
狄章润洁： 首先,要有电路,然后再讨论程序.计数 999,计的是什么数?是按键次数?还是秒数?题目,要求不清,就难以得到期望的答案.

怀远县18065728585： 用汇编语言写一个单片机定时器/计数器的程序 - ？
狄章润洁： 1.以查询方式工作,每计满100个脉冲,则取反P1.0口线状态.ORG 0000H MOV TMOD, #06H MOV TH0, #156 MOV TL0, #156 SETB TR0 LP: JNB TF0, LP CPL P1.0 SJMP LP END2.以中断方式工作,每计满200个脉冲,则取反P1.0口线状态. ORG 0000H SJMP START ORG 000BH CPL P1.0 RETI START: MOV TMOD, #06H MOV TH0, #56 MOV TL0, #56 SETB TR0 MOV IE, #82H SJMP $ END