endian big
for FILES = 0
	FindLoc VAGOffset string "VAGp"
	goto VAGOffset
	idstring "VAGp"
	get twenty long
	get null long
	get fileSize long
	get unk long
	get null longlong
	get null long
	get filename string
	do 
		get single byte
	while single == 0
	savepos dataStart
	math dataStart - 1
	log filename dataStart fileSize
next FILES