
DATAS SEGMENT
MONTH DB 'JanFebMarAprMayJunJulAugSepOctNovDec'
MESS DB ' INPUT THE MONTH:',0DH,0AH,'$'
NUM DB 3 ;按照标准应该是2 ,但是我写2 就是不行,可能是我软件的问题
DB
DB 2 DUP(0,)
DATAS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS
START: MOV AX,DATAS
MOV DS,AX
LEA DX,MESS
MOV AH,9
INT 21H
LEA DX,NUM
MOV AH,0AH
INT 21H
MOV AX,0
ADD AL,NUM+2
AND AL,0FH
MOV CL,10
MUL CL
MOV DX,AX
MOV AX,0
MOV AL,NUM+3
AND AL,0FH
ADD AX,DX
SUB AX,1
MOV CL,0003H
MUL CL
MOV BX,AX
MOV CL,3
SHOW: MOV DL,MONTH[BX]
INC BX
MOV AH,2
INT 21H
LOOP SHOW
JMP START
MOV AX,4C00H
INT 21H
CODES ENDS
END START
已经调试过了 没问题 但是一定要输入两位数 比如一月要输入01
while(ch[i]!='0');
应该是while(ch[i]!='\n');
if(ch[i]="A"||ch[i]=="a")
应该是
if(ch[i]=='A'||ch[i]=='a') ==号,单引号
给你个简单的:
#include <stdioh>
int main()
{
static int cnt[26];
char ch;
int i;
printf("输入字符串:");
while((ch=getchar())!='\n')
{
if(ch>='a'&&ch<='z')
cnt[ch-'a']++;
if(ch>='A'&&ch<='Z')
cnt[ch-'A']++;
}
for(i=0;i<26;i++)
{
if(cnt[i])
printf("%c:%d\n",'A'+i,cnt[i]);
}
return 0;
}
程序参考网上的资源,在此谢谢这些无私奉献的朋友!!!
;/
/ 实验目的:1掌握键盘扫描的原理以及十/十六进制的转换
2了解单片机输入和输出的过程,以及如何对数据进行采集的
实验内容:键盘上对应有16个按键,从0到F,按下相应的键会在数码管上显示相应的数字,
其中K0到K15是采用44的方式连接的
/
;
; 0 1 2 3 ---P20
; 4 5 6 7 ---P21
; 8 9 A B ---P22
; C D E F ---P23
; | | | |
; P24 P25 P26 P27
;
ORG 0000h
LJMP MAIN
ORG 0030h
MAIN:
MOV DPTR,#TAB ;将表头放入DPTR
LCALL KEY ;调用键盘扫描程序
MOVC A,@A+DPTR ;查表后将键值送入ACC
MOV P0,A ;将Acc值送入P0口
CLR P13 ;开显示
LJMP MAIN ;返回调用子程序反复循环显示
KEY: LCALL KS ;调用检测按键子程序
JNZ K1 ;有键按下继续
LCALL DELAY2 ;无键按下调用延时去抖动程序
AJMP KEY ;返回继续检测有无按键按下
K1: LCALL DELAY2
LCALL DELAY2 ;有键按下继续延时去抖动
LCALL KS ;再一次调用检测按键程序
JNZ K2 ;确认有按下进行下一步
AJMP KEY ;无键按下返回继续检测
K2: MOV R2,#0EFH ;将扫描值送入 R2暂存
MOV R4,#00H ;将第一列的列值00H送入R4暂存,R4用于存放列值。
K3: MOV P2,R2 ;将R2的值送入P2口
L6: JB P20,L1 ;P20等于1跳转到L1
MOV A,#00H ;将第一行的行值00H送入ACC
AJMP LK ;跳转到键值处理程序
L1: JB P21,L2 ;P21等于1跳转到L2
MOV A,#04H ;将第二行的行值送入ACC
AJMP LK ;跳转到键值理程序进行键值处理
L2: JB P22,L3 ;P12等于1跳转到L3
MOV A,#08H ;将第三行的行值送入ACC
AJMP LK ;跳转到键值处理程序
L3: JB P23,NEXT ;P23等于1跳转到NEXT处
MOV A,#0cH ;将第四行的行值送入ACC
LK: ADD A,R4 ;行值与列值相加后的键值送入A
PUSH ACC ;将A中的值送入堆栈暂存
K4: LCALL DELAY2 ;调用延时去抖动程序
LCALL KS ;调用按键检测程序
JNZ K4 ;按键没有松开继续返回检测
POP ACC ;将堆栈的值送入ACC
RET
NEXT:
INC R4 ;将列值加一
MOV A,R2 ;将R2的值送入A
JNB ACC7,KEY ;扫描完成跳至KEY处进行下一回合的扫描
RL A ;扫描未完成将A中的值右移一位进行下一列的扫描
MOV R2,A ;将ACC的值送入R2暂存
AJMP K3 ;跳转到K3继续
KS: MOV P2,#0FH ;将P2口高四位置0低四位值1
MOV A,P2 ;读P2口
XRL A,#0FH ;将A中的值与A中的值相异或
RET ;子程序返回
DELAY2: ;40ms延时去抖动子程序8FA2=40ms
MOV R5,#08H
L7: MOV R6,#0FAH
L8: DJNZ R6,L8
DJNZ R5,L7
RET
TAB:
DB 0C0H;0
DB 0F9H;1
DB 0A4H;2
DB 0B0H;3
DB 099H;4
DB 092H;5
DB 082H;6
DB 0F8H;7
DB 080H;8
DB 090H;9
DB 088H;A
DB 083H;b
DB 0C6H;C
DB 0A1H;d
DB 086H;E
DB 08EH;F
END
CODE SEGMENT
ASSUME CS:CODE
BUFF DB 5,,5 DUP()
X DW 0
START: PUSH CS
POP DS
@0:
CALL LFCR
LEA DX,BUFF
MOV AH,10
INT 21H
LEA SI,BUFF
MOV CL,[SI+1]
MOV CH,0
CLD
ADD SI,2
MOV DX,0
@1:
LODSB
CMP AL,'0'
JB @0
CMP AL,'9'
JBE @2
CMP AL,'A'
JB @0
CMP AL,'F'
JBE @3
CMP AL,'a'
JB @0
CMP AL,'f'
JBE @4
JMP @0
@2:
SUB AL,'0'
JMP @5
@3:
SUB AL,'A'
ADD AL,10
JMP @5
@4:
SUB AL,'a'
ADD AL,10
@5:
SHL DX,4
MOV AH,0
ADD DX,AX
LOOP @1
MOV AX,DX
CALL LFCR
CALL DSPAX
MOV AH,4CH
INT 21H
;==============================
LFCR:
PUSH AX
PUSH DX
MOV AH,2
MOV DL,13
INT 21H
MOV DL,10
INT 21H
POP DX
POP AX
RET
;===============================
DSPAX PROC NEAR
PUSH AX
PUSH BX
PUSH CX
PUSH DX
PUSHF
XOR CX,CX
MOV BX,10
@DSPAX1:
XOR DX,DX
DIV BX
INC CX
OR DX,30H
PUSH DX
CMP AX,0
JNE @DSPAX1
MOV AH,2
@DISPAX2:
POP DX
INT 21H
LOOP @DISPAX2
MOV DL,32
INT 21H
POPF
POP DX
POP CX
POP BX
POP AX
RET
DSPAX ENDP
;================================
CODE ENDS
END START
以上就是关于试用子程序结构编写一程序:从键盘输入一个两位十进制的月份数,然后显示出相应的英文缩写名。汇编语言要全部的内容,包括:试用子程序结构编写一程序:从键盘输入一个两位十进制的月份数,然后显示出相应的英文缩写名。汇编语言要、从键盘输入字符串,回车表示结束。编写子程序统计出该字符串中26个英文字母分别包含多少个、单片机c语言编程-编写并调试出一个键盘子程序等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)