Você não pode selecionar mais de 25 tópicos
Os tópicos devem começar com uma letra ou um número, podem incluir traços ('-') e podem ter até 35 caracteres.
|
- CREATE ACC 0 ,
- : _LIST ." Block " DUP . NL LIST ;
- : _NUM
- ACC @ SWAP _pdacc
- 1 = IF _LIST 0 THEN
- ACC !
- ;
- : L BLK> @ _LIST ;
- : B BLK> @ 1- BLK@ L ;
- : N BLK> @ 1+ BLK@ L ;
|