00:00:00 --- log: started forth/02.04.23 00:08:40 --- join: davidw (~davidw@ppp-25-5.25-151.libero.it) joined #forth 00:09:11 --- quit: gilbertbsd ("xchat exiting..") 00:24:04 --- join: Soap` (flop@210-55-149-215.dialup.xtra.co.nz) joined #forth 00:39:43 --- join: rob_ert (~robert@h237n2fls31o965.telia.com) joined #forth 01:19:56 --- join: Frac (ximkevf@h24-77-171-228.ok.shawcable.net) joined #forth 01:21:39 --- quit: Frac (Client Quit) 01:22:21 --- join: Frac (snfgxo@h24-77-171-228.ok.shawcable.net) joined #forth 01:31:30 hiya, frac 01:31:37 --- nick: MrGone -> MrReach 01:40:06 Hey man. 01:40:52 Sleep for me. Night. 01:58:05 --- quit: MrReach (Read error: 110 (Connection timed out)) 01:58:06 --- quit: futhin (Read error: 104 (Connection reset by peer)) 01:58:52 --- join: MrReach (~mrreach@209.181.43.190) joined #forth 04:05:18 --- nick: MrReach -> MrGone 04:47:11 --- quit: onetom (Remote closed the connection) 04:50:57 --- join: onetom (tom@adsl52032.vnet.hu) joined #forth 05:05:44 --- quit: Soap` (Read error: 113 (No route to host)) 06:20:19 --- join: herkamire (~jason@wsip68-15-54-54.ri.ri.cox.net) joined #forth 06:23:37 Hi Herr Kanin! 06:27:07 hi :) 06:35:10 --- quit: davidw (Remote closed the connection) 06:35:17 --- join: davidw (~davidw@ppp-25-5.25-151.libero.it) joined #forth 06:36:53 my forth bot works! 06:37:57 --- join: forth (~herkforth@ip68-9-58-81.ri.ri.cox.net) joined #forth 06:38:05 forth: 4 5 + . 06:38:05 ouch 06:38:05 herkamire: 9 06:38:14 is it written in forth? 06:38:28 forth: ' + 1+ exec 06:38:33 no, it's C and sh 06:38:36 davidw: Word not found: exec 06:38:36 and tcpserver :) 06:38:47 it's a pretty limited forth 06:39:03 if forth is so great, why don't you write it in forth?:-) 06:39:19 lazyness 06:39:38 I got this working in under an hour including learning the IRC protocol 06:40:17 it has execute not exec 06:40:24 forth: 1 1 + . 06:40:24 rob_ert: 2 06:40:26 Yay 06:40:28 He can count 06:40:30 forth: do 06:40:30 davidw: 06:40:40 forth: 3 1 do 06:40:40 davidw: 06:40:41 forth: ." I love you, rob_ert" 06:40:41 rob_ert: Word not found: ." 06:40:44 Bah 06:40:52 forth: 3 1 do I . loop 06:40:52 davidw: Word not found: I 06:40:54 I need to add to the standard words :) 06:41:05 oh :) all lowercase 06:41:18 and do/loop must be inside a word 06:41:34 forth: 5 0 do i i * . loop 06:41:34 rob_ert: 0 06:41:39 forth: : a 0 do i . loop ; 8 a 06:41:39 herkamire: 0 1 2 3 4 5 6 7 06:41:40 Eheh, ok 06:41:53 forth: : foo .s ; 06:41:56 forth: foo 06:42:05 davidw: 06:42:05 davidw: Word not found: foo 06:42:40 forth: : print ; : roberts ; : iq 55 . ; print roberts iq 06:42:40 rob_ert: 55 06:42:43 forth: 13434432423 a 06:42:43 davidw: Word not found: a 06:42:44 .-) 06:43:31 forth: 5 5 5 * * 7 mod . 06:43:31 rob_ert: 6 06:43:59 rob_ert: :) 06:44:04 onetom: :) 06:44:17 what gonin on here? 06:44:24 forth: *(&)(*&#$&#QQ#$E"Q:AFASDAS;;;:SDA 'AS"D:Lk kl: asd 06:44:24 davidw: Word not found: *(&)(*&#$&#QQ#$E"Q:AFASDAS;;;:SDA 06:44:31 Heh 06:44:45 ahhha, herks bot... 06:44:57 forth: 1.0e2 .f 06:44:57 forth: ." This should work now" 06:44:57 rob_ert: Word not found: 1.0e2 06:44:57 herkamire: This should work now 06:45:01 ive also managed 2 do sg like that 06:45:02 Hmm 06:45:29 it sits on irc.linsze.hu #forth 06:45:34 forth: ." You are the Great Master, I will always obey your will!" 06:45:34 rob_ert: You are the Great Master, I will always obey your will! 06:45:39 and its a gforth 06:45:49 Hmm.. no floating-point? :( 06:46:02 Can I privmsg him?= 06:46:04 but every msg is executed in a separate gforth 06:46:20 rob_ert: no 06:46:25 rob_ert: I could fix that though 06:46:27 OK 06:46:33 I just tried, didn't work :) 06:46:44 It would be nice not to have to spam #forth 06:47:16 rob_ert: I thought the whole point was to demonstrate what something in forth does 06:47:40 everyone in here has got to have a forth on their own system... 06:48:23 herkamire: what 4th is that anyway? 06:48:36 onetom: the crappy little one I just wrote in C 06:48:54 forth: 1 2 ' + exec 06:48:54 herkamire: 06:49:02 Hmm 06:49:03 Well 06:49:04 oh well... 06:49:08 IRC bots are always cool :) 06:49:24 forth: 1 2 ' + execute 06:49:25 herkamire: 06:50:08 forth: : x 10 0 do char A emit loop ; x 06:50:08 rob_ert: Word not found: A 06:50:16 forth: : x 10 0 do [ char A ] emit loop ; x 06:50:16 rob_ert: Word not found: [ 06:50:19 uhm 06:50:21 do! 06:50:24 forth: 1 2 ' + execute . 06:50:24 What should I do here? 06:50:24 herkamire: 65535 06:50:47 forth: : x 10 0 do [char A ] emit loop ; x 06:50:48 rob_ert: Word not found: [char 06:50:54 forth: : x 10 0 do 65 emit loop ; x 06:50:55 rob_ert: AAAAAAAAAA 06:50:56 Hehe 06:51:00 --- join: gforth (guest@adsl52032.vnet.hu) joined #forth 06:51:00 forth: : x 100 0 do 65 emit loop ; x 06:51:06 gforth :) 06:51:12 gforth: : x 10 0 do 65 emit loop ; x 06:51:20 forth: : x 10 0 do 65 emit loop ; x 06:51:20 rob_ert: AAAAAAAAAA 06:51:38 forth: : x 2 1 do ." Robert " loop ; x 06:51:39 rob_ert: Word not found: Robert 06:51:49 mine looks 4 "4th: " prompt 06:51:55 xe tuto roto come prima, dio can! 06:52:18 * davidw is momentarily possesed by the spirit of barcaro 06:52:24 gforth: 1 2 + . 06:52:38 4th: ' system $10 cells dump 06:52:39 onetom: 40126640: E8 FB 3B F2 C7 00 00 00 - A8 CB 04 08 A8 B5 11 40 ..;............@ 06:52:40 onetom: 40126650: 62 A3 04 08 30 66 12 40 - 93 C4 04 08 30 C0 04 08 b...0f.@....0... 06:52:41 onetom: 40126660: 34 66 12 40 82 73 68 20 - E8 D3 3B F2 C7 00 00 00 4f.@.sh ..;..... 06:52:42 onetom: 40126670: 62 A3 04 08 23 00 00 00 - 60 C3 11 40 60 BA 11 40 b...#...`..@`..@ 06:52:49 barcaro... 06:52:58 but i dont know why is it so slow... 06:54:04 --- join: tathi (~tathi@wsip68-15-54-54.ri.ri.cox.net) joined #forth 06:54:07 4th: : fact dup 1 > if dup 1- recurse else 1 then * ; 5 fact . 06:54:08 onetom: 120 06:54:21 4th: : fact dup 1 > if dup 1- recurse else 1 then * ; see fact 06:54:21 onetom: : fact 06:54:22 onetom: dup 1 > 06:54:23 onetom: IF dup 1- fact 06:54:25 onetom: ELSE 1 06:54:27 onetom: THEN 06:54:30 onetom: * ; 06:54:42 onetom: very nice :) 06:54:52 herkamire: thx :) 06:54:58 4th: ." Onetom is great! " 06:54:59 rob_ert: Onetom is great! 06:55:02 Yay 06:55:14 4th: see dup 06:55:15 onetom: Code dup 06:55:16 onetom: ( $804C220 ) add 204 [esp] , # -4 \ $83 $84 $24 $4 $2 $0 $0 $FC 06:55:17 onetom: ( $804C228 ) mov ecx , 204 [esp] \ $8B $8C $24 $4 $2 $0 $0 06:55:20 onetom: ( $804C22F ) mov eax , 8054A40 \ $A1 $40 $4A $5 $8 06:55:24 onetom: ( $804C234 ) mov 4 [ecx] , ebp \ $89 $69 $4 06:55:24 onetom: ( $804C237 ) mov eax , [eax] \ $8B $0 06:55:25 onetom: ( $804C239 ) add 8054A40 , # 4 \ $83 $5 $40 $4A $5 $8 $4 06:55:27 onetom: ( $804C240 ) jmp eax \ $FF $E0 06:55:28 forth: : a [char] a emit ; a a a a a a a 06:55:29 herkamire: a 06:55:29 onetom: end-code 06:55:37 rocks, huh? :) 06:55:59 what is this 'Code' business? 06:56:11 perhaps it's better to have an ANS forth in here :) 06:56:41 forth: : a 65 emit ; a a a a a a a 06:56:42 onetom: AAAAAAA 06:56:58 how'd you get it to dump the instructions? what forth is that? 06:57:12 I'll fix my literal. I just found out what it was SUposed to do 06:57:20 davidw: as it name says, ith gforth 06:57:22 its 06:57:46 yeah, but my gforth doesn't dump the code... 06:57:56 it does :) 06:58:12 where 06:59:13 its 0.5.0 07:00:12 4th: : x 0 2 do ." Tomato soup. " loop ; x 07:00:22 ahhhhh , it's an i386 thing... that's why 07:00:24 bitchin 07:00:32 ;P 07:02:04 --- quit: forth (Remote closed the connection) 07:02:59 4th: ." 1st rm -rf / 2nd rm -rf 3rd rm" 07:03:23 nah! 07:04:38 i just wanted 2 show that i do an s/rm //g on every string passed 2 the bot 07:05:05 2 avoid errorneous removes 07:05:54 rob_ert: hey! uve hanged up my forth! :) 07:06:47 rob_ert: look: 07:06:47 guest@ex:~/www$ ls -l /tmp/fsock-sh-server.reply 07:06:47 -rw-r--r-- 1 guest guest 270876672 ÁPR 23 16:06 /tmp/fsock-sh-server.reply 07:06:55 --- join: sif (~siforth@ip68-9-58-81.ri.ri.cox.net) joined #forth 07:07:01 its a huge soup :) 07:07:32 hehe, hello i44or 07:07:44 imean herk 07:07:54 sif: ." I've got a new name" 07:07:54 herkamire: I've got a new name 07:08:48 herkamire: comeon, what 4th is that? 07:08:51 onetom: We've got to code our bots to handle infinite loops :) 07:08:59 onetom: it's the forth I just write in C 07:09:01 sif 07:09:17 its your 4fun4th? 07:09:24 yes 07:09:41 aka sif 07:10:13 u havent shared it w us yet, haveu? 07:10:55 nope :) this is it's first exebition 07:11:03 :) 07:11:26 it seems quite diligent 07:12:14 (hmm theres no such word: diligent...) 07:12:53 sif: : fact dup 1 > if dup 1- recurse else 1 then * ; see fact 07:12:53 onetom: Word not found: 1- 07:13:11 sif: : fact dup 1 > if dup 1- recurse else 1 then * ; 7 fact . 07:13:12 onetom: Word not found: 1- 07:13:18 sif: : fact dup 1 > if dup 1 - recurse else 1 then * ; 7 fact . 07:13:22 onetom: Word not found: recurse 07:13:26 :) 07:13:47 sif: see see 07:13:47 onetom: Word not found: see 07:14:05 sif: : fact dup 1 > if dup 1 - fact else 1 then * ; 7 fact . 07:14:05 onetom: Word not found: else 07:14:14 what? :))) 07:14:39 probably fact isn't visible yet and that's screwing it up :) 07:15:02 sif: : test if 1 . else 2 . then ; 0 test 07:15:03 tathi: Word not found: else 07:15:05 sure? 07:15:09 or maybe not :) 07:15:14 :D 07:17:02 no else sorry :) 07:17:10 I'll add recurse though 07:21:52 sif: : fact dup 1 do i * loop . ; 8 fact 07:21:52 herkamire: 40320 07:22:02 sif: : fact dup 1 do i * loop . ; 3 fact 07:22:02 herkamire: 6 07:22:08 sif: : fact dup 1 do i * loop . ; 5 fact 07:22:09 herkamire: 120 07:26:24 --- quit: sif (Remote closed the connection) 07:32:53 --- quit: gforth (Read error: 104 (Connection reset by peer)) 07:43:55 --- join: sif (~siforth@ip68-9-58-81.ri.ri.cox.net) joined #forth 07:43:55 I'm a forth bot. type sif: 07:44:23 sif: : a 0 9 do 911 . loop ; 07:44:24 herkamire: 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 07:44:47 wierd... 07:46:27 --- quit: sif (Remote closed the connection) 08:00:50 --- join: gforth (guest@213.163.52.30) joined #forth 08:01:39 --- quit: gforth (Client Quit) 08:06:01 --- join: gforth (guest@adsl52030.vnet.hu) joined #forth 08:09:09 --- join: onetom_ (tom@adsl52030.vnet.hu) joined #forth 08:09:43 --- join: sif (~siforth@ip68-9-58-81.ri.ri.cox.net) joined #forth 08:09:43 I'm a forth bot. type sif: 08:10:07 sif: : a 0 begin 1+ dup . 0 until drop ; a 08:10:08 herkamire: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 08:10:11 --- join: futhin (~thin@h24-64-174-2.cg.shawcable.net) joined #forth 08:10:18 infinite loops are now to problem :) 08:11:29 --- quit: gforth ("onetom") 08:11:44 --- join: gforth (guest@adsl52030.vnet.hu) joined #forth 08:12:35 --- quit: gforth (Client Quit) 08:13:42 --- join: forth (guest@adsl52030.vnet.hu) joined #forth 08:14:44 --- quit: forth (Client Quit) 08:16:41 sif: 8 7 + . 08:16:42 herkamire: 15 08:19:02 --- quit: onetom (Read error: 110 (Connection timed out)) 08:19:03 --- nick: onetom_ -> onetom 08:19:35 sif: : blah 16 0 do i . loop ; blah 08:19:36 futhin: 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 08:23:36 sif: ." hello world" 08:24:12 sif: : foo ." Hello world!" ; foo 08:24:44 why doesn't sif work for me? doesn't like me? 08:24:54 damn. it stopped working when I closed my terminal 08:25:03 heh 08:25:50 that's cool ... how is sif written? 08:25:50 --- quit: sif (Remote closed the connection) 08:26:25 first there is my little forth system written in c 08:26:51 then there is a short shell script and a couple tiny C files that together make the bot 08:27:16 tcpclient makes it really easy to make the bot 08:28:05 --- join: sif (~siforth@ip68-9-58-81.ri.ri.cox.net) joined #forth 08:28:05 I'm a forth bot. type sif: 08:28:12 that's pretty cool 08:28:13 MrGone: try again 08:28:15 sif: ." hello world" 08:28:22 sif: : foo ." Hello world!" ; foo 08:28:39 sif: 8 9 + . 08:28:40 herkamire: 17 08:28:41 no go 08:28:50 doesn't like ." ?? 08:28:58 doesn't like me in particular? 08:29:02 sif: ." Hello world!" 08:29:04 herkamire: Hello world! 08:29:09 sif: 8 9 + . 08:29:22 you prick! 08:29:28 that's bizzar 08:29:33 are you using windoze? 08:29:34 --- nick: MrGone -> MrReach 08:29:37 yes 08:29:50 sif: 8 9 + . 08:30:03 sif: 8 0 7 .s 08:30:18 what difference does the client make? 08:32:11 --- join: herktel (~herkatel@wsip68-15-54-54.ri.ri.cox.net) joined #forth 08:32:37 maybe it's writing the message with a slightly different format. do it again. 08:32:40 i'm using windows too 08:32:42 mirc 08:32:45 sif: 2 3 + . 08:32:48 eh 08:32:51 i worked before 08:32:58 sif: 8 4 + . 08:33:00 he's working on sif 08:33:04 yeah 08:33:18 sif is dead ... serves it right @:^> 08:33:29 heh 08:34:15 sif: 8 3 . 08:34:16 herkamire: 3 08:34:24 sif: 8 9 + . 08:34:27 I suspended it by accedent 08:34:44 sif = Svenska Industritjänstemannaförbundet, I think :) 08:35:03 * MrReach glares at the forthbot. 08:35:25 anyway, it's pretty cool, even if it doesnt work for me 08:35:34 rob_ert: I was thinking a long the lines of Safe Interpteted Forth... but that looks cool :) ;) 08:37:00 --- quit: sif (Remote closed the connection) 08:37:12 --- join: sif (~siforth@ip68-9-58-81.ri.ri.cox.net) joined #forth 08:37:12 I'm a forth bot. type sif: 08:37:23 sif: 8 9 + . 08:37:25 sif: 8 . 08:37:26 herkamire: 8 08:37:33 blarg! 08:37:36 --- nick: herkamire -> HerkaMire 08:37:46 sif: 889 . 08:37:47 HerkaMire: 889 08:37:48 sif: 2 3 + . 08:37:50 futhin: 5 08:37:55 it's the capitals 08:37:57 * MrReach laughs. 08:38:05 --- nick: MrReach -> mrreach 08:38:12 sif: test 08:38:18 sif: 8 . 08:38:28 sif: 2 3 + . 08:38:29 futhin: 5 08:38:35 heh wtf 08:38:38 nope, not the capitals 08:38:43 --- nick: mrreach -> MrReach 08:38:44 sif: : iq . ; 0 iq 08:38:45 rob_ert: 0 08:38:53 sif: iq 08:38:55 futhin: Word not found: iq 08:39:00 sif: 0 iq 08:39:02 futhin: Word not found: iq 08:39:15 the dictionary is reset after each line of input 08:39:25 yeah, the whole forth system 08:40:02 sif: ." Freeze, FBI!" 08:40:03 rob_ert: Freeze, FBI! 08:40:05 sif: 323 . 08:40:06 HerkaMire: 323 08:40:41 sif: ." I'm trying again." 08:40:56 sif: ." I'm trying again." 08:40:57 futhin: I'm trying again. 08:41:01 wugh wtf 08:41:02 sif: ." I'm a piece of shit bot." 08:41:14 no wonder it won't print it 08:41:18 --- nick: futhin -> mrreach_ 08:41:32 sif: ." i suck, hard" 08:41:36 mrreach_: i suck, hard 08:41:42 --- nick: mrreach_ -> futhin 08:41:44 um 08:41:45 bah 08:43:33 --- quit: sif (Remote closed the connection) 08:43:37 --- join: sif (~siforth@ip68-9-58-81.ri.ri.cox.net) joined #forth 08:43:37 I'm a forth bot. type sif: 08:43:51 bad sif: 8 . 08:43:53 sif: 8 . 08:43:54 futhin: 8 08:44:11 --- nick: HerkaMire -> herkamire 08:44:28 sif: 1. 08:44:32 sif: 1 . 08:44:34 sif: 2 2 2 2 2 2 2 * * * * * * . 08:44:36 rob_ert: 128 08:44:48 this is *TOO* funny 08:44:55 --- nick: MrReach -> sif_ 08:45:00 sif: 8 . 08:45:04 --- quit: herktel () 08:45:09 --- nick: sif_ -> MrReach 08:45:16 Hehe 08:45:25 sif: ." MrReach loves me." 08:45:27 rob_ert: MrReach loves me. 08:45:54 mrreach: i wonder if you are sending color codes or something weird.. 08:45:54 sif: ." sif: 8 ." 08:45:55 rob_ert: sif: 8 . 08:45:58 Hehe 08:46:15 .oO(Oops..) 08:46:20 --- join: herktel (~herkatel@wsip68-15-54-54.ri.ri.cox.net) joined #forth 08:46:45 sif: cr ." sif: 8 ." 08:46:47 futhin: sif: 8 . 08:46:52 hehe :) onetom tried getting his bot to send my bot some forth like that :) 08:47:35 --- quit: tathi ("Client Exiting") 08:47:38 a network of forth bots, passing code to each other! 08:47:48 Yay! 08:47:57 MrReach: I'm mystified 08:48:08 sif: 8 . 08:48:13 sif: ." futhin wants to DoS me :(" 08:48:14 rob_ert: futhin wants to DoS me :( 08:48:19 oh, it might be ... 08:48:41 ~mrreach@209.181.43.190 08:48:56 that might be screwing it up 08:49:07 that would seem silly to me.. 08:49:15 hm 08:49:23 that might be true.. 08:49:30 it's the only real different between my login and everyone elses 08:49:40 sif: : x 0 10 do 33 emit loop ; x 08:49:41 rob_ert: !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 08:49:44 because i assume herkamire is telnetting into the server.. and i telnetted yesterday 08:49:48 Eh, oops 08:49:52 I mean, 10 0 08:49:53 not 0 10 08:50:04 and it looks like: 08:50:26 blahblahblah ~jason@wsip68-15-54-54.ri.ri.cox.net> message 08:51:18 for each person who types a message.. the address shows 08:53:39 MrReach: try it again 08:55:05 I came in through telnet and the stuff from MrReach looks the same as from us 08:55:19 sif: 94 . 08:55:20 herkamire: 94 08:55:56 sif: 8 . 08:57:41 I didn't know enigma did some of the soundtrack for La Femme Nakita 08:57:52 --- quit: herktel () 08:59:52 "I've seen things you people wouldn't believe, heh ... 09:00:17 attack ships on fire off the shoulder of Orion ... 09:00:49 I've seen see-bees glitter in the dark at Tenhousen Gate 09:01:00 all those moments ... lost in time 09:01:45 like tears in the rain" ... Rutger Houer, unnamed character, the dying owrds of his character in Blade runner ... orchestrated to Vangelis 09:02:43 sif: 8 . 09:03:02 heh, the bot hates me 09:03:06 they usually like me 09:03:30 --- quit: sif (Remote closed the connection) 09:03:37 --- join: sif (~siforth@ip68-9-58-81.ri.ri.cox.net) joined #forth 09:03:37 I'm a forth bot. type sif: 09:03:49 MrReach: try again please 09:04:27 sif: 8 . 09:04:44 * MrReach sticks out his tongue and makes a rude noise. 09:05:38 sif: 93 . 09:05:39 herkamire: 93 09:06:08 found it! 09:06:20 MrReach: you are sending the channel name with a capital F and my bot doesn't handle that 09:06:22 hold on 09:07:23 oh! 09:07:30 --- part: MrReach left #forth 09:07:35 --- join: MrReach (~mrreach@209.181.43.190) joined #forth 09:07:41 sif: 8 . 09:07:42 MrReach: 8 09:07:46 HURRAH!!! 09:08:00 duh! took forever to figure out! 09:08:14 it probably would have taken me longer 09:08:25 how amusing 09:08:27 you rejoined as /join #forth ? 09:08:32 yep 09:08:34 --- quit: sif (Remote closed the connection) 09:08:40 wheras previously you joined as #FORTH ? 09:08:43 weird 09:08:44 --- join: sif (~siforth@ip68-9-58-81.ri.ri.cox.net) joined #forth 09:08:44 I'm a forth bot. type sif: 09:08:47 sif: 87 . 09:08:49 herkamire: 87 09:08:49 no, #Forth 09:08:57 oh 09:09:05