HSPのコード一覧 | Codetter（こーどったー）

#include "hspinet.as"

title"文字化けちゃう"

text=""

sdim longRange@Chess,,5,5
longRange@Chess(0,0)="＼","　","｜","　","／"
longRange@Chess(0,1)="　","＼","｜","／","　"
longRange@Chess(0,2)="―","―","＊","―","―"
longRange@Chess(0,3)="　","／","｜","＼","　"

#cmpopt varinit 1

#const global dispX 640
#const global dispY 480
#const global keyLeft 37

; ラッパーモジュール
; Variant.as
#ifndef Variant
#ifndef VariantAliasOff
	#define global vDim dim@Variant

; 【動的型配列コンテナ】VarArrayモジュール
; VarArray.as
#ifndef VarArray
#ifndef VarArrayAliasOff
	#define global vaCount count@VarArray

;https://yukicoder.me/problems/no/253
#runtime "hsp3cl"

numMin=10
numMax=1000000001

;https://yukicoder.me/problems/no/246
#runtime "hsp3cl"

numMin=1
numMax=1000000001

#include "HSP3utf.as"
#include "kernel32.as"
#define WM_MOUSEMOVE                    0x0200

	screen 0, 1600, 900

#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

#runtime "hsp3cl"

#define ctype Person(%1,%2,%3,%4,%5) \
	%1_name.%2=%3 :\
	%1_age.%2=%4 :\