aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/avr8/words/state.asm
blob: 31895fd371218b3eab2501b670486aeeaa144d74 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
; ( -- addr ) 
; System Variable
; system state
VE_STATE:
    .dw $ff05
    .db "state",0
    .dw VE_HEAD
    .set VE_HEAD = VE_STATE
XT_STATE:
    .dw PFA_DOVARIABLE
PFA_STATE:
    .dw ram_state

.dseg
ram_state: .byte 2
.cseg