HSPTV!掲示板

ソフトのロゴをかっこよく表示するためのサンプルプログラム

#uselib "user32.dll"
#func SetWindowLong "SetWindowLongA" int,int,int
#func SetLayeredWindowAttributes "SetLayeredWindowAttributes" int,int,int,int
#const LWA_COLORKEY     1             ;透明色を指定
#const LWA_ALPHA        2             ;アルファー値を指定
#const GWL_EXSTYLE    -20             ;拡張ウィンドウスタイル
#const WS_EX_LAYERED  $00080000       ;透明なウィンドウ属性
	bgscr 0,640,480,2,ginfo_dispx/2-320,ginfo_dispy/2-240
	alpha = 0
	SetWindowLong hwnd,-20,WS_EX_LAYERED
	SetLayeredWindowAttributes hwnd,0,alpha,LWA_ALPHA
	gsel 0,1
	//---ロゴに表示する文字や画像はここから---
	
	//-------------ここの間に書く-------------
	dim rogos
	repeat
	alpha = rogos  ; 0〜255
	SetWindowLong hwnd,-20,WS_EX_LAYERED
	SetLayeredWindowAttributes hwnd,0,alpha,LWA_ALPHA
	rogos=rogos+3
	if rogos>255 : break
	await 10
	loop
	stop

是非ご活用ください。

文字をおいてもerror 2 : 文法が間違っています (14行目)
どのようにおくのでしょうか

そこの間にはmesやpicloadやgcopyといった命令を書くところです
説明不足で申し訳ない・・・

たぶんmes命令とかで置いてっていうことなんじゃないかと……；

文字が勝手にロゴになるのかと思いましたけど背景が変わるんですね
お答え　ありがとう