test1.txt
notesel buf
Filename="test1.txt"
noteload Filename;¥Õ¥¡¥¤¥ë¤òÆɤ߹þ¤ß
repeat notemax
get = ""
noteget get, cnt
split get, " ", data
answer=0
repeat stat
answer + data(cnt)
loop
get=""+get+" "+answer+""
noteadd get,cnt,1
loop
notesave Filename
test2.txt
notesel buf
Filename="test2.txt"
noteload Filename;¥Õ¥¡¥¤¥ë¤òÆɤ߹þ¤ß
repeat notemax
get = ""
noteget get, cnt
split get, ",", data
answer=0
repeat stat
answer + data(cnt)
loop
get=""+strmid(get,0,strlen(get)-1)+","+answer+";"
noteadd get,cnt,1
loop
notesave Filename
splitÌ¿Îá¤ò»È¤¦¤È¤¤¤¤¤Ç¤¹¤è¡£