Set default writing to 0x0100
1 files changed, 5 insertions(+), 0 deletions(-) M src/drifblim.tal
M src/drifblim.tal => src/drifblim.tal +5 -0
@@ 26,9 26,11 @@ BRK #0a18 DEO ( pass1 ) #0100 .program/head STZ2 ;dict/reset ;scope scpy ;src handle-file ( pass2 ) #0100 .program/head STZ2 ;dict/reset ;scope scpy #01 .program/write STZ ;src handle-file @@ 163,6 165,9 @@ JMP2r ( move ) #0001 !move-head ( @|helpers ) @get-hex ( str* -- value* ) DUP2 is-hex ?&valid