10 INPUT string$
20 LET from$ = ""
30 LET to$ = ""
40 GO SUB 1000
50 LET from$ = ""
60 LET to$ = ""
70 GO SUB 1000
80 LET from$ = ""
90 LET to$ = ""
100 GO SUB 1000
110 LET from$ = ""
120 LET to$ = ""
130 GO SUB 1000
140 LET from$ = ""
150 LET to$ = ""
160 GO SUB 1000
170 LET from$ = ""
180 LET to$ = ""
190 GO SUB 1000
200 PRINT string$
300 STOP
1000 LET lenstr = LEN string$
1010 LET lenfrm = LEN from$
1020 FOR n = 0 TO lenstr
1030 IF string$(n TO n+lenfrm) = $from THEN LET string$ = string$(TO n) + to$ + string$(n+lenfrm TO)
1040 NEXT n
1050 RETURN
2番目のフルタンクでは、動詞とは別に「not」パーティクルを記述する方法を説明します。