課程設(shè)計(jì)-基于匯編語言學(xué)生成績管理系統(tǒng)(編輯修改稿)
2025-01-20 05:54 本頁面
【文章內(nèi)容簡介】 ese db 0,0 score ends show macro addrs ；顯示字符串 lea dx,addrs mov ah,9 int 21h endm set_p1 macro a ；設(shè)光標(biāo)于（ a,36） mov ah,2 mov dh,a mov dl,36 mov bh,0 int 10h endm set_p2 macro ；設(shè)光標(biāo)于（ 12， 2） mov ah,2 mov dh,12 mov dl,2 mov bh,0 int 10h endm 13 set_p3 macro ；設(shè)光標(biāo)于（ 1， 30） mov ah,2 mov dh,1 mov dl,30 mov bh,0 int 10h endm clear macro ；清整個(gè)屏幕 mov al,0 mov cl,0 mov ch,0 mov dh,24 mov dl,79 mov bh,7 mov ah,6 int 21h endm clear1 macro ；清右上記錄輸入?yún)^(qū) mov al,0 mov bh,7 mov ch,4 mov cl,36 mov dh,10 mov dl,79 mov ah,6 int 10h endm clear2 macro ；清下半部分記錄顯示區(qū) mov al,0 mov bh,7 14 mov ch,12 mov cl,0 mov dh,24 mov dl,79 int 10h endm newline macro ；回車換行 push ax push dx mov dl,0dh mov ah,2 int 21h mov dl,0ah mov ah,2 int 21h pop dx pop ax endm show_item macro addrs ；在指定位置顯示記錄 local iloop,w10 push bx push cx mov bx,0 iloop: mov dl,addrs[bx] ；顯字符串 mov ah,2 int 21h inc bx cmp bx,15 jl iloop mov cx,4 15 w10: mov dl,39。 39。 mov ah,2 int 21h mov dl,39。 39。 mov ah,2 int 21h mov dl,39。 39。 mov ah,2 int 21h mov dl,addrs[bx] mov ah,2 int 21h inc bx mov dl,addrs[bx] mov ah,2 int 21h inc bx loop w10 newline pop cx pop bx endm getin macro addrs,count2 ；從鍵盤獲取信息 local zeroit,lp,input_end,exit push bx push ax mov bx,0 zeroit: mov addrs[bx],39。 39。 inc bx cmp bx,15 16 jl zeroit mov bx,0 lp: mov ah,1 int 21h cmp al,0ah jz input_end cmp al,0dh jz input_end mov addrs[bx],al inc bx cmp bx,count2 jl lp input_end: cmp al,0dh jz exit cmp al,0ah jz exit mov ah,7 int 21h jmp input_end exit: pop ax pop bx endm code segment main proc far assume cs:code,ds:data,es:data start: mov ax,data mov ds,ax mov ah,0 ；設(shè)顯示模式 80*25 mov al,3 int 10h 17 clear show mess1 show mess2 show mess13 show mess3 show mess4 show mess5 show mess6 show mess7 show mess8 show mess9 newline show mess10 set_p3 w: mov ah,7 int 21h cmp al,39。i39。 jnz n1 call insert jmp w n1: cmp al,39。m39。 jnz n2 call modify jmp w n2: cmp al,39。d39。 jnz n3 call delete jmp w n3: cmp al,39。q39。 jnz n4 18 call query jmp w n4: cmp al,39。c39。 jnz n5 call cot jmp w n5: cmp al,39。p39。 jnz n6 call print jmp w n6: cmp al,39。l39。 jnz n7 call list jmp w n7: cmp al,39。e39。 jz exitf jmp w exitf: mov ah,4ch int 21h ret main endp insert proc near push ax push bx push cx push dx mov dx,offset fname mov al,2 mov ah,3dh ；打開文件 int 21h 19 mov bx,ax clear1 set_p1 4 call get_rec mov cx,0
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1