10 INPUT "...",PATCH$
20 OPEN #0,"file:///"+PATCH$,"OUTPUT"
30 INPUT "...",B%
40 PUT #0,B%
50 CLOSE #0
60 OPEN #0,"file:///"+PATCH$,"INPUT"
70 GET #0,I%
80 PRINT I%
90 SLEEP 3000
100 END