2025-04-15 00:05:44 <anthk_      > uh, lawrence it's the current maintainer for xAce which is the same guy who wrote Subleq and Forth on it
2025-04-15 00:05:59 <anthk_      > it doesn't surprise me...
2025-04-15 00:15:06 <anthk_      > ok fixed the CMakeFile, let's try the ACE
2025-04-15 02:13:48 <pgimeno     > anthk_: yeah ZX Spectrum. About zesarux, the menu system is awful IMO but the speed isn't too bad, especially if you select the SDL backend (--vo sdl I think).
2025-04-15 02:15:52 <pgimeno     > About the link, the emulator version is "almost interactive", but not quite there. It's designed for developing. I wrote the port of Mazogs with a precursor of that.
2025-04-15 02:25:41 <pgimeno     > I've seen the speed of the emulator version reach about the equivalent to a 1.67 GHz, quite impressive for a Juppy :)
2025-04-15 02:58:17 <cleobuline  > mforth:  WORDS
2025-04-15 02:58:17 <mforth      > USERNAME .S . + - * / MOD DUP DROP SWAP OVER ROT >R R> R@ = < > AND OR NOT XOR & | ^ ~ << >> CR EMIT VARIABLE @ ! +! DO LOOP I WORDS LOAD CREATE ALLOT ." CLOCK BEGIN WHILE REPEAT AGAIN SQRT UNLOOP +LOOP PICK CLEAR-STACK PRINT NUM-TO-BIN PRIME? FORGET STRING " 2DROP IMAGE TEMP-IMAGE CLEAR-STRINGS DELAY EXIT MICRO MILLI DOUBLE FACT POW FIBONACCI COUNTDOWN TUCK SUM_SQUARE CUBE SUM_CUBES RECUNACCI
2025-04-15 02:58:38 <cleobuline  > yeah it remember the environment if disconnected
2025-04-15 02:59:47 <cleobuline  > mforth:  20 SPACES  ." * " CR
2025-04-15 02:59:47 <mforth      > *
2025-04-15 02:59:51 <cleobuline  > mmm
2025-04-15 03:03:19 <cleobuline  > mforth:  20 SPACES  42 EMIT  CR
2025-04-15 03:03:19 <mforth      >                                         *
2025-04-15 03:03:41 <cleobuline  > mforth:  40  SPACES  42 EMIT  CR
2025-04-15 03:03:41 <mforth      >                                         *
2025-04-15 03:04:05 <cleobuline  > mforth:  10   SPACES  42 EMIT  CR
2025-04-15 03:04:05 <mforth      >           *
2025-04-15 04:58:22 <ohnoitsn`   > hello gang :D
2025-04-15 11:07:41 <anthk_      > pgimeno: zesarux it's slow under OpenBSD at least; it used to be faster, but xace rocks
2025-04-15 11:07:54 <anthk_      > I'm using the old books in Spanish for Forth under the the ACE
2025-04-15 11:08:09 <anthk_      > First, : words vlist ;
2025-04-15 16:14:12 <cleobuline  > mforth:  80  SPACES  42 EMIT  CR
2025-04-15 16:14:13 <mforth      >                                                                                 *
2025-04-15 16:14:47 <cleobuline  > mforth:  80  SPACES  42 EMIT ." bing ! "  CR
2025-04-15 16:14:47 <mforth      > bing !
2025-04-15 16:29:26 <anthk_      > mforth: EURO EMIT CR
2025-04-15 16:29:27 <mforth      > Unknown word: EURO
2025-04-15 16:29:27 <mforth      > Error: EMIT: Stack underflow
2025-04-15 16:29:46 <anthk_      > mforth: EURO EMIT CR
2025-04-15 16:29:46 <mforth      > Unknown word: EURO
2025-04-15 16:29:46 <mforth      > Error: EMIT: Stack underflow
2025-04-15 16:30:54 <anthk_      > mforth: 65535 2 + .s
2025-04-15 16:31:00 <anthk_      > mforth: .
2025-04-15 16:31:04 <mforth      > 65537
2025-04-15 16:32:21 <anthk_      > mforth: depth
2025-04-15 16:32:22 <mforth      > Unknown word: depth
2025-04-15 16:34:43 <anthk_      > mforth: s" test " included
2025-04-15 16:34:43 <mforth      > Unknown word: s"
2025-04-15 16:34:44 <mforth      > Error: Missing closing quote for "
2025-04-15 16:35:01 <anthk_      > mforth: s" test" included
2025-04-15 16:35:01 <mforth      > Unknown word: s"
2025-04-15 16:35:01 <mforth      > Unknown word: test"
2025-04-15 16:35:59 <anthk_      > mforth: create box 1 cells allot
2025-04-15 16:35:59 <mforth      > Unknown word: create
2025-04-15 16:36:00 <mforth      > Unknown word: box
2025-04-15 16:36:07 <anthk_      > mforth: words
2025-04-15 16:36:07 <mforth      > Unknown word: words
2025-04-15 16:36:11 <anthk_      > mforth: vlist
2025-04-15 16:36:11 <mforth      > Unknown word: vlist
2025-04-15 16:36:21 <anthk_      > mforth: WORDS
2025-04-15 16:36:21 <mforth      > USERNAME .S . + - * / MOD DUP DROP SWAP OVER ROT >R R> R@ = < > AND OR NOT XOR & | ^ ~ << >> CR EMIT VARIABLE @ ! +! DO LOOP I WORDS LOAD CREATE ALLOT ." CLOCK BEGIN WHILE REPEAT AGAIN SQRT UNLOOP +LOOP PICK CLEAR-STACK PRINT NUM-TO-BIN PRIME? FORGET STRING " 2DROP IMAGE TEMP-IMAGE CLEAR-STRINGS DELAY EXIT MICRO MILLI
2025-04-15 16:36:27 <cleobuline  > anthk_:  refere toi au dictionnaire voila
2025-04-15 16:36:27 <anthk_      > doh
2025-04-15 16:36:45 <anthk_      > cleobuline: I did that in uppercase
2025-04-15 16:37:09 <anthk_      > mmm no floating ops
2025-04-15 16:37:25 <anthk_      > mforth: 2. 3. + .s
2025-04-15 16:37:26 <mforth      > Unknown word: 2.
2025-04-15 16:37:26 <mforth      > Error: Stack underflow
2025-04-15 16:37:30 <anthk_      > mforth:  2. 3. + .S
2025-04-15 16:37:30 <mforth      > Unknown word: 2.
2025-04-15 16:37:31 <mforth      > Unknown word: 3.
2025-04-15 16:37:37 <cleobuline  > if you what additional words LOAD "test.fth"  and  then LOAD "test2.fth"
2025-04-15 16:37:47 <anthk_      > mforth:  LOAD "test.fth"
2025-04-15 16:37:51 <anthk_      > mforth: WORDS
2025-04-15 16:37:51 <mforth      > USERNAME .S . + - * / MOD DUP DROP SWAP OVER ROT >R R> R@ = < > AND OR NOT XOR & | ^ ~ << >> CR EMIT VARIABLE @ ! +! DO LOOP I WORDS LOAD CREATE ALLOT ." CLOCK BEGIN WHILE REPEAT AGAIN SQRT UNLOOP +LOOP PICK CLEAR-STACK PRINT NUM-TO-BIN PRIME? FORGET STRING " 2DROP IMAGE TEMP-IMAGE CLEAR-STRINGS DELAY EXIT MICRO MILLI DOUBLE FACT POW FIBONACCI COUNTDOWN TUCK SUM_SQUARE CUBE SUM_CUBES RECUNACCI
2025-04-15 16:38:04 <anthk_      > mforth: 2 SQRT .S
2025-04-15 16:38:04 <mforth      > <2> 1 1
2025-04-15 16:38:16 <anthk_      > mforth: LOAD "test2.fth" WORDS
2025-04-15 16:38:20 <cleobuline  > mforth:  : PRINT-ASCII 126 32 1 + DO I NUM-TO-STR  32 EMIT  I EMIT 44 EMIT LOOP CR  ;
2025-04-15 16:38:45 <cleobuline  > ignore command after load
2025-04-15 16:39:05 <cleobuline  > PRINT-ASCII
2025-04-15 16:39:11 <cleobuline  > mforth:  PRINT-ASCII
2025-04-15 16:39:11 <mforth      >                                                                                 *33 !,34 ",35 #,36 $,37 %,38 &,39 ',40 (,41 ),42 *,43 +,44 ,,45 -,46 .,47 /,48 0,49 1,50 2,51 3,52 4,53 5,54 6,55 7,56 8,57 9,58 :,59 ;,60 <,61 =,62 >,63 ?,64 @,65 A,66 B,67 C,68 D,69 E,70 F,71 G,72 H,73 I,74 J,75 K,76 L,77 M,78 N,79 O,80 P,81 Q,82 R,83 S,84 T,85 U,86 V,87 W,88 X,89 Y,90 Z,91 [,92 \,93 ],94 ^,95 _,96
2025-04-15 16:40:06 <cleobuline  > anthk_:  it is not a standart forth , it is build in my own kitchen
2025-04-15 16:40:28 <anthk_      > cleobuline: don't worry, neither was the jupiter ace one, forth 79
2025-04-15 16:41:00 <cleobuline  > try mforth: HELLO
2025-04-15 16:41:19 <anthk_      > mforth: HELLO
2025-04-15 16:41:19 <mforth      > Hello anthk_ How are uou ?
2025-04-15 16:41:23 <cleobuline  > :
2025-04-15 16:41:42 <anthk_      > cleobuline: will you implement eliza :p ?
2025-04-15 16:42:16 <cleobuline  > dont' forget mforth: QUIT when you leave the chat to freed the memory of your env
2025-04-15 16:43:21 <cleobuline  > if you leave and rejoin it keep you stack and enc in memory
2025-04-15 16:43:44 <cleobuline  > do it anthk_
2025-04-15 16:44:28 <cleobuline  > it be a headake to implement gets on irc
2025-04-15 16:45:35 <anthk_      > on forth, with pfe running sokoban from leo brodie was easy, and amazed on how that tiny code runs sokoban
2025-04-15 16:45:53 <anthk_      > and OFC I can adapt the levels from csokoban (cgames) with just few lines
2025-04-15 16:47:08 <cleobuline  > anthk_:  i do it , for my own challenge to do it for playing
2025-04-15 16:47:19 <anthk_      > now, as an exercise, instead of sokoban...
2025-04-15 16:47:31 <anthk_      > I'd adapt the zmachine.ps interpreter from postscript to forth
2025-04-15 16:49:15 <cleobuline  > this forth is multithread to be use by multi users
2025-04-15 16:49:58 <cleobuline  > mforth:  40000 DELAY ." top ! "
2025-04-15 16:50:51 <cleobuline  > this will not block you
2025-04-15 16:50:51 <anthk_      > now I can't find the interpreter
2025-04-15 16:51:18 <anthk_      > ttp://zzo38computer.org/zmachine/interp/zmachine.ps
2025-04-15 16:51:25 <anthk_      > http://zzo38computer.org/zmachine/interp/zmachine.ps
2025-04-15 16:51:44 <cleobuline  > mforth:  CREDIT
2025-04-15 16:51:45 <mforth      > Brought  to you by Cleobuline https://github.com/cleobuline/forth-bot-gmp-irc-threaded-multi-users/tree/main Site https://labynet.fr
2025-04-15 16:51:48 <anthk_      > on any unix machine, with ghostscript and a Z3 machine game:
2025-04-15 16:51:51 <anthk_      >   gs -dNOSAFER zmachine.ps -- game.z3
2025-04-15 16:51:54 <anthk_      > for instance, zork and friends
2025-04-15 16:52:40 <anthk_      > ah, it's down
2025-04-15 16:52:44 <anthk_      > I might have a copy there
2025-04-15 16:55:20 <anthk_      > mmh nope, not even by connecting the autor by gopher
2025-04-15 16:55:28 <cleobuline  > i don't do floating point number
2025-04-15 16:55:41 <cleobuline  > instead i do  big numbers
2025-04-15 16:55:54 <cleobuline  > mforth:  200 FACT
2025-04-15 16:56:09 <cleobuline  > mforth:  .S
2025-04-15 16:56:09 <mforth      > <1> 788657867364790503552363213932185062295135977687173263294742533244359449963403342920304284011984623904177212138919638830257642790242637105061926624952829931113462857270763317237396988943922445621451664240254033291864131227428294853277524242407573903240321257405579568660226031904170324062351700858796178922222789623703897374720000000000000000000000000000000000000000000000000
2025-04-15 16:56:43 <cleobuline  > mforth:  1 - .
2025-04-15 16:56:44 <mforth      > 788657867364790503552363213932185062295135977687173263294742533244359449963403342920304284011984623904177212138919638830257642790242637105061926624952829931113462857270763317237396988943922445621451664240254033291864131227428294853277524242407573903240321257405579568660226031904170324062351700858796178922222789623703897374719999999999999999999999999999999999999999999999999
2025-04-15 16:56:46 <anthk_      > cleobuline: you can implement f* and such
2025-04-15 16:57:06 <anthk_      > I think these can be done in forth themselves right?
2025-04-15 16:57:12 <cleobuline  > but i don't want to do :)
2025-04-15 16:57:51 <anthk_      > I'd guess */ it's enough for everyone :)
2025-04-15 16:57:54 <cleobuline  > it is as complex as it is ...
2025-04-15 16:59:15 <cleobuline  > in the origin forth is not built for floating point numbers
2025-04-15 16:59:37 <anthk_      > I know, I have the original starting forth book
2025-04-15 16:59:50 <cleobuline  > but just robotic purpose to pilot astronomic robots
2025-04-15 17:00:36 <anthk_      > the jupiter ace could do far more
2025-04-15 17:00:43 <anthk_      > a pity basic won
2025-04-15 17:01:26 <anthk_      > I mean, I understand basic was easier for newcomers
2025-04-15 17:01:39 <anthk_      > but in the end juggling with line numbers made the programs far more difficult to grasp
2025-04-15 17:02:05 <anthk_      > the ace almost was a zx81 with forth right?
2025-04-15 17:02:34 <cleobuline  > i start forth with a commodore 64  cartridge
2025-04-15 17:03:10 <cleobuline  > i was playing with in my young time
2025-04-15 17:03:11 <anthk_      > I run pfe under Unix, but the ace it's a fun exercise
2025-04-15 17:04:31 <anthk_      > and, on langs, I used to like awk, but now I prefer jimtcl and forth
2025-04-15 17:05:15 <anthk_      > and, yet, your forth implementation supports bigger numbers than jimtcl
2025-04-15 17:06:36 <cleobuline  > limited only by memory and buffers sizes
2025-04-15 17:07:48 <cleobuline  > it's not a real forth but a toy
2025-04-15 17:08:04 <cleobuline  > a toy for irc
2025-04-15 17:09:01 <identity    > what's the difference between a 'toy' forth and a 'real' forth?
2025-04-15 17:09:24 <cleobuline  > mforth:  EURO  ." it will be your chance to become millionair "
2025-04-15 17:09:24 <mforth      > 1 37 25 36 21 1 6
2025-04-15 17:17:19 <anthk_      > mforth: EURO ROT SWAP 2-
2025-04-15 17:17:19 <mforth      > 10 1 17 15 7 10 3
2025-04-15 17:17:38 <anthk_      > mforth: : 2- 2 - ;
2025-04-15 17:17:47 <anthk_      > mforth: EURO ROT SWAP 2-
2025-04-15 17:17:47 <mforth      > 21 45 41 7 34 2 7
2025-04-15 17:18:08 <cleobuline  > it's not numbers on the stack but a string
2025-04-15 17:18:23 <cleobuline  > mforth:  SEE EURO
2025-04-15 17:18:24 <mforth      > : EURO INIT-RANDOM 50 INIT-NUMS 50 SHUFFLE-NUMS 5 0 DO PICK-NUM DUP NUM-TO-STR 32 EMIT DROP LOOP INIT-STARS SHUFFLE-STARS PICK-STAR DUP NUM-TO-STR 32 EMIT DROP PICK-STAR DUP NUM-TO-STR DROP CR ;
2025-04-15 18:18:45 <cleobuline  > mforth:  :  MULTI-CHAR 0 DO DUP EMIT LOOP CR  DROP ;
2025-04-15 18:18:49 <cleobuline  > forth:  88 80   MULTI-CHAR .S
2025-04-15 18:19:02 <cleobuline  > mforth: 88 80   MULTI-CHAR
2025-04-15 18:19:02 <mforth      > XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
2025-04-15 19:28:57 <pgimeno     > anthk_: there's an appendix in the manual (appendix D in the English version, not sure if it's the same in the Spanish one) on how the JA Forth differs from Forth 79, it's mostly missing a few words but pretty close to the standard overall (just, the 79 standard)
2025-04-15 19:30:55 <pgimeno     > "the ace almost was a zx81 with forth right?" <- right, but with redefinable characters, and with hardware video which makes it much faster. See my port of Mazogs which aims for close accuracy. https://codeberg.org/pgimeno/Mazogs/src/branch/jupiter_ace
2025-04-15 19:31:09 <pgimeno     > I had to add several delay loops
2025-04-15 20:16:46 <anthk_      > pgimeno: your branch has a rom close to forth 79?
2025-04-15 20:26:10 <pgimeno     > no, but I have the disassembly of the JA ROM
2025-04-15 20:26:29 <pgimeno     > the JA standard ROM is close to Forth 79, see appendix D
2025-04-15 21:51:05 <cleobuline  > mforth:  CAL
2025-04-15 21:51:05 <mforth      > Unknown 50
2025-04-15 21:51:05 <mforth      > Mo Tu We Th Fr Sa Su
2025-04-15 21:51:27 <cleobuline  > mforth:  4 2025 CAL
2025-04-15 21:51:28 <mforth      > April 2025
2025-04-15 21:51:28 <mforth      >      1  2  3  4  5  6
2025-04-15 22:11:33 <anthk_      > pgimeno: thanks/gracias
2025-04-15 22:11:54 <pgimeno     > no hay de qué :)
2025-04-15 22:12:25 <anthk_      > it would be fun/interesting to have some forth83 compatible jupiter ROM
2025-04-15 22:12:38 <anthk_      > I'd guess most of the terms from starting forth, modulo the edit section
2025-04-15 22:12:44 <anthk_      > can be done with a custom dict
2025-04-15 22:16:21 <pgimeno     > well, it would have to be paged, I guess
2025-04-15 22:16:52 <pgimeno     > there's just 8K in the JA and it's filled to the brink
2025-04-15 22:17:13 <pgimeno     > even the character set is stored in compressed form to save some bytes
2025-04-15 22:18:22 <anthk_      > how about the jupiter with the 16k module?
2025-04-15 22:19:23 <pgimeno     > that's RAM, not ROM, but yeah, placing some of it in RAM would certainly help
2025-04-15 22:20:03 <pgimeno     > I guess the remaining words could fit in maybe 10K or so
2025-04-15 22:20:47 <pgimeno     > I mean, 2 extra KB or so
2025-04-15 22:21:15 <pgimeno     > but then you can just load them from tape as a regular dict I guess
2025-04-15 22:23:40 <anthk_      > yes, from tape, in RAM
2025-04-15 22:53:45 <anthk_      > btw, did anyone here know pforth?