5 !example BASIC program which reads the USER.SYS file
10 map1 record
20	map2 usrnam,s,8		! user name
30	map2 fill,x,12		! filler
80	map2 etim,b,4		! elapsed time
90	map2 ctim,b,4		! processor time
100 
105	lookup "dsk0:user.sys[1,2]",size
106	maxrec = abs(size)*16	! maximum number of records in file
110	open #1,"dsk0:user.sys[1,2]",random,32,rec
115 read'next:
120	read #1,record
125	if usrnam="" then goto eof
130	print rec,usrnam,etim/60,ctim/60
140	rec=rec+1: if rec<maxrec then goto read'next
160 eof:
170	close #1
180	end