BBS: Inland Empire Archive
Date: 08-31-92 (17:16) Number: 14
From: ZACK JONES Refer#: NONE
To: WALTON DELL Recvd: NO
Subj: CHAIN to .bat???? Conf: (2) Quik_Bas
> P.S. I've heard of QBSwap and would like to know more about
No need for QBswap. Try this.
Credit goes to David Poskie who originally posted it.
SUB PokeBuffer (Cmd$) STATIC
Work$ = LEFT$(Cmd$, 14) + CHR$(13)
Length% = LEN(Work$)
DEF SEG = 0
POKE 1050, 30
POKE 1052, 30 + Length% * 2
FOR Index% = 1 TO Length%
POKE 1052 + Index% * 2, ASC(MID$(Work$, Index%))
It's quite easy to use. Suppose you want to call Dell.bat -
here's how you could do it.
what this will do is
buffer - add a carriage return end and then run Dell.BAT -
the last line of Dell.BAT should be the name of the program
you want to return to.
Good Luck with it!
* Origin: Zack's Shack - San Antonio TX (1:387/905.1)