DataMuseum.dk

top - metrics - download

    Length: 2688 (0xa80)
    Types: TextFile
    Names: »FILEX.CMD«

└─⟦d530d7e91⟧ Bits:30002705 SW1500 Concurrent DOS 5.2 Disk 3/3
    └─⟦this⟧ »FILEX.CMD« 

TextFile

▶06◀REMOTE▶05◀NOEND▶01◀=▶08◀<>,;?*ÆÅ* $Remote operation
$FILEX   vers. 1.0  83.01.19
$Cannot open source file
$Directory full on destination disk
$No space on destination disk
$Cannot close file on remote disk
$Cannot close file on local disk
$Transmission error
$*** Parameter error ***
$▶01◀P▶12◀▶06◀▶0b◀▶11◀▶fe◀▶05◀
▶11◀▶06◀▶07◀▶11◀▶08◀▶06◀▶06◀▶11◀▶06◀▶0b◀▶11◀▶0e◀▶06◀
▶11◀▶10◀▶06◀▶06◀id/dato
	NETDRV   RSP	Styresystem, NET-driver
	PIN750   RSP	Styresystem, tastatur
	TMP750   RSP	Styresystem, kommandofortolke    				;FILEX program version 1.0  19 jan 83
				;
				;
false	equ	0		;
true	equ	1		;
				;
c_getnum	equ	99h	;
c_setnum	equ	94h	;
c_read		equ	01h	;
c_write		equ	02h	;
print	equ	9		;
rdco	equ	10		;
open	equ	15		;
close	equ	16		;
delete	equ	19		;
read	equ	20		;
write	equ	21		;
make	equ	22		;
dmaoff	equ	26		;
dmaseg	equ	51		;
				;
ok	equ	0		; result values
nexist	equ	1		;
full	equ	2		;
eof	equ	3		;
transm	equ	4		;

CSEG
CodeMacro pusha
db	60h
endM
CodeMacro popa
db	61h
endM

start:				;
	mov	cl,156		;
	int	224		; get PD address
	mov	sys_dat,es	;

	mov	cl,c_getnum	;
	int	224		;
	mov	def_console,al	;
	mov	cl,91h		; set priority
	mov	dl,0b0h		;
	int	224		;
	mov	ax,ds		;
	mov	es,ax		;

	MOV	DX,0080H	;
	MOV	BX,OFFSET conslen
				; move program call parameters
	MOV	SI,DX
	LODSB			; to cons buffer
	MOV	CH,AL		;
	MOV	ÆBXÅ,AL		;
	INC	BX
	INC	DX
m1:	MOV	AL,CH		;	
	OR	AL,AL		;
	JZ	mm		;
	MOV	SI,DX
	LODSB			;
	MOV	ÆBXÅ,AL		;
	INC	BX
	INC	DX
	DEC	CH		;
	JMP 	
▶ba◀▶93◀▶ff◀▶ff◀▶ba◀▶93◀: unmatched quoteCannot open Cannot append Cannot create : No matchStack Overflow
$<>.,=:øÆÅ*
Raw I/OC RTL - program not linked for 
Program terminating
$
$▶f4◀▶1b◀▶ff◀▶ff◀▶f4◀▶1b◀<>.,=:øÆÅ*