能力值:
( LV2,RANK:10 )
|
-
-
2 楼
图都挂了。。。。。。这是原文,也是我写的http://user.qzone.qq.com/1030456330#!app=2&via=QZ.HashRefresh&pos=1360333241
下面是算序列号的程序代码
;by 夜兽
assume cs:codesg
datasg segment
db 0ch,0ah,13h,09h,0ch,0bh,0ah,08h
datasg ends
strsg segment
db 32 dup (0)
strsg ends
_s segment
db ' $'
_s ends
codesg segment
start: mov ax,datasg
mov ds,ax
mov ax,strsg
mov es,ax
xor di,di
xor cx,cx
_input:
mov ax,0
int 16h
cmp ah,1
je _end
cmp ah,01ch
je _inputfinish
mov es:[di],al
inc di
inc cx
call showstr
jmp short _input
_inputfinish:
xor dx,dx
mov di,3
xor si,si
sub cx,3
sss:
mov al,es:[di]
mov bl,[si]
mul bl
add dx,ax
inc si
cmp si,8
jne _sitoz
xor si,si
_sitoz:
inc di
loop sss
call dxascii
mov ah,9
mov dx,0
int 21h
call _enter
call _szero
jmp short start
_end:
mov ax,4c00h
int 21h
;=============================
;换行
_enter:
push ax
push bx
push cx
push dx
mov ah,03h
int 10h
inc dh
mov dl,0
mov ah,02h
int 10h
pop dx
pop cx
pop bx
pop ax
ret
;=============================
;=============================
;变量初始化
_szero:
push ax
push bx
push cx
mov ax,_s
mov ds,ax
xor bx,bx
mov cx,15
_sloop:
mov byte ptr [bx],' '
inc bx
loop _sloop
mov byte ptr [bx],'$'
pop cx
pop bx
pop ax
ret
;=============================
;=============================
;dx
;--> _s '','$'
dxascii:
push ax
push bx
push cx
push si
push di
mov si,14
mov ax,_s
mov ds,ax
mov ax,dx
dxdiv:
xor dx,dx
mov bx,10
div bx
add dl,30h
mov [si],dl
dec si
cmp ax,0
jne dxdiv
pop di
pop si
pop cx
pop bx
pop ax
ret
;=============================
;=============================
;参数:al
showstr:
push ax
push bx
push cx
push dx
mov ah,0ah
mov bh,0
mov cx,1
int 10h
mov ah,03h
int 10h
inc dl
mov ah,02h
int 10h
pop dx
pop cx
pop bx
pop ax
ret
;=============================
codesg ends
end start
|
能力值:
(RANK:350 )
|
-
-
3 楼
文章中的图片参考这帖http://bbs.pediy.com/showpost.php?postid=292659,建议转到论坛本地。
己手工给你转正了。
|
能力值:
( LV2,RANK:10 )
|
-
-
4 楼
谢谢看雪大神!
|