本当の内容は、自作の「a2d+AlphaLayerモジュール」が Windows10 Ver.20H1アプデ以降から原因不明のバグが出て悩んでたんですけど解決したので記念宣伝のための投稿です。
a2d+AlphaLayerモジュール
・Artlet2Dモジュール(a2d.hsp)の仮想イメージを用いて、アルファブレンド半透明 子ウィンドウを作ることができます。
mod_TimerRepeatモジュール(ついでに宣伝)
・一定間隔で実行するタイマー機能をrepeat〜loopのような記述で簡単に利用することが出来るようになります。
サンプルゲーム: Floppy-Word
↓自作モジュール#netIncludeを利用して、ゲームスクリプトごとダウンロードします。
・一度目は「どこどこにスクリプトをダウンロードします」と言ってくるので OK して、もう一度実行してください。
// ↓#netinclude - module (min Version) #ifdef _debug #include "hspinet.as" #include "mod_regexp.as" #define netinclude(%1,%2=_) addition %1* %2 exist"hsptmp":if strsize>0{t@_@="":d@_@=dir_exe+"\\common\\":notesel t@_@:noteload"hsptmp":noteunsel:matches t@_@,t@_@,"#netinclude\\s*\"(.+?)\"\\s*/\\s*,*\\s*(\\w*)":repeat stat:r@_@="":if t@_@.cnt.2="common"{r@_@=d@_@}exist r@_@+t@_@.cnt.1:t@_@.cnt="0":if strsize<0{if r@_@!d@_@{t@_@.cnt="1":n@_@++}else{t@_@.cnt="2":m@_@++}}loop:if n@_@+m@_@>0{a@_@=dir_cur+"\\\n\nに\n\n":repeat 2,1:if n@_@=0&cnt=1{continue}if m@_@>0&cnt=2{if n@_@!0{a@_@+="\nをダウンロード、\n------\n\n"}else{a@_@=""}a@_@+=d@_@+"\n\nに\n\n"}r@_@=""+cnt:foreach t@_@:if t@_@.cnt!r@_@{continue}a@_@+="・"+t@_@.cnt.1+"\n":loop:loop:dialog a@_@+"\nをダウンロードします",2,"#net\include":if stat=6{netinit:foreach t@_@:if t@_@.cnt="0"{continue}c@_@=dir_cur:if t@_@.cnt="2"{chdir d@_@}split t@_@.cnt.1,"/",r@_@:if stat>0{repeat stat-1:dirlist a@_@,r@_@.cnt,5:if stat=0{mkdir r@_@.cnt}chdir r@_@.cnt:loop}neturl "https://raw.githubusercontent.com/"+getpath(t@_@.cnt.1,32):netload getpath(t@_@.cnt.1,8):chdir c@_@:loop:dialog"再実行して下さい":end}}sdim t@_@} #else #define netinclude(%1,%2=_) include %1 #endif // GitHubからスクリプトをダウンロード。 #netinclude "MIZUSHIKI/HSP-Module/master/a2d+AlphaLayer.hsp"/ #netinclude "MIZUSHIKI/HSP-Module/master/mod_TimerRepeat.hsp"/ #netinclude "MIZUSHIKI/HSP-Module/master/SAMPLE/FloppyWord.hsp"/
「勝手にダウンロードすると言われても怖い」という方はGitHubにあるスクリプトで中身が見えるので確認してください。
https://github.com/MIZUSHIKI/HSP-Module
このゲームは HSPプログラムコンテスト2020 に投降した#netIncludeモジュールに同梱していたおまけゲームです。
・サンプルのくせに中身ぐちゃぐちゃです(〜へ〜;
・モジュールをちゃんと確認したい方はモジュール配布ページからダウンロードして同梱のサンプルをご覧ください。
http://suwa.pupu.jp/HSP/index.html