HSPに投稿されたコード一覧
#uselib "user32.dll" #func SetTimer "SetTimer" int,int,int,int #define WM_TIMER 0x0113 #define TIMER_ID 1 ; タイマーID
#module //{ 配列a - 配列b : return 引いた後の配列aのサイズ } ( aもbも破壊します) #defcfunc 配列引き算 array a, array b, int sizeA, int sizeB lpoke ln bn = sizeB
#module #deffunc うなぎ屋さんの設定 str 入力1 s = 入力1 split s, " ", table_max, group_max table_max = int(table_max)
#runtime "hsp3cl" s="sdfはghききgh" #module #defcfunc getBytes str _txt txt=_txt
#include "hscallbk.as" #include "var_assoc.as" #module #uselib ""
#module @cc2rgb #deffunc local cc2rgb array RGB,str _cc cc=_cc ccLen=strlen(cc) cci=int("$"+strmid(cc,1,ccLen-1))
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