Clamp name erase
This commit is contained in:
parent
d5a18c6cd1
commit
c7644f90c1
|
@ -44,7 +44,7 @@
|
||||||
;pt1 { x 2 y 2 }
|
;pt1 { x 2 y 2 }
|
||||||
;pt2 { x 2 y 2 } ( paint-rect )
|
;pt2 { x 2 y 2 } ( paint-rect )
|
||||||
;px { x 1 y 1 }
|
;px { x 1 y 1 }
|
||||||
;document { state 1 edit 1 namelength 1 name 48 }
|
;document { state 1 edit 1 namelength 1 name 20 }
|
||||||
;timer { byte 1 }
|
;timer { byte 1 }
|
||||||
|
|
||||||
( devices )
|
( devices )
|
||||||
|
@ -308,26 +308,23 @@ BRK
|
||||||
@on-document-edit
|
@on-document-edit
|
||||||
|
|
||||||
~Keys #00 EQU ,$no-keys JNZ2
|
~Keys #00 EQU ,$no-keys JNZ2
|
||||||
|
|
||||||
~Keys #0d NEQ ,$no-enter JNZ2
|
~Keys #0d NEQ ,$no-enter JNZ2
|
||||||
#00 =document.edit
|
#00 =document.edit
|
||||||
,redraw JSR2
|
,redraw JSR2
|
||||||
BRK
|
BRK
|
||||||
$no-enter
|
$no-enter
|
||||||
|
|
||||||
~Keys #08 NEQ ,$no-backspace JNZ2
|
~Keys #08 NEQ ,$no-backspace JNZ2
|
||||||
|
~document.namelength #00 EQU ,$end JNZ2
|
||||||
( incr ) ~document.namelength #01 SUB =document.namelength
|
( incr ) ~document.namelength #01 SUB =document.namelength
|
||||||
,$end JSR2
|
,$end JSR2
|
||||||
BRK
|
BRK
|
||||||
$no-backspace
|
$no-backspace
|
||||||
|
~document.namelength #1f EQU ,$end JNZ2
|
||||||
( store key ) ~Keys ,document.name #00 ~document.namelength ADD2 POK2
|
( store key ) ~Keys ,document.name #00 ~document.namelength ADD2 POK2
|
||||||
( incr ) ~document.namelength #01 ADD =document.namelength
|
( incr ) ~document.namelength #01 ADD =document.namelength
|
||||||
|
|
||||||
$end
|
$end
|
||||||
( store end ) #00 ,document.name #00 ~document.namelength ADD2 POK2
|
( store end ) #00 ,document.name #00 ~document.namelength ADD2 POK2
|
||||||
( release ) #00 =Keys.key
|
( release ) #00 =Keys.key
|
||||||
|
|
||||||
$no-keys
|
$no-keys
|
||||||
|
|
||||||
( move ) #0008 =Sprite.x ~Screen.height #0010 SUB2 =Sprite.y
|
( move ) #0008 =Sprite.x ~Screen.height #0010 SUB2 =Sprite.y
|
||||||
|
|
|
@ -239,7 +239,7 @@ makevariable(char *name, Uint16 *addr, FILE *f)
|
||||||
if(word[0] == '{') continue;
|
if(word[0] == '{') continue;
|
||||||
if(word[0] == '}') break;
|
if(word[0] == '}') break;
|
||||||
scpy(word, l->map[l->maps].name, 64);
|
scpy(word, l->map[l->maps].name, 64);
|
||||||
fscanf(f, "%u", &l->map[l->maps].size);
|
fscanf(f, "%02x", &l->map[l->maps].size);
|
||||||
*addr += l->map[l->maps].size;
|
*addr += l->map[l->maps].size;
|
||||||
l->len += l->map[l->maps++].size;
|
l->len += l->map[l->maps++].size;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue