サンプルコード１　　samp_save.as

　 


;	HspBakuText.dll test script
;		Date 2002.08.26.
;    「test.txt」を読み込んで、暗号ファイル「chip.bin」を出力


#uselib "hspbakutext.hpi"
#func BakuBload BakuBload $5
#func BakuBsave BakuBsave $5
	
	; 変数宣言
	sdim bunsyo, 4200
	
	; 「test.txt」を読み込み
	bload "test.txt", bunsyo
	
	; 「chip.bin」を書き込み（暗号コード 12345678）
	BakuBsave bunsyo,"chip.bin",12345678
	
	mes "SAVE OK"

stop

テキストファイル「test.txt」を読み込み、暗号コード12345678で暗号ファイル「chip.bin」に出力します。

　

　

サンプルコード２　　samp_load.as

　 


;	HspBakuText.dll test script
;		Date 2002.08.26.
;    暗号ファイル「chip.bin」を読み込んで画面出力


#uselib "hspbakutext.hpi"
#func BakuBload BakuBload $5
#func BakuBsave BakuBsave $5
	
	; 変数宣言 (4,200byte)
	sdim bunsyo, 4200
	
	; 「chip.bin」を読み込み（暗号コード 12345678）
	BakuBload bunsyo,"chip.bin",12345678

	mes bunsyo
	mes "[END]"

stop

暗号コード12345678で暗号ファイル「chip.bin」を読み込み、画面に文章を表示します。

　

【　戻る　】

BakuretuKen Homepega HSP Corner 2002