|
AT2k Design BBS Message Area
Casually read the BBS message area using an easy to use interface. Messages are categorized exactly like they are on the BBS. You may post new messages or reply to existing messages! You are not logged in. Login here for full access privileges. |
| Previous Message | Next Message | Back to BAT Magic <-- <--- | Return to Home Page |
|
||||||
| From | To | Subject | Date/Time | |||
|
|
Visitor | ALL | choice.com |
October 31, 1995 12:47 AM * |
||
Here is yet another CHOICE program for batch file menu selections.
This one returns an errorlevel equal to the number pressed(0 -9)
and errorlevel 27 for the Esc key.
--[Cut here]----------------------------------------------------------
n choice.com
a
mov ah, 2
xor bh, bh ; Logical Exclusive OR
mov dh, 17
mov dl, 3F
int 10 ; - VIDEO - SET CURSOR POSITION
; DH,DL = row, column (0,0 = upper left)
; BH = page number
xor ah, ah ; Logical Exclusive OR
int 16 ; KEYBOARD - READ CHAR FROM BUFFER, WAIT IF EMPTY
; Return: AH = scan code, AL = character
cmp al, 1B ; Compare Two Operands
jz 11C ; Jump if Zero (ZF=1)
cmp al, 30 ; Compare Two Operands
jb 10A ; Jump if Below (CF=1)
cmp al, 39 ; Compare Two Operands
ja 10A ; Jump if Above (CF=0 & ZF=0)
sub al, 30 ; Integer Subtraction
mov ah, 4C
int 21 ; DOS - 2+ - QUIT WITH EXIT CODE (EXIT)
; AL = exit code
db 13,10,'Returns errorlevel 0 - 9 for keys 0 - 9'
db 13,10,'Returns errorlevel 27 for <Esc> key'
r cx
6E
w
q
--[Cut here]----------------------------------------------------------
Save the script between the hash marks to an ASCII file.
At the DOS prompt enter, "DEBUG < filename"
where "filename" is the name of the saved ASCII file.
___ Blue Wave/QWK v2.12
|
||||||
|
||||||
| Previous Message | Next Message | Back to BAT Magic <-- <--- | Return to Home Page |
|
Execution Time: 0.0163 seconds If you experience any problems with this website or need help, contact the webmaster. VADV-PHP Copyright © 2002-2025 Steve Winn, Aspect Technologies. All Rights Reserved. Virtual Advanced Copyright © 1995-1997 Roland De Graaf. |
