Added console read example
This commit is contained in:
parent
452b5026be
commit
9a61ef90f3
|
@ -1,5 +1,9 @@
|
||||||
<> ((read)) (?:)
|
<> (read) (?~)
|
||||||
<> ((send ?:)) ()
|
<> (?: print ') (?:)
|
||||||
<> (?x ?y catswap) ((?y ?x))
|
<> (' ?x) (?x ')
|
||||||
|
|
||||||
(send (You said: )) (read) send catswap
|
(Tell me three things: \n) print '
|
||||||
|
|
||||||
|
' (You said: read
|
||||||
|
then, you continued: read
|
||||||
|
finaly, you concluded: read) print
|
||||||
|
|
|
@ -11,6 +11,6 @@
|
||||||
<> (?x dup) (?x ?x)
|
<> (?x dup) (?x ?x)
|
||||||
<> (?x ?y swap) (?y ?x)
|
<> (?x ?y swap) (?y ?x)
|
||||||
<> (?x pop) ()
|
<> (?x pop) ()
|
||||||
<> (print ?:) ()
|
<> (print ?:) (?:)
|
||||||
|
|
||||||
(implode reverse (explode hello)) (explode hello) empty-register (eq abc abc) (eq abc def) (1 2 3) (4 5 6) swap pop dup (hey 1234 pop) (print Done.)
|
(implode reverse (explode hello)) (explode hello) empty-register (eq abc abc) (eq abc def) (1 2 3) (4 5 6) swap pop dup (hey 1234 pop) (print Done.)
|
||||||
|
|
Loading…
Reference in New Issue