K-s skymonsters-Ks
skymonsters-Ks
/ Mk-Synth.hsp
Created
April 30, 2017 16:43
HSPプログラムコンテスト2016 HSPTV部門 応募作品「Mk-Synth」ソースコード
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /* | |
| Mk-Synth | |
| http://dev.onionsoft.net/seed/info.ax?id=1199 | |
| required Shift-JIS | |
| tested: HSP 3.5b3 | |
| license: NYSL 0.9982 (http://www.kmonos.net/nysl/) | |
| */ |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /* | |
| Notepad++用ファイル実行補助ツール | |
| Notepad++で編集中の文書を保存し登録したファイルを実行します | |
| 主にコードのコンパイルに使用します | |
| 使い方 | |
| 1. このスクリプトをコンパイルして実行ファイル(nppcl.exe)作成 | |
| 2. nppcl.exe を notepad++.exe と同じフォルダにコピー | |
| 3. nppcl.ini を同じフォルダに新規作成 | |
| 内容は、1行目は 0 |
skymonsters-Ks
/ palanime.hsp
Last active
January 13, 2019 16:22
パレットモードでパレットアニメーション (tested with HSP 3.51)
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #const HUE_RANGE 192 | |
| screen 0, 640, 480, 1 | |
| mes "Initializing..." | |
| screenW = ginfo_sx | |
| screenH = ginfo_sy | |
| centerX = screenW / 2 | |
| centerY = screenH / 2 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| randomize | |
| screenW = ginfo_sx | |
| screenH = ginfo_sy | |
| centerX = screenW / 2 | |
| centerY = screenH / 2 | |
| num = 200 | |
| ddim posx, num | |
| ddim posy, num |
skymonsters-Ks
/ km-input.hsp
Last active
May 19, 2019 05:11
キーボードマニア専用コントローラの入力を取得するHSPモジュール（サンプル動かすには途中の #if 0 を #if 1 にしてください）
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /* | |
| キーボードマニア専用コントローラ入力取得モジュール | |
| 24鍵とスタート・セレクトボタン、ホイール上下の入力、複数のコントローラ対応 | |
| license: NYSL 0.9982 (http://www.kmonos.net/nysl/) | |
| tested: HSP 3.5b4 | |
| */ | |
| #module kminput |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ; Enterキーで選択中の作品ページを開きます | |
| #include "hspinet.as" | |
| #define URL_BASE "dev.onionsoft.net/seed/info.ax?id=" | |
| #define PROTOCOL "https://" | |
| netinit | |
| if stat : dialog "connection error" : end | |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #include "user32.as" | |
| #include "gdi32.as" | |
| #ifndef SetProcessDPIAware | |
| #uselib "user32" | |
| #func SetProcessDPIAware "SetProcessDPIAware" | |
| #endif | |
| #uselib "shcore" | |
| #func SetProcessDpiAwareness "SetProcessDpiAwareness" int |
skymonsters-Ks
/ NppHspLang.xml
Last active
January 19, 2020 09:11
Notepad++用 HSP(3.6 beta2) 自動補完キーワードとシンタックスハイライト
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <NotepadPlus> | |
| <UserLang name="HSP" ext="hsp as" udlVersion="2.1"> | |
| <Settings> | |
| <Global caseIgnored="yes" allowFoldOfComments="no" foldCompact="no" forcePureLC="0" decimalSeparator="0" /> | |
| <Prefix Keywords1="no" Keywords2="no" Keywords3="no" Keywords4="no" Keywords5="no" Keywords6="no" Keywords7="no" Keywords8="yes" /> | |
| </Settings> | |
| <KeywordLists> | |
| <Keywords name="Comments">00; 00// 01 02 03/* 04*/</Keywords> | |
| <Keywords name="Numbers, prefix1"></Keywords> | |
| <Keywords name="Numbers, prefix2">% $ 0b 0x</Keywords> |
skymonsters-Ks
/ rand.hsp
Created
January 25, 2020 12:52
標準HSPと線形帰還シフトレジスタによるランダム出力。参考元：https://wiki.hsp.moe/Module%EF%BC%8F%E7%B7%9A%E5%BD%A2%E5%B8%B0%E9%82%84%E3%82%B7%E3%83%95%E3%83%88%E3%83%AC%E3%82%B8%E3%82%B9%E3%82%BF.html
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #const SCALE 1 | |
| screen 0, 1600, 900 | |
| ox = double(ginfo_sx / 4), ox * 3 | |
| oy = double(ginfo_sy / 2), oy | |
| x = ox, ox.1 | |
| y = oy, oy | |
| randomize | |
| a = hwnd, a | |
| cf = 1 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ; #include "hgimg4.as" ; HGIMG4 は HSP3.6b2 以降 | |
| #include "user32.as" | |
| #module | |
| #const GWL_STYLE -16 | |
| #const WS_POPUP $80000000 | |
| #const WS_VISIBLE $10000000 | |
| #const WM_KILLFOCUS $8 | |
| #const WM_GETMINMAXINFO $24 |
OlderNewer