HSPTV!掲示板

#uselib "user32"

#cfunc GetWindowLong "GetWindowLongA" int, int
#func SetWindowLong "SetWindowLongA" int, int, int

#define GWL_EXSTYLE -20
#define WS_EX_TOOLWINDOW	0x0080

gsel 0, -1

bgscr 1, 640, 480, 2
SetWindowLong hWnd, GWL_EXSTYLE, GetWindowLong(hWnd, GWL_EXSTYLE) | WS_EX_TOOLWINDOW

gsel 1, 1

これだと白になってしまいます。黒にする方法おしえてください。♪

画面を黒にしたいだけなら画面を初期化後に、

color 0,0,0 : boxf	;色を黒に指定して矩形を塗りつぶす

を追加すればいいですよ。

/*ご参考(cls 4 で黒で塗りつぶされると思う)*/

エルさんありがとうございます！できました！