;WordMaster 1.07A Patch for FM-7/8
;by @haserin09 Apr.5,2020

 ORG 180H
OUTCHR EQU 01EFH
CLRSCRN: MVI A,0CH
 JMP OUTCHR

 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

TCURSOR: MVI A,1BH
 CALL OUTCHR
 MVI A,'='
 CALL OUTCHR
 MVI A,20H
 ADD L
 CALL OUTCHR
 MVI A,20H
 ADD H
 JMP OUTCHR

 DB 0,0,0,0,0,0,0,0,0,0

 ORG 1B9H
SCREEN: DB 25,80
EREOL: DB 0,0
NOVIO: DB 0FFH,0,0,0
DELCLR: DB 1
DELCUS: DB 1
DELERE: DB 1

 DB 0,0,0,0,0,0,0,0,0,0
 DB 0,0,0,0,0,0,0,0,0,0

 END
