callp pack_init,256,8
  .if eax==ERROR
    callp printf,"pack_init() failed!"
    callp exit,0
  .endif
  callp pack_open,"grafix.dat"
  .if eax==ERROR
    callp printf,"pack_open(\"grafix.dat\") failed!"
    callp exit,0
  .endif