View difference between Paste ID: 8jB0AZw2 and gyRp3Qpe
SHOW: | | - or go back to the newest paste.
1
.model flat
2
.686
3
4
extern _ExitProcess@4 : PROC
5
extern _MessageBoxA@16 : PROC
6
extern _MessageBoxW@16 : PROC
7
extern __write : PROC ; (dwa znaki podkreślenia)
8
extern __read : PROC ; (dwa znaki podkreślenia)
9
public _base36_na_uint64
10
	.data
11
12
	znaki36 db '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
13
14
	.code
15
		_base36_na_uint64 PROC
16
			push ebp
17
			mov esp, ebp
18
			push esi
19
			push edi
20
			push ebx
21
			push edx
22
			mov esi, [ebp+8]
23
			mov edi, 36
24
			xor ebx, ebx
25
			xor ecx, ecx
26
			xor edx, edx
27
			dec ecx
28
			;szukam ktory to znak
29
		ptl:
30
			inc ecx
31
			mov bl, [esi]
32
			cmp bl, 0
33
			je koniec
34-
		_base36_na_uint64 ENDP
34+
35
			je dodaj
36
			jmp ptl
37
		dodaj:
38
			mul edi
39
			add eax, ecx
40
			inc esi
41
			jmp ptl
42
		koniec:
43
			pop edx
44
			pop ebx
45
			pop edi
46
			pop esi
47
			pop ebp
48
			ret
49
		_base36_na_uint64 ENDP
50
END