| /programs/games/hunter/trunk/math.inc |
|---|
| 0,0 → 1,44 |
| ; |
| ; Mathematical functions |
| ; |
| ; Author: Trans |
| ; Date: 08.03.2005 |
| ; Compiler: FASM |
| ; Target: Hunter - MeOS game |
| ; |
| rinit dw 0 |
| ; Randomize of 8 bits |
| ; In: |
| ; Out: AL - random value |
| random_8: |
| push ebx |
| push ecx |
| xor eax,eax |
| mov ax,[rinit] |
| cmp ax,0 |
| jnz rand_loc_00 |
| mov eax,26 |
| mov ebx,9 |
| int 40h |
| mov [rinit],ax |
| shl eax,16 |
| shr eax,16 |
| rand_loc_00: |
| mov ecx,8 |
| rand_loc_01: |
| mov bx,ax |
| and bx,002Dh |
| xor bh,bl |
| clc |
| jpe rand_loc_01a |
| stc |
| rand_loc_01a: |
| rcr ax,1 |
| loop rand_loc_01 |
| mov [rinit],ax |
| xor ah,ah |
| pop ecx |
| pop ebx |
| retn |