9b639cf2d6 2015-05-05        kinaba: import win32.windows;
9b639cf2d6 2015-05-05        kinaba: import std.stdio;
9b639cf2d6 2015-05-05        kinaba: import std.string;
9b639cf2d6 2015-05-05        kinaba: import core.runtime;
9b639cf2d6 2015-05-05        kinaba: 
9b639cf2d6 2015-05-05        kinaba: alias extern(Windows) int function( HWND a, immutable char* b, char* c, DWORD d ) CmdFuncT;
9b639cf2d6 2015-05-05        kinaba: 
9b639cf2d6 2015-05-05        kinaba: void main()
9b639cf2d6 2015-05-05        kinaba: {
9b639cf2d6 2015-05-05        kinaba: 	for(;;) {
9b639cf2d6 2015-05-05        kinaba: 		write("> ");
9b639cf2d6 2015-05-05        kinaba: 		string s = readln();
9b639cf2d6 2015-05-05        kinaba: 		if(s.length > 0) {
57ea797fa4 2015-05-05        kinaba: 			HINSTANCE h = cast(HINSTANCE) Runtime.loadLibrary("QBga32.DLL");
9b639cf2d6 2015-05-05        kinaba: 			CmdFuncT Bga = cast(CmdFuncT)GetProcAddress(h, "Bga");
9b639cf2d6 2015-05-05        kinaba: 			int r = Bga(NULL, s.toStringz(), null, 0);
57ea797fa4 2015-05-05        kinaba: 			Runtime.unloadLibrary(h);
9b639cf2d6 2015-05-05        kinaba: 			writeln("Return: ", r);
9b639cf2d6 2015-05-05        kinaba: 		}
9b639cf2d6 2015-05-05        kinaba: 	}
9b639cf2d6 2015-05-05        kinaba: }