00:00:00 --- log: started forth/03.05.22
00:02:36 --- quit: snowrichard ("leaving")
00:03:16 --- quit: a7r (Read error: 110 (Connection timed out))
00:35:33 --- join: ramnull (~nicad@12-245-85-50.client.attbi.com) joined #forth
00:35:50 <ramnull> Wazzzzup!
00:38:29 <ramnull> bbl
00:38:32 --- quit: ramnull (Client Quit)
00:38:39 <Jim7J1AJH> That was fast.
02:10:21 --- quit: Serg_Penguin ()
02:26:06 --- quit: Jim7J1AJH ("73 from Tokyo")
02:28:33 --- join: mur (murr@baana-62-165-190-37.phnet.fi) joined #forth
05:18:59 --- join: crc (~crc@AC828FC7.ipt.aol.com) joined #forth
05:38:27 --- quit: crc ("I was using TinyIRC! Visit http://www.tinyirc.net/ for more information.")
06:07:22 --- join: Speuler (~Speuler@mnch-d9ba46d1.pool.mediaWays.net) joined #forth
06:07:27 <Speuler> tach
06:31:31 <Robert> Hoi :)
06:32:52 <Speuler> forthforth v12 does (positive) numbers from interpreter
06:33:19 <Speuler> (byte-tokenized experimental minimal forth)
06:35:18 <Robert> How minimal?
06:35:59 <onetom> where is it?
06:39:45 <Speuler> www.forthfreak.net
06:39:47 <Speuler> of course
06:40:11 <Speuler> "and" is implemented as hi-level word
06:46:53 <Speuler> no, "or" is
06:52:59 --- join: Serg_Penguin (Serg_Pengu@212.34.52.142) joined #forth
06:53:20 --- quit: Serg_Penguin (Client Quit)
07:25:49 --- quit: mur ("doing something useful instead")
07:29:11 <Speuler> hi-level words look like this:
07:29:13 <Speuler> header: or
07:29:13 <Speuler> : x_or  ( x1 x2 -- x3 )   
07:29:13 <Speuler>       xinvert xswap 
07:29:13 <Speuler>       xinvert xand
07:29:13 <Speuler>       xinvert  ;
07:30:07 <Speuler> primitives like this:
07:30:08 <Speuler> header: latest
07:30:09 <Speuler> :noname ( rp ip -- n rp ip )          debugging if ." latest" then
07:30:09 <Speuler>       #tokens @ 1- -rot ;
07:30:09 <Speuler> primitive: xlatest
07:30:28 <Speuler> word handler like this:
07:30:30 <Speuler> header: dovar
07:30:31 <Speuler> :noname ( parstack rp ip w -- parstack rp ip )
07:30:31 <Speuler>                          debugging if ." dovar @" dup . then
07:30:31 <Speuler>    -rot
07:30:31 <Speuler> ;
07:30:31 <Speuler> primitive: xdovar
07:31:09 <Speuler> flow control is meta-ized
07:31:14 <Speuler> looks like this:
07:31:15 <Speuler> header: quit
07:31:15 <Speuler> : xquit
07:31:15 <Speuler>       xinitstacks  
07:31:15 <Speuler>       xleftbracket
07:31:15 <Speuler>       begin
07:31:17 <Speuler>          xquery       
07:31:19 <Speuler>          xinterpret   
07:31:21 <Speuler>          xprompt      
07:31:23 <Speuler>       again
07:31:25 <Speuler> ;
07:34:33 --- join: snowrichard (~rsnow1@c66.190.102.26.ts46v-01.mrshll.tx.charter.com) joined #forth
07:51:47 <Speuler> 1tom: sorry, was a mistake in ff12.f. i just uploaded again
07:52:05 <Speuler> it gives stack underflow upon entering a number
08:30:48 <onetom> yeah, ive noticed it ;)
08:36:21 <Speuler> fixed. was caused by a modication to the interpreter when word not found
08:41:16 <Speuler> first hi-level word executed successfully after having entered it interactively
09:34:00 <Speuler> immediate words work too
10:07:58 --- part: Speuler left #forth
10:49:58 --- join: deluxe (~deluxe@pD9EE152A.dip.t-dialin.net) joined #forth
10:57:08 --- join: a7r (~a7r@206.72.82.135) joined #forth
11:06:37 --- quit: XeF4 (Read error: 113 (No route to host))
11:26:05 --- quit: deluxe ("bb")
12:22:59 --- part: snowrichard left #forth
13:31:21 --- quit: a7r (Read error: 110 (Connection timed out))
13:57:53 --- join: ramnull (~nicad@12-245-85-50.client.attbi.com) joined #forth
14:41:53 --- join: snowrichard (~rsnow1@c66.190.102.26.ts46v-01.mrshll.tx.charter.com) joined #forth
14:42:20 <snowrichard> damn got kicked from #netbsd
14:44:20 --- part: snowrichard left #forth
14:48:29 --- join: snowrichard (~rsnow1@c66.190.102.26.ts46v-01.mrshll.tx.charter.com) joined #forth
14:49:05 --- quit: snowrichard ("leaving")
14:56:16 --- join: tcn (~tcn@tc1-login44.megatrondata.com) joined #forth
14:56:54 <Robert> Hey tcn 
14:56:57 <tcn> hey
14:57:03 --- join: a7r (~a7r@206.72.82.135) joined #forth
14:57:35 <tcn> hello
14:57:57 <a7r> hey
14:58:18 <Robert> Evening, a7r :)
14:58:36 <a7r> hey Robert 
15:00:14 --- join: rpc (~rpc@global.whiteh8.net) joined #forth
15:00:39 --- part: rpc left #forth
15:02:07 --- join: snowrichard (~rsnow1@c66.190.102.26.ts46v-01.mrshll.tx.charter.com) joined #forth
15:08:42 <Robert> Hi snowrichard 
15:08:51 <Robert> Why did you get kicked from #netbsd?
15:21:36 --- quit: ramnull ("This isn't Happy Hour!")
15:27:05 --- join: tgunr (~user@A17-205-43-45.apple.com) joined #forth
15:29:55 <tgunr> anyone around?
15:30:20 <Robert> Yep
15:30:35 <tgunr> cool
15:31:06 <Robert> That not all of us are idling, as usual? :)
15:31:18 <tgunr> i have forgotten how to take a little 16 bit number and divide it by a big 16 bit
15:31:43 <tgunr> and getting at 32-bit result
15:32:05 <tgunr> then formatted as as 16.16 fixed value
15:32:30 <Robert> Hmm.. good question, I don't knoe either. 
15:32:36 <tgunr> if i try to scale the little number up
15:32:55 <tgunr> then do the division the result is not what i expected :(
15:33:05 * Robert checks.
15:33:15 <tcn> left-shift the little number 16 places
15:33:17 <tgunr> i have not worked on A/D converters in many years
15:33:32 <tgunr> i thought i tried that
15:33:47 <tgunr> let me check again
15:34:06 <tcn> well.. it'll give you a 16-bit result, really.. decimal places only
15:34:08 <Robert> Works fine for me.
15:34:29 <Robert> 123 16 << 1234 / . 6532  ok
15:34:36 <Robert> > 6532 / 2^16
15:34:37 <Robert>         .09967041015625
15:34:37 <Robert> > 123 / 1234
15:34:37 <Robert>         ~.09967585089141004862
15:44:17 <tgunr> was on the phone
15:44:24 <tgunr> ok let me go try again
15:54:29 <tgunr> thanks robert that works
15:54:49 <tgunr> don't know what i was doing in the wee hours this morning :)
15:57:02 <Robert> Hehe.
15:57:21 <tgunr> what kind of work do you do robert?
15:57:41 <Robert> None. I go to school :)
15:57:59 <tgunr> good fer you, enjoy it while you can!
15:58:04 <Robert> I sure am.
15:58:15 <tgunr> what year?
15:58:16 <Robert> Many hours every day to waste on IRC.
15:58:26 <Robert> 11th grade... (I'm 17).
15:58:31 <tgunr> i used to be on irc a lot many years ago
15:58:36 <tgunr> cool
15:58:57 <Robert> But you managed to quit?
15:59:27 <tgunr> sort of, try to remember to log back in again
15:59:38 <tgunr> er tey=trying
16:00:13 <tgunr> what kind of computer do you have and how did you get interesrted in Forth
16:00:23 <Robert> IRC is part of my room. The computer is always on, and I'm always on IRC... quite useful to get free tech support 24/7 ;)
16:00:42 <tgunr> and provide it! :)
16:00:45 <Robert> http://robert.zizi.org/robert.html <-- list of my computers. I mostly use the Pentium 200 one.
16:00:48 <Robert> Yes, sure.
16:01:24 <Robert> I don't exactly remember when I first heard about Forth, but I went here (to #forth) a few times before I knew what it was all about.
16:01:57 <tgunr> i havge been using Forth professionally since 1976
16:02:16 <Robert> Then some of the guys in here (MrReach, Speuler, and others) started to teach me.
16:02:23 <tgunr> excellent
16:02:24 <Robert> Oh.. neat.
16:02:35 <Robert> I've been coding some simple programs the last year or so.
16:02:48 <Robert> Simple language to learn, though :)
16:03:04 <Robert> Once you get the basic concepts.
16:03:13 <tgunr> i think of it as more like a CPU and the  words are its instruction set
16:03:37 <tgunr> yes, the original Forth I used had 31 words
16:04:10 <Robert> Brainfuck does fine with 8 words ;)
16:04:31 <tgunr> excuse me, what?
16:05:31 <Robert> Brainfuck. Small, very simple language. It's either an attempt to create the smallest usable language, or a big joke.. Maybe both.
16:05:38 <Robert> google will tell you everything about it. :)
16:06:00 <Robert> Ehm, or we could get back to the discussion.
16:06:27 <tgunr> never heard of it
16:06:35 <Robert> Most sane people haven't.
16:06:40 <tgunr> :)
16:07:04 <Robert> When I first started learning Forth, I did it from an assembly programmer's perspective. The guys in here tried hard to explain exactly how a Forth worked under the hood.
16:07:45 <tgunr> thats the best way to learn, is to build a forth engine
16:07:52 <Robert> Yeah.
16:08:17 <Robert> Especially with such a low-level language.
16:08:37 <Robert> But then I discovered I needed to learn how to code using Forth ;)
16:09:34 <tgunr> ok i think i havee what i need but how can I recover what is in the modulo
16:10:06 <Robert> From the division?
16:10:13 <tgunr> -> <- Empty 123 16 << 1234 /mod  ok
16:10:14 <tgunr> -> 440 6532 <- Top
16:10:46 <tgunr> the 440 should be part of the answer no?
16:12:02 <Robert> Hmm... good question.
16:14:05 <Robert> >  (6532  / 2^16) + ((440/1234) / 2^16)
16:14:06 <Robert>         ~.09967585089141004862
16:14:06 <Robert> > 123/1234
16:14:06 <Robert>         ~.09967585089141004862
16:14:14 <Robert> While:
16:14:15 <Robert> >  6532  / 2^16
16:14:15 <Robert>         .09967041015625
16:14:23 <Robert> Just a few correct decimals.
16:14:45 <Robert> So I guess you could recurse the function or something to get more decimals.
16:15:13 <Robert> Sorry, but it's getting late here, and I have school tomorrow. Nice talking to you anyway :)
16:15:17 <tgunr> yeh, i'm thinking about it, they want the most precise value they can get
16:15:24 <tgunr> cc cya
16:31:57 --- quit: tcn ("TinyIRC 1.1")
16:56:45 --- join: ramnull (~nicad@12-245-85-50.client.attbi.com) joined #forth
16:56:54 <ramnull> What's up?
16:58:57 --- quit: ramnull (Client Quit)
17:27:07 --- quit: a7r (Read error: 110 (Connection timed out))
17:42:49 --- join: TheBlueWizard (TheBlueWiz@207.111.96.73) joined #forth
17:42:50 --- mode: ChanServ set +o TheBlueWizard
17:42:54 <TheBlueWizard> hiya all
17:51:34 <TheBlueWizard> gotta go...bye all
17:51:36 --- part: TheBlueWizard left #forth
18:20:17 --- join: Sonarman (~matt@adsl-64-171-255-75.dsl.snfc21.pacbell.net) joined #forth
18:26:27 <Sonarman> how are you gentlemen
18:48:14 --- quit: snowrichard ("leaving")
18:55:57 --- quit: tgunr (Read error: 60 (Operation timed out))
19:03:36 --- join: snowrichard (~rsnow1@c66.190.102.26.ts46v-01.mrshll.tx.charter.com) joined #forth
19:13:48 --- quit: Sonarman ("Lost terminal")
19:16:35 --- join: Sonarman (~matt@adsl-64-171-255-75.dsl.snfc21.pacbell.net) joined #forth
19:21:22 --- quit: snowrichard ("Lost terminal")
20:47:53 <Sonarman> how is an rshift different from a arshift?
21:49:47 <onetom> why, what is arshift? :)
21:54:23 <Sonarman> an "Arithmatic right shift", as opposed to a "Logical right shift" (rshift) (according to the pForth tutorial).  what's the difference between a logical and an arithmatic shift?  (yeah, gforth doesn't have arshift either, just rshift)
22:15:40 --- join: divgrad (~wer@81.25.34.21) joined #forth
22:22:17 --- quit: divgrad (Read error: 113 (No route to host))
22:28:36 --- quit: Sonarman ("leaving")
22:36:00 --- join: Serg_Penguin (Serg_Pengu@212.34.52.142) joined #forth
22:37:01 <Serg_Penguin> hi
22:37:26 <Serg_Penguin> whadda u think, what we can do to advertise Forth to beginning programmers ?
22:43:36 --- join: kc5tja (~kc5tja@ip68-8-206-137.sd.sd.cox.net) joined #forth
22:43:36 --- mode: ChanServ set +o kc5tja
22:43:47 <Serg_Penguin> hi
22:52:33 --- join: bwb (~bwb@ip68-4-121-108.oc.oc.cox.net) joined #forth
22:52:36 <bwb> howdy
22:53:30 <bwb> kc5tja: happen to know if a cellphone signal will damage a monitor at all?
22:53:44 <bwb> I noticed my monitor flickering occasionally and now I noticed it happens when phone rings
22:55:10 * Serg_Penguin seen how monitor appears completely bad then phone just lays near it :)
22:55:32 <Serg_Penguin> stupid guis called me to bring it to repair
22:55:45 <bwb> ?
22:55:53 <Serg_Penguin> i pointed them at the phone, and the trubble gone
22:56:06 <bwb> ah
22:56:06 <bwb> heh
22:56:44 <bwb> I thought my monitor was going ;(  (I did get it for free from someone that rescuded it from dumpster soo)
22:56:56 <Serg_Penguin> :))
22:57:26 <bwb> Works better then the $300 one I bought too :)
22:59:02 <Serg_Penguin> yeah !
22:59:30 <Serg_Penguin> i got 17' 4 75$, while 'average' second-hand price is 130-150$
23:00:00 <Serg_Penguin> for 75$, one can buy only 15'
23:00:08 <bwb> yeah
23:00:18 <bwb> 19" Futera for $300 == horrible
23:00:27 <bwb> this 17" is a dell trinitron
23:01:08 <Serg_Penguin> here at work, i dug up a CRT w/ graffiti 'notworks. power protection blows' - it works few workdays !
23:11:13 --- join: a7r (~a7r@206.72.82.135) joined #forth
23:12:58 * Serg_Penguin is hacking a catalog in Perl
23:13:05 --- quit: Serg_Penguin ()
23:13:11 --- part: bwb left #forth
23:59:59 --- log: ended forth/03.05.22