15:55:38
##forth
<cleobuline>
forthBot: LOAD ini.fth
15:55:38
##forth
<forthBot>
File ini.fth with moon loaded
15:56:01
##forth
<cleobuline>
forthBot: 1234 NUM-TO-ROMAN
15:56:01
##forth
<forthBot>
MCCXXXIV
16:02:31
##forth
<ajhidd>
forthBot: 2025 NUM-TO-ROMAN
16:02:31
##forth
<forthBot>
Error: Unknown word: NUM-TO-ROMAN
16:02:38
##forth
<ajhidd>
forthBot: LOAD ini.fth
16:02:39
##forth
<forthBot>
Error: LOOP without DO
16:02:39
##forth
<forthBot>
Error: Definition discarded due to error
16:02:39
##forth
<forthBot>
Unknown word in definition: LOG1000
16:02:40
##forth
<forthBot>
Error: Definition discarded due to error
16:02:40
##forth
<forthBot>
File ini.fth with moon loaded
16:03:14
##forth
<ajhidd>
forthBot: 2025 NUM-TO-ROMAN
16:03:14
##forth
<forthBot>
Error: Unknown word: NUM-TO-ROMAN
16:04:09
##forth
<unjust>
forthBot: LOAD "init.fth"
16:04:10
##forth
<forthBot>
Error: Error: LOAD: Cannot open file 'init.fth'
16:04:13
##forth
<unjust>
forthBot: LOAD "ini.fth"
16:04:13
##forth
<forthBot>
File ini.fth with moon loaded
16:04:44
##forth
<unjust>
forthBot: 2025 NUM-TO-ROMAN
16:04:45
##forth
<forthBot>
Error: Modulo by zero
16:04:53
##forth
<unjust>
forthBot: SEE NUM-TO-ROMAN
16:04:53
##forth
<forthBot>
: NUM-TO-ROMAN DUP 1 < IF DROP ." Invalid number (1 or greater) " CR EXIT THEN DUP LOG1000 BEGIN DUP 0 >= WHILE SWAP DUP >R R@ 1000 POW / MOD SWAP DROP DUP 0 > IF DUP R> CONVERT-GROUP ELSE DROP R> DROP THEN SWAP 1 - SWAP REPEAT DROP DROP CR ;
16:06:29
##forth
<cleobuline>
i have changed un
16:06:38
##forth
<cleobuline>
forthBot: LOAD ini.fth
16:06:38
##forth
<forthBot>
File ini.fth with moon loaded
16:06:52
##forth
<cleobuline>
forthBot: NUM-TO-ROMAN
16:06:52
##forth
<forthBot>
Error: DUP: Stack underflow
16:07:01
##forth
<cleobuline>
forthBot: SEE NUM-TO-ROMAN
16:07:02
##forth
<forthBot>
: NUM-TO-ROMAN DUP 1 < OVER 3999 > OR IF DROP ." Invalid number (1-3999) " CR EXIT THEN DUP 1000 / DUP 0 > IF 0 DO 77 EMIT LOOP ELSE DROP THEN 1000 MOD DUP 100 / CASE 0 OF ENDOF 1 OF 67 EMIT ENDOF 2 OF 67 EMIT 67 EMIT ENDOF 3 OF 67 EMIT 67 EMIT 67 EMIT ENDOF 4 OF 67 EMIT 68 EMIT ENDOF 5 OF 68 EMIT ENDOF 6 OF 68 EMIT 67 EMIT ENDOF 7 OF 68 EMIT 67 EMIT 67 EMIT ENDOF 8 OF 68 EMIT 67 EMIT 67 EMIT 67
16:07:02
##forth
<forthBot>
EMIT ENDOF 9 OF 67 EMIT 77 EMIT ENDOF ENDCASE 100 MOD DUP 10 / CASE 0 OF ENDOF 1 OF 88 EMIT ENDOF 2 OF 88 EMIT 88 EMIT ENDOF 3 OF 88 EMIT 88 EMIT 88 EMIT ENDOF 4 OF 88 EMIT 76 EMIT ENDOF 5 OF 76 EMIT ENDOF 6 OF 76 EMIT 88 EMIT ENDOF 7 OF 76 EMIT 88 EMIT 88 EMIT ENDOF 8 OF 76 EMIT 88 EMIT 88 EMIT 88 EMIT ENDOF 9 OF 88 EMIT 67 EMIT ENDOF ENDCASE 10 MOD CASE 0 OF ENDOF 1 OF 73 EMIT ENDOF 2 OF 73
16:07:02
##forth
<forthBot>
EMIT 73 EMIT ENDOF 3 OF 73 EMIT 73 EMIT 73 EMIT ENDOF 4 OF 73 EMIT 86 EMIT ENDOF 5 OF 86 EMIT ENDOF 6 OF 86 EMIT 73 EMIT ENDOF 7 OF 86 EMIT 73 EMIT 73 EMIT ENDOF 8 OF 86 EMIT 73 EMIT 73 EMIT 73 EMIT ENDOF 9 OF 73 EMIT 88 EMIT
16:07:03
##forth
<forthBot>
ENDOF ENDCASE CR ;
16:07:22
##forth
<cleobuline>
forthBot: 2025 NUM-TO-ROMAN
16:07:22
##forth
<forthBot>
MMXXV
16:07:40
##forth
<unjust>
forthBot: LOAD "init.fth"
16:07:40
##forth
<forthBot>
Error: Error: LOAD: Cannot open file 'init.fth'
16:07:40
##forth
<cleobuline>
this is the new definition unjust
16:07:43
##forth
<unjust>
forthBot: LOAD "ini.fth"
16:07:44
##forth
<forthBot>
File ini.fth with moon loaded
16:07:52
##forth
<unjust>
forthBot: -1 NUM-TO-ROMAN
16:07:52
##forth
<forthBot>
Invalid number (1-3999)
16:07:59
##forth
<cleobuline>
lol
16:10:47
##forth
<cleobuline>
forthBot: 3999 NUM-TO-ROMAN
16:10:47
##forth
<forthBot>
MMMCMXCIX
18:03:14
##forth
<forthBot>
Environment for ajhidd inactive, freeing...
18:07:52
##forth
<forthBot>
Environment for unjust inactive, freeing...
18:10:47
##forth
<forthBot>
Environment for cleobuline inactive, freeing...