１カラム入力する度に、サブバッファの表に、日付、時刻、行、列、内容を記録するものです。
まずマニュアル操作で目的のページをGETします。オート<AAA>を実行します。
入力が終わったら[ESC]で終了し、Putします。
TESTバインダーの3ページに次のような表を作っておきます。
|
| 【プログラム】 | ||
| 1 | <AAA> | |
| 2 | G/F/S;TEST/3; | |
| 3 | WR;;; | |
| 4 | $AA:?; IF ROW=0 THEN GOTO $END | |
| 5 | LET {4,1}=NUM$(TODAY) | |
| 6 | LET {4,2}=NUM$(NOW) | |
| 7 | LET {4,3}=NUM$(ROW) | |
| 8 | LET {4,4}=NUM$(COLUMN) | |
| 9 | LET {4,5}=[ROW,COLUMN] | |
| 10 | GOTO $AA | |
| 11 | $END: ESC; | |
| 12 | STOP | |
□
