r3wp [groups: 83 posts: 189283]
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

World: r3wp

[All] except covered in other channels

Sunanda
28-Feb-2005
[1420]
read join http:// second load/markup "<td>4.27.151.216</td><td>15551</td"
Micha
28-Feb-2005
[1421x6]
ok
digit: charset [#"0" - #"9"]
letter: charset [#"a" - #"z" #"A" - #"Z"]
char:  charset ["/<>^/  :" #"a" - #"z" #"A" - #"Z"]
s: "testse193.194.70.123 1080iiyyyuiyiy  234.221.23.5:3380<td>24.91.92.247</td><td>18844</td>"
parse/all s [some [start: digit 3 [number "."] number x: 1 10 char 
y: 1 5 digit   end: ( probe reduce [ copy/part start x  copy/part 
y end]) | skip ]]
["193.194.70.123" "1080"]
["234.221.23.5" "3380"]
["24.91.92.247" "18844"]
this was can facilitate ?
DideC
28-Feb-2005
[1427]
Question: what day is the "easter day" ? sunday or monday ?
yeksoon
28-Feb-2005
[1428x2]
Easter.. >>my limited knowledge<<... alwasy falls on Sunday
or is this supposed to be a 'trick' question that I am slow to catch?
DideC
28-Feb-2005
[1430]
In France easter is sunday, but the monday is not worked. So we have 
easter day ans easter monday.
I wonder how it's "said" in english.
yeksoon
28-Feb-2005
[1431]
I am not a Christian.


But, given that Easter always falls on a Sunday, there should not 
be an 'Easter Monday'.

Holiday 'in lieu' for Easter may be something that is technically 
correct.
Anton
28-Feb-2005
[1432]
Micha, can be useful:
non-digit: complement digit
Micha
28-Feb-2005
[1433x2]
ok
how to alter the speed of reproduction the  sound of  file *.wav 
?
Tomc
28-Feb-2005
[1435x6]
Easter falls on the first sunday after a certain full moon,  if I 
recall
most likely the third fullmoon of the year  but there is a more complicated 
way of knowing ....
>> x: now/year
== 2005
>> x // 19
== 10
>> a: x // 19
== 10
>> b: x / 100
== 20.05
>> c: x // 100
== 5
>> d: b / 4
== 5.0125
>> e: b // 4
== 5.00000000000007E-2
>> f: (b + 8) / 24
== 1.16875
>> g: b - f + 1 / 3
== 6.62708333333333
>> h: 19 * a + b - d - g + 15 / 30
== 7.11368055555556
>> i: c / 4
== 1.25
>> k: c // 4
== 1
>> l: (32 + e + e + i + i - h - k) // 7
== 5.48631944444444
>> m: a + (11 * h) + (22 * l) / 451
== 0.463302691549642
>> month: h + l - (7 * m) + 114 / 31
== 3.9792542309404
>> day:  h + l - (7 * m) + 114 // 31
== 30.3568811591525
so according to that March 30 2005 should be easter (but it is not 
a sundy) prolly the 27th  then
couple of typos in there
easter?: func [ {given a year returns the date of easter.

    lifted from "Astronomical Formulae for Caculators" by Jean Meeus 
    1979
    algorithm attributed to a 1876 publication

    note: I am adding a + 1 to the day to accoung for appearent rounding 
    errors
    }
    x[integer!] "(Gregorian) year"
 /local a b c d e f g h i k l m n p
][  a: x // 19
	b: to integer! (x /  100) c: x // 100
	d: to integer! (b /  4)   e: b // 4
	f: to integer! (b + 8 / 25)
	g: to integer! (b - f + 1 / 3)
	h: 19 * a + b - d - g + 15 // 30
	i: to integer! (c / 4)     k: c // 4
	l: 32 + e + e + i + i - h - k // 7
	m: to integer! (11 * h + a + (22 * l) / 451)
	n: to integer! (h + l - (7 * m) + 114 /  31)
	p: h + l - (7 * m) + 114 // 31
	to date! reduce[x n p + 1]
]
DideC
28-Feb-2005
[1441]
As I ask all that to add this particular function to the Library, 
then, why does this function is not already on rebol.org ??
Tomc
28-Feb-2005
[1442x2]
I ahve a easier time maling the function than the library header
but we should all put more effort into our excelent library
Sunanda
28-Feb-2005
[1444]
If you upload a script without a Library header, one should be inserted 
automatically.....You just need to update it to have the right values.


Several people have claimed that it should be possible to get 99% 
of the right values by analysing the script automatically. So far, 
no one has demonstrated a header-writer. Maybe you could write one 
first!?
Tomc
28-Feb-2005
[1445]
beurocrocy is not one of my strong suits , but I will keep it in 
mind
Allen
28-Feb-2005
[1446]
I had an easter function in rebol.org years ago, I assume it is still 
there.
Tomc
28-Feb-2005
[1447]
[Search=easter] .... no items found in search.
Sunanda
28-Feb-2005
[1448]
Not as far as I can see.

For no explicable reason, not all scripts on the "old" library made 
it to the "new" one.

That was not a deliberate quality/triage choice -- just some somehow 
slipped the net.
Tomc
28-Feb-2005
[1449]
maybe the older library on rebol.com
Allen
28-Feb-2005
[1450]
http://web.archive.org/web/20000930190758/www.rebol.org/math/easter.html
Sunanda
28-Feb-2005
[1451]
I don't think it as ever in the REBOLtech Library -- whcih was the 
main starting point for the new Library:
http://www.reboltech.com/library/script-math.html
Which may be how it got overlooked.
Allen
28-Feb-2005
[1452]
here's the old rebol.org list, probably a few missed gems in there. 
http://web.archive.org/web/20021208011501/www.rebol.org/fl-list.html
Sunanda
28-Feb-2005
[1453x2]
Plus there were a load of unpublished scripts in the old REBOL.org......I'll 
just officially describe some of them as "weird".
If you've got the time to rescue your forgotten gems and release 
them via REBOL.org, we'd all benefit from that.
Allen
28-Feb-2005
[1455]
I'll wait for the for the next rebol release before picking through 
the time capsule, some of the old scripts were obsoleted with later 
built-in functions.
Sunanda
28-Feb-2005
[1456]
Good point ----- but it could be *years* :-)
BrianW
28-Feb-2005
[1457]
*whimper*
Tomc
28-Feb-2005
[1458]
heak has been yeaes
BrianW
28-Feb-2005
[1459x2]
From my perspective it's only been months, and even that is a little 
too long :-)
But I'm learning to cope ;-)
Tomc
28-Feb-2005
[1461]
to be fair there are alpha and beta updates
BrianW
28-Feb-2005
[1462x2]
True, loads of those
Where is the URL I can point folks to for learning about how to set 
up a Rebol3 account? I seem to have lost the bookmark for it.
Graham
28-Feb-2005
[1464x2]
http://www.altme.comand then logon to rebol3 with guest/guest
your docs say password is "pass" which is wrong from memory
BrianW
28-Feb-2005
[1466x2]
Thanks very much, I *thought* that was wrong
The correction has been made and uploaded.
[unknown: 9]
28-Feb-2005
[1468]
Brian, I have already sent a link to your site to several people. 
 They like it (they are none Rebol users).
BrianW
1-Mar-2005
[1469]
Reichart, thank you! Those are exactly the people I was writing for 
:-)