hspext

aplkey.hsp
#include "hspext.as" アプリケーション・キャプチャー サンプルスクリプト メモ帳を起動して、あれこれ文字を入力した後、 aplkey.asというファイルを読み込む。
sample\hspext\aplkey.hsp - 2018/05/04

aplkey3.hsp
#include "hspext.as" アプリケーション・キャプチャー サンプルスクリプト3 すべてのウインドゥと、それに対応するオブジェクト (コントロール)の一覧を表示する。 上のリストボックスで、ウインドゥを選び、[CHECK] を押すと、下のリストボックスにオブジェクト一覧とIDが 表示されます。 オブジェクトが階層化されている場合は、下のリストボックス からオブジェクトを選び、[MORE]を押すとさらにその下の階層に あるオブジェクトが表示されます。
sample\hspext\aplkey3.hsp - 2018/05/04

aplnote.hsp
#include "hspext.as" アプリケーション・キャプチャー サンプルスクリプト メモ帳を起動して、あれこれ文字を入力した後、 aplkey.asというファイルを読み込む。
sample\hspext\aplnote.hsp - 2018/05/04

clipset.hsp
#include "hspext.as" 長い文字列をクリップボードへ sdim v,10000 a="clip test\n" repeat 30 v+=a loop clipset v sdim a,10000 clipget a,10000 b=strlen(a) mes ""+b+"文字がクリップボードに登録されています。
sample\hspext\clipset.hsp - 2018/05/04

dircsv.hsp
title "dircsv ver0.1" wx=400:wy=200 screen 0,wx,wy cls 1 gsel 0,1 sdim work,1024 sdim tmp,1024 sdim tools,256 sdim opt1,1024 sdim opt2,1024 sdim sname,1024 tools=curdir+"\\" work="C:\\" opt1="" opt2="" objmode 1,1 objsize 380,24 mes "ディレクトリ" input
sample\hspext\dircsv.hsp - 2018/05/04

emath.hsp
title "AX="+ax+",AY="+ay+",R="+r emsin x,r emcos y,r emint x,x*50 emint y,y*50 x+=mx:y+=my redraw 2 color 255,255,255 boxf 250,130,450,280 color 0,0,192 boxf x-3,y-3,x+3,y+3 pos mx,my:line x,y redraw 1 await 2 loop stop
sample\hspext\emath.hsp - 2018/05/04

emath2.hsp
#include "hspext.as" 固定小数による数学関数テスト2 fp=24 emath fp mes "小数の精度 = "+fp+"bit" b1="" b2="" pos 0,64 emcnv a,"2.0" emcnv p,"1.0" repeat 15 emsqr ans,a emstr b1,a emstr b2,ans mes b1+"のルート = "+b2 a=a+p loop stop
sample\hspext\emath2.hsp - 2018/05/04

folder.hsp
#include "hspext.as" ディレクトリ一覧表示サンプル (CHDIRを押すと、入力したディレクトリに移動します) sdim dirbuf,32000 dirbuf="" sel=0 ad="" objsize 200,24:pos 0,30 listbox sel,200,dirbuf button "Browse",*chg *getdir color 255,255,255:boxf 0,0,640,24 color 0,0,0:pos 0,0:mes
sample\hspext\folder.hsp - 2018/05/04

ftime.hsp
#include "hspext.as" 拡張ファイルアクセス命令テスト 選んだファイルのタイムスタンプを表示。
sample\hspext\ftime.hsp - 2018/05/04

fxdir.hsp
#include "hspext.as" デスクトップのファイル一覧を見る a="" fxdir a,$10 if stat : dialog "fxdir命令のエラーです。
sample\hspext\fxdir.hsp - 2018/05/04

fxinfo.hsp
#include "hspext.as" sdim drvatr,20,8 drvatr="不明","なし","リムーバブル","ハードディスク","ネットワーク","CD-ROM","RAM" repeat 7 vol="":fsys="" dfree=0:typ=0:ser=0 drv=cnt+1 drvstr="@":poke drvstr,0,64+drv mes drvstr+"ドライブの詳細:" fxinfo typ,drv,8 if stat : goto *chkskip
sample\hspext\fxinfo.hsp - 2018/05/04

fxlink.hsp
#include "hspext.as" インターネット・ショートカットを作成 a="ONION soft HOMEPAGE" fxlink a,"http: www.onionsoft.net/" dialog "ショートカットを作成しました。
sample\hspext\fxlink.hsp - 2018/05/04

fxshort.hsp
#include "hspext.as" Windowsファイル名(ロングファイルネーム) をDOSファイル名に変換する。 sdim fname,128 sdim lname,128 fname="fxshort.hsp" fxshort lname,fname mes "original file name="+fname mes "DOS file name="+lname ちなみにDOSファイル名をロングファイルネームに変換するには dirlist命令を使ってください。
sample\hspext\fxshort.hsp - 2018/05/04

pipe.hsp
#include "hspext.as" cmd="ipconfig /all" sdim ln,4096 sdim buf,32000 mesbox buf,640,200,1:obj_edit=stat pipeexec buf,cmd,1 if stat : dialog "実行できませんでした" : end mes cmd+" を実行中..." repeat pipeget ln if stat=0 : break await 10 loop objprm obj_edit,buf
sample\hspext\pipe.hsp - 2018/05/04

regtest.hsp
#include "hspext.as" レジストリ操作命令テスト HSPスクリプトエディタの設定を読み込む regkey 0,"Software\\OnionSoftware\\hsed",0 mes "STAT="+stat a=0 getreg a,"winx" mes "winx="+a+" / STAT="+stat getreg a,"winy" mes "winy="+a+" / STAT="+stat b="" getreg b,"helpdir",1 mes
sample\hspext\regtest.hsp - 2018/05/04

regtest2.hsp
#include "hspext.as" レジストリ操作命令テスト Windowsアプリケーションの追加と削除の設定を読み込む rt="Software\\Microsoft\\Windows\\CurrentVersion\\Uninstall" regkey 1,rt if stat : dialog "該当するレジストリが見つかりません" : end sdim a,10000 sdim b,10000 sdim ent,10000 sdim name,1000 reglist a,1
sample\hspext\regtest2.hsp - 2018/05/04

terminal.hsp
#include "hspext.as" sdim buf,128 onexit *combye sdstr="" input sdstr,320 button "SEND",*comgo button "END",*combye comopen 1,"" if stat : dialog "シリアルポートは使えません" : end a=0 *commain wait 10 comgetc a if stat=0 : goto *commain b=0 *chk1 if a=13 : goto
sample\hspext\terminal.hsp - 2018/05/04