.model small,c
.stack 0

charset segment
	assume cs:charset,ds:charset
	org 100h

hany		equ	128
hany8		equ	128

prog:		call	savechar
		int	20h

filenev		db	"kaland.pcs",0
file		dw	0

include	<4prischx.asm>
include	<4prisorb.asm>
include	<4prixchx.asm>
include	<4prixorb.asm>
include <4savecha.asm>

charset ends

end prog
