100 rem ■初期設定■ 110 cls 120 while jn<>4 140 print"tinylog用ファイル初期化プログラム" 150 print"v20250809" 160 print"" 170 print"カレントフォルダ内のファイルは" 180 color col(14):rem 黄 190 files 200 color col(15):rem 白 210 print "" 220 color col(13):rem 水色 230 print"1rec.csv(最終レコード番号ファイル)初期化" 240 print"2opp.csv(運用パターンファイル)初期化" 250 print"3log.csv(ログ本体ファイル)初期化" 270 print"0 終了" 280 color col(15):rem 白 290 print"番号で指定してください" 300 input"番号に続きent入力後直ちに実行します";jn 310 print"" 320 select case jn 330 case 1: 340 rem ■rec.csv初期化■ 350 open "rec.csv" for output as #1 360 print #1,0 370 close #1 380 print"rec.csvを初期化しました" 390 case 2: 400 rem ■opp.csv初期化■ 410 open "opp.csv" for output as #1 420 close #1 430 print"opp.csvを初期化しました" 440 case 3: 450 rem ■log.csv初期化■ 460 open "log.csv" for output as #1 470 close #1 480 print"log.csvを初期化しました" 550 case 0: 560 rem ■終了■ 570 end 580 end select 590 wend