几个简单的汇编题目，做对100分答谢

[ckh2007]

以下三个题目，随便做对一题，重分达谢，求求各位帮忙啊！
1 名字测算：输入英文姓名，根据每个字母(在字母表中的序号之和) MOD 4的结果判断吉凶，0：大吉，1：吉，2：凶，3：大凶。
要求能排除非字母字符。
2 文本编辑：清屏，输入字符串并保存至文件，要求以行为单位进行保存，’#’删除前一个字符，’@’删除整行，F2保存文件，
Alt+F4退出。
3 小蜜蜂游戏：清屏，在屏幕上方正中显示若干“蜜蜂”（字符’W’），屏幕下方显示“战 斗机”（字符’A’），
用方向键控制“战斗机”左右移动，空格键控制“子弹”（字符’.’）的发射，“子弹”由下至上沿直线运动，
“击中”蜜蜂则“蜜蜂”变红后消失。
任意做对一道题，给100分

[Princezhouf]

课程设计？！我晕...今天赶车，明天再说吧~哎，现在的孩子

[ckh2007]

楼上的仁兄，拜托啊，谢谢了

[pl1010]

做第一题吧 ，最简单。你可以拿下面这个改一点就成了。
很简单的，你只要吧、一个loop吧顺序加起来，再mod4
即可，希望能做出啦，我也有别的课设，呵呵！
/////////////////////////////////////////////////////////
编写完整程序，输入一个字母，输出该字母在英文字母表中的顺序号，若输入的不是字母则输出“*”。注意输入的字母既可以是大定也可以是小写。
code segment
assume cs:code
main: mov ah,1
int 21h ;输入字符到al
mov bl,al ;暂存

mov ah,2 ;回车换行
mov dl,13
int 21h
mov dl,10
int 21h

cmp bl,'A' ;和'A'比较
jl lab1 ;小于'A'跳转lab1输出'*',大于等于'A'继续比较
cmp bl,'Z' ;和'Z'比较
jle lab2 ;小于等于'Z'表明为大写字母，跳转lab2求序号
cmp bl,'a' ;和'a'比较
jl lab1 ;小于'a'跳转lab1输出'*',大于等于'a'继续比较
cmp bl,'z' ;和'z'比较
jg lab1 ;大于'z'跳转lab1输出'*',小于等于'z'表明为小写字母
sub bl,'a'-1 ;计算小写字母的顺序号
jmp lab3
lab2: sub bl,'A'-1 ;计算大写字母的顺序号
lab3: mov ah,0 ;准备被除数ax
mov al,bl
mov bl,10 ;准备除数bl
div bl ;十位在al中,个位在ah中
mov bx,ax ;将结果暂存到bx中
add bx,3030h

mov ah,2
cmp bl,'0' ;若十位为'0',不输出
jz lab5
mov dl,bl ;输出十位
int 21h
lab5: mov dl,bh ;输出个位
int 21h
jmp lab4

lab1: mov ah,2 ;输出'*'号
mov dl,'*'
mov al,2
int 21h

lab4: mov ah,4ch ;控制权交还DOS
int 21h
code ends
end main

[RockurSoul]

第一题：

DATA SEGMENT
MSG_INPUTNAME DB "Input Name,ENTER for End:$"
NAMENUM DB 100 DUP(?)
NUM DW ?

MSG_BEST DB 13,10,"BEST NAME!",'$'
MSG_GOOD DB 13,10,"GOOD NAME!",'$'
MSG_BAD DB 13,10,"BAD NAME!",'$'
MSG_WORST DB 13,10,"WORST NAME!",'$'
DATA ENDS

CODE SEGMENT
ASSUME ds:DATA,CS:CODE
MAIN PROC FAR
mov ax,DATA
mov ds,ax
lea dx,MSG_INPUTNAME
mov ah,09h
int 21h

mov si,0
lop1:
mov ah,01h
int 21h
cmp al,0dh
jz addname

cmp al,'a'
jnc next1
jmp checkA
next1:
cmp al,'z'
jna savechar

checkA:
cmp al,'A'
jnc next2
jmp lop1
next2:
mov al,'Z'
jna savechar
savechar:
cmp al,'a'
jc subA
sub al,'a'
jmp savenum
subA:
sub al,'A'
savenum:
add al,1
mov NAMENUM[si],al
inc si
jmp lop1

addname:
mov NUM,si
mov ax,0
mov cx,NUM
mov si,0
lop2:
add al,NAMENUM[si]
adc ah,0
inc si
loop lop2

mov dx,0
mov cx,4
div cx
case0:
cmp dx,0
jnz case1
lea dx,MSG_BEST
jmp disp
case1:
cmp dx,1
jnz case2
lea dx,MSG_GOOD
jmp disp
case2:
cmp dx,2
jnz case3
lea dx,MSG_BAD
jmp disp
case3:
lea dx,MSG_WORST
jmp disp

disp:
mov ah,09h
int 21h
exit:
mov ah,01h
int 21h
mov ah,4ch
int 21h
MAIN ENDP


CODE ENDS
END MAIN