Du kan inte välja fler än 25 ämnen
Ämnen måste starta med en bokstav eller siffra, kan innehålla bindestreck ('-') och vara max 35 tecken långa.
|
- : .2 DUP 10 < IF SPC THEN . ;
- : EOL? ( c -- f ) DUP 0xd = SWAP NOT OR ;
- : LIST
- BLK@
- 16 0 DO
- I 1+ .2 SPC
- 64 I * BLK( + DUP 64 + SWAP DO
- I C@ DUP EOL? IF DROP LEAVE ELSE EMIT THEN
- LOOP
- NL
- LOOP
- ;
|