new

bmpsave.hsp
読み込んだ画像を加工してBMPで出力するプログラム mydir=dir_cur 現在のディレクトリを保存 ファイルを選択 dialog "bmp *.jpg *.gif",16 if stat = 0 : end fname=refstr picload fname @を画面に書く font msgothic,160 color 0,0,255:mes "@" 保存 sname=getpath(fname,1+8)+"_mod_bmp" chdir mydir bmpsave sname
sample\new\bmpsave.hsp - 2010/04/30

calcsheet.hsp
簡単な表計算を行なうサンプル 枠の中に入力した数値の合計を表示し、値に応じた棒グラフを表示します。 数値を入力して、[TAB]キーで次の枠に移動できます。 HSP3.2で追加されたobjskip命令により、合計の枠はフォーカスが移動 しないよう設定されています。
sample\new\calcsheet.hsp - 2010/04/30

filedialog.hsp
ファイルダイアログ指定サンプル(HSP3.2) dialog命令により呼び出されるファイル選択ダイアログの パラメーター指定例を実際に実行することができます。 複数の拡張子、ファイル種別を区切り記号により記述することができます。
sample\new\filedialog.hsp - 2010/04/30

gblur.hsp
文字を描画して、その画像にぼかしをかけます 何段階かぼかしをかけた画像を切り替えながら表示します #module #deffunc gblur int p1, int p2 簡易ぼかしモジュール gblur ぼかし強度 , 方向フラグ 現在の操作先バッファに簡易ぼかしを適用します。 ぼかし強度は、大きい値ほど強くなります(処理も重くなります)。 方向フラグは、0=XY、1=Y、2=Xの方向を選択します(通常は0)。
sample\new\gblur.hsp - 2010/04/30

gradf.hsp
gradf命令サンプル sx=640: sy=480 screen 0,sx,sy それぞれの頂点座標と色を配列に代入 x(0)=0 : y(0)=0 : col(0)=$0000ff x(1)=sx : y(1)=0 : col(1)=$00ffff x(2)=sx : y(2)=sy : col(2)=$ff0000 x(3)=0 : y(3)=sy : col(3)=$ff00ff グラデーションで四角形を描画 gsquare gsquare_grad, x,y,col
sample\new\gradf.hsp - 2010/04/30

mkfont.hsp
画像font maker name="System" sname="font" anti=1 sx=32:sy=32 sx2=16:sy2=8 syscolor 15:boxf オブジェクトの表面色で背景を塗りつぶす color 0,0,0 mes "HGIMG3及びmod_picfontモジュールで使用することができるフォント画像を生成します。" mes "固定幅で、英文字のみのデータが作成可能です。
sample\new\mkfont.hsp - 2010/04/30

multitouch1.hsp
Windows7のマルチタッチ入力を取得するサンプルです。 マルチタッチに対応したデバイスでのみ実行できます。
sample\new\multitouch1.hsp - 2010/04/30

multitouch2.hsp
Windows7のマルチタッチ入力を取得するサンプルです。 マルチタッチに対応したデバイスでのみ実行できます。
sample\new\multitouch2.hsp - 2010/04/30

multitouch3.hsp
Windows7のマルチタッチ入力を取得するサンプルです。 マルチタッチに対応したデバイスでのみ実行できます。
sample\new\multitouch3.hsp - 2010/04/30

noframe.hsp
枠なしウィンドウを作成して、ドラッグ可能にするサンプル bgscr 0,320,240:cls 1 sysfont 16 pos 30,80:mes "ウィンドウ自体をドラッグできます。
sample\new\noframe.hsp - 2010/04/30

ntmem.hsp
2GB以上のメモリ容量情報を取得する(NTカーネル専用) sysinfo(34)で得られる物理メモリのサイズは WinAPIの仕様により2GBまでとなっています。(2GB以上のメモリが搭載されている場合は、すべて2GBとなります) このサンプルは、WinAPIで用意されているGlobalMemoryStatusExという関数により、 2GBを超えるメモリ情報を取得するものです。 ただし、このAPIはNTカーネル(WindowsNT,2000,XP,Vista)上でのみ動作します。
sample\new\ntmem.hsp - 2010/04/30

objimage.hsp
objimage命令によるカスタムボタンの作成 buffer 1 picload "btn_normal.bmp" screen 0,640,480 gradf ,,,, 1, 0, $c0 font "Arial",20 objmode 2 objsize 128,32 objimage 1, 0,0, 0,64, 0,32 ボタン画像の指定 button gosub "CALL",*call button "JUMP",*jmp objimage -1 通常のボタンに戻す button
sample\new\objimage.hsp - 2010/04/30

omedetai.hsp
グラフィック機能を使ったサンプル おめでたい感じの画面が出ます wx=800:wy=600 画面サイズ screen 0,wx,wy cx=wx/2:cy=wy/2 dist=int(sqrt( cx*cx + cy*cy ))+8 dim x,4 dim y,4 kai=16 角数 tt=0 plus=3.141592/kai*2 x(0)=cx:y(0)=cy x(3)=cx:y(3)=cy r1=255:g1=0:b1=0 1つ目の色 r2=255:g2=255:b2=0 2つ目の色
sample\new\omedetai.hsp - 2010/04/30

picfont.hsp
#include "mod_picfont.as" buffer 3 picload "fontchr.bmp" screen 0,640,480 cls 3 テクスチャフォント表示の準備 picfont 3,16,16,2,-4 id, sizex, sizey, mode, offset フォントの表示 pos 32,32 picfprt "[MOD_PICFONT.AS Sample Script]" picfprt "Refer to 'picfont' and
sample\new\picfont.hsp - 2010/04/30

split.hsp
split命令サンプル buf = "tarou,18,male" mes "もとの文字列["+buf+"]" split buf, ",", name, age, sex mes "名前:"+name mes "年齢:"+age+"才" mes "性別:"+sex mes " " buf = "よそはよそ、うちはうち。そよそよ。ご飯をよそいなさい。
sample\new\split.hsp - 2010/04/30

statusbar.hsp
#include "mod_stbar.as" screen 0,640,480 stbar_ini ステータスバー作成 screen 1,640,480 stbar_ini ステータスバー作成 oncmd gosub *event_WM_SIZE, 0x0005 WM_SIZE割り込み gsel 0 stbar_text "テストです" テキストを設定 gsel 1 stbar_text "リサイズに対応しています" テキストを設定 stop *event_WM_SIZE
sample\new\statusbar.hsp - 2010/04/30

strtrim.hsp
strtrimサンプル s=" A B C D E F " mes " -空白(半角スペース)の処理 " mes "もとの文字列["+s+"]" mes "両端のスペースを削除["+strtrim(s)+"]" mes "左端のスペースを削除["+strtrim(s,1)+"]" mes "右端のスペースを削除["+strtrim(s,2)+"]" mes "すべてのスペースを削除["+strtrim(s,3)+"]" s=" こんにちは 全角文字です " zenspace=" "
sample\new\strtrim.hsp - 2010/04/30