Differences between version 2 and previous revision of LifeInForth.
Other diffs: Previous Major Revision, Previous Author, or view the Annotated Edit History
| Newer page: | version 2 | Last edited on Tuesday, April 6, 2004 1:46:02 am | by LeoWong | Revert |
| Older page: | version 1 | Last edited on Wednesday, February 12, 2003 1:03:54 am | by GlynWebster | Revert |
@@ -133,28 +133,19 @@
: Generation ( -- ) Everything Passes ;
\ the human element
- 1000
VALUE Ideas
+ 100
VALUE Ideas
: Dreams ( -- ) Ideas MS ;
- 1000
CONSTANT Images
+ 100
CONSTANT Images
: Meditation ( -- ) Images MS ;
\ free will
: Action ( -- char )
KEY? DUP
IF DROP KEY
DUP BL = IF Creation THEN
- THEN ;
-
- \ illusion
- : Samsara ( -- char ) Dreams Action Meditation ;
-
- \ life without comments
- 27 CONSTANT Escape
- : Acceptance ( char -- flag ) Escape <> ;
- : Mutability ( -- flag ) Generation Samsara Acceptance ;
THEN ;
\ illusion
: Samsara ( -- char ) Dreams Action Meditation ;
