mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-06 03:30:55 +11:00
8 lines
296 B
Plaintext
8 lines
296 B
Plaintext
( fuse access. read/write one byte at a time )
|
|
: aspfl@ ( -- lfuse ) 0 0 0 0x50 _cmd ;
|
|
: aspfh@ ( -- hfuse ) 0 0 0x08 0x58 _cmd ;
|
|
: aspfe@ ( -- efuse ) 0 0 0x00 0x58 _cmd ;
|
|
: aspfl! ( lfuse -- ) 0 0xa0 0xac _cmd ;
|
|
: aspfh! ( hfuse -- ) 0 0xa8 0xac _cmd ;
|
|
: aspfe! ( efuse -- ) 0 0xa4 0xac _cmd ;
|