license
 
	\ codes for the file_server    
    1 CONSTANT #ilan_block
    2 CONSTANT #bus_block
    3 CONSTANT #bus_file  ( 25Oct1996)
	 

The packets sent from the RTI cards have to be structure for a ilan file operation as the file server sends the data directly to the master without recontruction. For this the following stuff has to be included for RTI slaves as well as when ILAN is included.

 
#BCM550h #BCM550j + #BVP5502 + #BVP5501 + #BVP5552 + #BVP5551 + [IF]
	\ can be used as a buffer to store an abort error
	#$buffer ubuffer $error

	( file commands)
	03   CONSTANT #read_ilan
	04   CONSTANT #write_ilan
	05   CONSTANT #open_ilan
	06   CONSTANT #close_ilan
	0FF  CONSTANT #error_ilan

	zero 
	DUP CONSTANT #ilan_disk_code            1+
	DUP CONSTANT #ilan_disk_i/o_id 
	DUP CONSTANT #ilan_directory_name
	DUP CONSTANT #ilan_error_string
                                        CELL+
	DUP CONSTANT #ilan_close_header_length
	DUP CONSTANT #ilan_disk_where  
	DUP CONSTANT #ilan_disk_mode   
                                        CELL+
	DUP CONSTANT #ilan_open_header_length
	DUP CONSTANT #ilan_disk_length 
                                        CELL+
    CONSTANT #ilan_disk_header_length

	CREATE $lost_interest
		," ILAN master didn't process request."

	CREATE $strange_command
		," ILAN Got read data without requesting it"

	CREATE $no_buffer
		," ILAN received data, but had nowhere to put it"

	CREATE $wrong_file
		," ILAN data returned wasn't from file requested"

	CREATE $wrong_file_pointer
		," ILAN data returned wasn't from where requested"

	CREATE $wrong_length
		," ILAN data returned was longer than requested"

	CREATE $command_length_wrong
		," ILAN packet didn't contain correct control data"

	CREATE $?data_length
		," ILAN returned data didn't contain promised data"

	CREATE $unknown_command
		," ILAN returned command unknown"

	CREATE $no_command  
		," Command not implemented."

	CREATE $bad_receive 
		," Reply came before command sent"
[THEN]