Declare Function MessageBox Lib "user32.dll" Alias "MessageBoxA" (ByVal hwnd As Long, ByRef lpText As zString, ByRef lpCaption As zString, ByVal wType As Long) As Long
% MB_OK =0
bstring sText="HELLO BASIC AND EVERYTHING ELSE."
bstring caption ="MELDUNG "
Sub Report(zstring*Text)
push MB_OK
push caption
push @Text 'push [ebp+8]
push 0
call MessageBox
End Sub
call Report(sText)
bstring sText =" WHY BSTRING?"
call Report(sText)
zstring sText =" ZSTRING PTR WILL ALSO DO!"
call Report(sText)