メモ帳を作っているのだが....txt読み込むと数字が...

私は今　メモ帳を作成してます....、ですがtxtを読み込むとき字じゃなくて
数字が出できます。おかしいところがあったら教えてください。
siro.pngは画面を白くするためです
ソースコード　
define PBM_SETPOS 0x0402 ;位置設定
#define PBM_GETPOS 0x0408 ;位置取得
#define PBM_SETSTATE 0x0410 ;状態設定
#define PBM_GETSTATE 0x0411 ;状態取得
#define PBST_NORMAL 0x0001 ;通常（緑）
#define PBS_MARQUEE 0x08
#define PBM_SETMARQUEE 0x040A

pos 200,400
winobj "msctls_progress32", "", 0, $50000000 | PBS_MARQUEE, 200, 20
h=objinfo(stat,2) ;オブジェクトのハンドル
; p3 1で有効
; p4 アニメーション速度を指定
; 0を指定するとデフォルト速度？
sendmsg h,PBM_SETMARQUEE,1,0
pos 200,150
font "ＭＳゴジック", 40, 1
mes"Power note xp"
wait 200
picload"siro.png"
value1 = "入力ボックス" ; 文字列型変数
pos 50, 50
input value1, 800, 800
pos 0,0
button"セーブ",*save
pos 100,0
button"ロード",*load
pos 200,0
button"Help",*help
pos 300,0
button"END",*en
stop
stop

*help
screen 3.500,200
mes"このPower noteはWindows標準のメモ帳を超えた？メモ帳です。"
mes"使い方は単純に入力boxに入力してボタンを押し保存したりできる"
mes"便利なメモ帳(ノート)です。"
stop

*en
dialog"終了します。おつかれさまでした。":end

*load
dialog ,16
if stat == 1 {//dialog16と17では何も読み込まれずダイアログをとじた場合statに0が代入されるのでここでは1
bload refstr,buf//変数bufにrefstrの内容を代入
objprm 0,u
objprm 0, buf//オブジェクトID0(mesbox)にbufを表示
}
stop

*save
dialog "txt", 17, "保存する名前"
if stat = 0 : stop
fname = refstr
exname=getpath(fname,2) ; ファイル名の拡張子を取得
if exname="" : fname+=".txt"
notesel text
notesave fname

HSPTV!掲示板