テキストFILEの更新

データの編集操作の一環で
データに決まった内容を書き込みます

データに書き込むのは
決まってない内容ですが
まずは決まった内容を書き込むスクリプトを書いてみました

変更前のテキストFILE
FILE名:dat\\y_tack_page.txt

NO.001 TITLE:ずざざん　ざん♪ URL :http://space.geocities.jp/digital_clock_2006 memo1:author memo2:y.tack memo3: memo4: memo5: memo6: memo7: NO.002 TITLE:TACK BLOG URL :http://space.geocities.yahoo.co.jp/gl/digital_clock_2006 memo1:author memo2:y.tack memo3: memo4: memo5: memo6: memo7: NO.003 TITLE:ブログを　ずざざん　ざん♪ URL :http://ytack.blogspot.com/ memo1:author memo2:y.tack memo3: memo4: memo5: memo6: memo7:

そして、テキストFILEの更新のスクリプト

// 変更用文字列を配列で用意 sdim to_chg,10,256 to_chg.1="TITLE:ＨＳＰＴＶ！" to_chg.2="URL :http://hsp.tv/" to_chg.3="memo1:ONION software" to_chg.4="memo2:" to_chg.5="memo3:" to_chg.6="memo4:" to_chg.7="memo5:" to_chg.8="memo6:" to_chg.9="memo7:" *begin mes "何番のデータを更新しますか？" button "NO.001",*chg_001 button "NO.002",*chg_002 button "NO.003",*chg_003 stop // 変更前dat読み込み *ld_dat sdim dat,1024 notesel dat noteload "dat\\y_tack_page.txt" return // ボタンＡを押した時の処理 *chg_001 gosub *ld_dat i=0 goto *chg_func // ボタンＢを押した時の処理 *chg_002 gosub *ld_dat i=10 goto *chg_func // ボタンＣを押した時の処理 *chg_003 gosub *ld_dat i=20 goto *chg_func // datの書き換え *chg_func repeat 9,1 j=i+cnt noteadd to_chg.cnt,j,1 loop // datを保存して、それをnotepadで開く notesave "dat\\changed_dat.txt" exec "notepad dat\\changed_dat.txt" stop