; --------------------------------------------------
; --
; -- examples/example3.bb
; --
; -- Quick example of creating a new zip archive 
; -- and adding some files to it.
; --
; --------------------------------------------------
 
; Include required libraries
Include "../Blitz_Basic_Bank.bb"
Include "../Blitz_File_FileName.bb"
Include "../Blitz_File_ZipApi.bb"
 
; Open our new archive
Local zipOut	= ZipApi_CreateZip("my-test.zip")
 
; Add some test files
ZipApi_AddFile(zipOut, "example1.bb")
ZipApi_AddFile(zipOut, "example2.bb")
ZipApi_AddFile(zipOut, "example3.bb")
 
; Create a bank, and add that too!
Local testData$	= "I never existed as a file!"
Local bankToAdd	= CreateBank(Len(testData) + 1)
PokeString(bankToAdd, 0, testData)
ZipApi_AddBankAsFile(zipOut, bankToAdd, "test-file.txt")
FreeBank bankToAdd
 
; Close the zip
ZipApi_CloseZip(zipOut)
 
; We're all done, so let's check it out
Local zipIn		= ZipApi_Open("my-test.zip")
 
; Get some information
Local zipInfo.ZIPAPI_GlobalInfo = ZipApi_GetGlobalInfo(zipIn)
 
Print "my-test.zip contains " + zipInfo\NumberOfEntries + " entries"
 
; Cleanup
ZipApi_Close(zipIn)
Delete zipInfo