Category : C Source Code
Archive   : CEXPRESS.ZIP
Filename : NUMLKON.ASM
EXTRN _memory_model:byte
_TEXT SEGMENT BYTE PUBLIC 'CODE'
ASSUME CS:_TEXT
PUBLIC _num_lock_on
_num_lock_on proc near
mov ah,2 ;BIOS kybd status func
int 16h ;call the interrupt
mov bx,1 ;TRUE value
test al,32 ;test bit 5
jnz L1 ;jump if TRUE
mov bx,0 ;FALSE value
L1: mov ax,bx ;place value for return
cmp _memory_model,0 ;quit
jle quit ;
db 0CBh ;RET far
quit: ret ;RET near
_num_lock_on ENDP
_TEXT ENDS
END
Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!
This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.
But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/