当引脚改变时执行 FlashForth 字
Execute FlashForth word when pin changes
我有一个词希望在引脚更改时触发:
: example
." Hello, world! "
;i
我用的是External Interrupt Request 1
,中断向量号。 3
根据数据表第 65 页和 this diagram I use。
' example 3 int!
ei
当我尝试更改引脚(在本例中为引脚 3)的值时,没有任何反应。
我是不是做错了什么?
我上面发布的代码有几处错误,但在查看其他示例和阅读数据后我确实让它工作了 sheet:
\ Pin Change Interrupt 0
4 constant pcint0
\ Pin Change Mask Register 0
b constant pcmsk0
\ Pin Change Interrupt Control Register
constant pcicr
ram variable example
: example+1
1 example +!
;i
: int-enable
['] example+1 pcint0 int!
ei
;
int-enable
%00000001 pcmsk0 mset
%00000111 mset
\ Shorting pin 8 will now increment `example` variable.
我有一个词希望在引脚更改时触发:
: example
." Hello, world! "
;i
我用的是External Interrupt Request 1
,中断向量号。 3
根据数据表第 65 页和 this diagram I use。
' example 3 int!
ei
当我尝试更改引脚(在本例中为引脚 3)的值时,没有任何反应。
我是不是做错了什么?
我上面发布的代码有几处错误,但在查看其他示例和阅读数据后我确实让它工作了 sheet:
\ Pin Change Interrupt 0
4 constant pcint0
\ Pin Change Mask Register 0
b constant pcmsk0
\ Pin Change Interrupt Control Register
constant pcicr
ram variable example
: example+1
1 example +!
;i
: int-enable
['] example+1 pcint0 int!
ei
;
int-enable
%00000001 pcmsk0 mset
%00000111 mset
\ Shorting pin 8 will now increment `example` variable.