MODEL MEDIUM, BASIC
.STACK 20H
.386
.CODE

;SUB RELINITTEXT
;STACK
;QB RET SEG     =2
;QB RET OFF     =0

PUBLIC RELINITTEXT
RELINITTEXT PROC

MOV AX,0003H              
INT 10H                  ;SWITCH TO QB SCREEN 0

RET 

RELINITTEXT ENDP
END





