Lea	Dos,A1				Pointer To Dos Library
	Clr.l	D0				Version 0
	move.l	4,A6				Get Exec
	Jsr	-552(A6)			Open Lib
	Move.l	D0,A6				Store Lib In A6
	Move.l	$80,D1				Get Value
	Move.l	#Table,A1			Pointer To Name Table
	Lsl	#2,D1				Multiply By 4
	Add.l	D1,A1				Add To Base
	Move.l	(A1),D1				Get Peek
	Clr.l	D2	
	Clr.l	D3
	Jsr	-222(A6)			Execute
	Clr.l	D0				No Error
	Rts					Return
Dos
	Dc.b	'dos.library',0			Dos Lib
	Even

Table
	Dc.l	File1				Name Of File 1
	Dc.l	File2				Name Of File 2
	Dc.l	File3
	Dc.l	File4
	Dc.l	File5
	Dc.l	File6
	Dc.l	File7
	Dc.l	File8
	Dc.l	File9
	Dc.l	File10
	Dc.l	File11
	Dc.l	File12
	Dc.l	File13
	Dc.l	File14
File1	Dc.b	"TC",0			
 Even
File2	DC.B	"DP",0			
 Even
File3	DC.B	"MC",0			
 Even
File4	Dc.b	"BC",0			
 Even
File5	Dc.b	"DC",0			
 Even
File6	Dc.b	"6",0			
 Even
File7	Dc.b	"7",0			
 Even
File8	Dc.b	"8",0			
 Even
File9	Dc.b	"9",0			
 Even
File10	Dc.b	"10",0			
 Even
File11	Dc.b	"11",0			
 Even
File12	Dc.b	"12",0			
 Even
File13	Dc.b	"13",0			
 Even
File14	Dc.b	"14",0			
 Even