hspのタグがつけられたコード一覧 | | Codetter（こーどったー）

//ゲーム内時間とステータス
*lay
	layl = lparam
	switch layl
		//レイヤー設置直後の処理

#define CLSID_FileOpenDialog "{DC1C5A9C-E88A-4dde-A5A1-60F82A20AEF7}"
#define IID_IFileOpenDialog "{d57c7288-d4ad-4768-be02-9d969532d960}"
#usecom IFileOpenDialog IID_IFileOpenDialog CLSID_FileOpenDialog
#comfunc IFileOpenDialog_QueryInterface 0 int, int
#comfunc IFileOpenDialog_Show 3 int

#module
	#define global u8(%1) ToUTF8(%1)
	#uselib "kernel32.dll"
	#func MultiByteToWideChar "MultiByteToWideChar" int, int, int, int, int, int
	#func WideCharToMultiByte "WideCharToMultiByte" int, int, int, int, int, int, int, int

#module Person
	#enum name=0
	#enum age
	#enum high
	#define ctype new(%1,%2,%3,%4) \

#module Person
	;int
	#enum age=0
	;str
	#enum name=0

#runtime "hsp3cl"

#module Generator co,value,c
	#modcfunc gNext
		gosub co

#runtime "hsp3cl"
#cmpopt varinit 1

#module TrumpCard name,power,suit
	#modinit str _name,int _power,int _suit

// http://wowdev.jp/?p=873
// https://qiita.com/Ushio/items/a19083514d087a57fc72
/**
 * FNV Constants
 */

// 
// [ Infomation ]
//  Name      : 高速strmid
//  SubName   : 
//  Version   : 1.00

; KORGのnanoKEY2でしか動作確認していないのでそこんとこよろしく
; 別にこれ↓やっておく必要ないんだけど渡された数値表示するよりはわかりやすいかと	
	sdim code,64,128
	code(0x0)  = "c ","c#","d ","d#","e ","f ","f#","g ","g#","a ","a#","b ","c ","c#","d ","d#"
	code(0x10) = "e ","f ","f#","g ","g#","a ","a#","b ","c ","c#","d ","d#","e ","f ","f#","g "