Usenet.com

www.Usenet.com

Group Index

Rec Thread Archive from Usenet.com

<-- __Chronological__ --> <-- __Thread__ -->

Re: TNT



John Gaughan wrote:
>#include <fstream>
>#include <iostream>

(Snip)

Since I'm a weenie, I'll have to use BASIC. (Untested.)

usedtobe$ = CHR$(23): willbe$ = CHR$(7)  '$17 to $07      
thisbytes = 4802628 ' $494844    
a$ = " "
IF (COMMAND$ = "") OR (INSTR(COMMAND$, "/") <> 0) THEN PRINT "Use: TNTFIX 
(path to tnt.wad)": END
OPEN COMMAND$ FOR BINARY AS #1
GET #1, thisbytes + 1, a$
IF a$ = usedtobe$ THEN PUT #1, thisbytes + 1, willbe$: PRINT "Patched.": GOTO 
10
IF a$ = willbe$ THEN PRINT "Already patched.": GOTO 10
PRINT "Uhh, I don't know what's going on. Byte 4802628 ($494844) was"; 
ASC(a$); ", not 17."
10 CLOSE
END

--
Pointless sig file.
http://archonrealm.tripod.com | http://archonrealm.cjb.net/
Replace "Doom!" with "Hotmail" to send e-mail.
End pointless sig file.



<-- __Chronological__ --> <-- __Thread__ -->


Usenet.com



Please check out one of the premium Usenet Newsgroup Service Providers below for access to Usenet.