ok this works for me.
the freebasic function
the blitz decls
the blitz test example
and finaly the output
the freebasic function
function banktest(byval bank as integer) as integer export poke byte, bank, 123 poke byte, bank+1, 10 function = 1 end function
the blitz decls
.lib "mydll.dll" banktest%(bank*):"BANKTEST@4"
the blitz test example
; ; ; bank = CreateBank(10) banktest(bank) For loop = 0 To BankSize(bank)-1 Print PeekByte(bank,loop) Next MouseWait End
and finaly the output
123 10 0 0 0 0 0 0 0 0