[ALLY] ? Re:
[1/55] from: steve:shireman:maxonusa at: 4-Aug-2000 13:16
[djunod--reality-check-inc--com] wrote:
Dave Junod of AmigaGuide, Zedrexx, etc fame, I presume?
Nice to see you again. (In the context of a Rebol Ally!)
May the View be with you...
Steve Shireman
from one who doesn't use reality as a crutch...
[2/55] from: siegel:prodigy:mx at: 21-Sep-2000 20:59
selma-source
--
JULES SIEGEL Apdo 1764 Cancun Q. Roo 77501
http://www.cafecancun.com Fax1.530.706.8739 Tel 1.52.98 83.36.29
[3/55] from: sharriff:aina:med-iq at: 4-Oct-2000 8:50
It´s stated somewhere that HASH! and LIST! types are better for data
retieval, by what factor and why exactly? are there any special sort or
retieve commands or functions that are not documented? I habe´nt found any
I´m using Blocks to try to implement a user list of 40-50 users.
Sharriff Aina
med.iq information & quality in healthcare AG
[4/55] from: rebol:techscribe at: 4-Oct-2000 12:20
Hi Sharriff,
1. Thanks for the link to the SocketServer site. Interesting stuff.
2.Theoretically (I haven't actually timed it)
LIST! is faster when it comes to adding and removing elements. If you have a
lot of add/remove operations on a series than a value of type list! should be
faster.
HASH! is faster when it comes to looking up elements. If you need to speed up
searches then HASH! should be much faster. I expect that the speed of looking
up elements in hashes is offset by the time it initially takes to construct a
hash! and to add and remove elements in a hash.
Be careful when navigating in list series. Indeces do not work the same way
they do in blocks. Try out these examples:
>> list: make list! [1 2 3 4]
>> block: make block! [1 2 3 4]
<<quoted lines omitted: 4>>
>> first block
>> first list
[Sharriff--Aina--med-iq--de] wrote:
[5/55] from: coussement:c:itc:mil:be at: 18-Oct-2000 8:33
Hi list!
In the application i'm now developping, I need a mean to time a response
interval to an item.
I could use the classical :
start-time: now/time
delta-time: now/time - start-time
but this produce a interval in seconds...
I should need an interval in tenth of second !
Does REBOL/Core 2.3.0.3.1 support any function like CPU ( ) in some other
language ?
Does anybody have any solution to this problem ?
Thanks in advance !!!
;-) Christophe Coussement
[6/55] from: list:brando:rebol at: 19-Oct-2000 2:29
---------- Forwarded message ----------
Date: Thu, 19 Oct 2000 06:23:22 +0200
From: Fantam <[Fantam--mailandnews--com]>
To: [list--rebol--com]
Subject: Rebol
Hello all,
Some time ago on this list, there was a discussion regarding usage
examples of Rebol -- how people actually use Rebol. This is an
interesting topic for various reasons, and I decided to share with
you one way I use rebol.
First of all, I have to specify that I program for "domestic"
reasons, and not in a professional way.
That said, I can now tell how I put my first steps of Rebol in use.
What I wanted was a program that could detect if I am connected, and
if so, upload recently modified files to a ftp server. The important
thing was to automate everything, so it would run in the background
with no user interaction. Since I use NT, I installed the scripts as
services (services are processes that can run independently
of the current logged user).
The code was not very complicated to write, but to make the program
run reliably took some time and revealed a couple of weak points or
bugs with Rebol, some not solved yet.
The two bugs related to the ftp scheme in Rebol are:
a, Impossible to 'read filenames with spaces.
b, Bug with 'exists?.
With some hacks though, it was possible to accomplish the objective of the
program, and it runs solidly for some time now.
That's it. Maybe this will give someone ideas. Any further questions
welcome.
Note: RT are aware of the aforementionned bugs.
[7/55] from: brett:codeconscious at: 19-Oct-2000 23:37
Hi Fantam,
Thanks for your description. I use Rebol for generating and uploading my web
sites. For this purpose it works admirably. Also, Rebol is a tool that has
let me explore various problems that I've felt have been impractical with
other languages (I'm not talking DCL now :) ). As a result, I've learned a
lot.
This is the first language I've used since DCL (shh..) that has encouraged
me to build a personal script library. The reason is that I can see a payoff
for my time. Inspired by Rebol's goal of being a messaging language, when I
write a script for my library that reads a particular format I aim to write
a complimentry export function for that same format. Moreover, I try to have
the newly read data in a neutral information rich format (if there is such a
thing). In this way, my hope is that these scripts increase in value over
time rather than decrease which seems to be the lot of most software.
Regarding your scripts. Like you I have a need to upload files, but I also
have a need to download files regularly. I would appreciate it if you could
describe how your script checks for a connection and how it has been
installed as a service under windows NT. I've other uses in mind for such a
capability.
Thanks
Brett.
[8/55] from: ingo:2b1 at: 19-Oct-2000 15:17
Hi Fantam,
a not really REBOL related question, but how do you
start a rebol script as a service under NT?
thanks in advance,
Ingo
Once upon a time [list--brando--rebol--net] spoketh thus:
[9/55] from: fantam:mailandnews at: 20-Oct-2000 1:00
The basic tool is the SRVANY utility, included as part of the Windows
NT resource kit. The kit is available FTP from Microsoft for NT3.51
and NT4.0.
Easily adapted instructions are included with the program in the file
SRVANY.WRI available on many places on the web.
[10/55] from: fantam:mailandnews at: 20-Oct-2000 0:38
> Regarding your scripts. Like you I have a need to upload files, but I also
> have a need to download files regularly. I would appreciate it if you could
> describe how your script checks for a connection and how it has been
> installed as a service under windows NT. I've other uses in mind for such a
> capability.
On my setup, the rebol function 'connected? isn't reliable. I think
this is due to the fact I have both a network card and a modem (pc
cards on a laptop), so I had to find another way to check for a
connection.
The solution I retained is a batch file that loops and spits every
minute the following standard NT command : route.exe print > route.txt
The Rebol script on its turn reads every minute "route.txt" and
compares it with the not-connected route (localhost).
This is what I call the default route :
default-route:
{===========================================================================
Interface List
0x1 ........................... MS TCP Loopback interface
0x2 ...00 00 00 00 00 00 ...... NdisWan Adapter
===========================================================================
===========================================================================
Active Routes:
Network Destination Netmask Gateway Interface Metric
127.0.0.0 255.0.0.0 127.0.0.1 127.0.0.1 1
255.255.255.255 255.255.255.255 255.255.255.255 2 1
===========================================================================
}
So now, the following very simple check tells you if you're connected
or not :
forever [ wait 00:01
now-route: read %route.txt
either [now-route = default-route] [connected: to-logic false][connected: to-logic true]
either connected [
print "connected"
do %whatever-you-want-to-do-when-connected.r
]
[
print "not connected"
do %whatever-you-want-to-do-when-not-connected.r
]
]
Regarding your second question concerning NT services, you need a file
called srvany.exe available for free from the NT resource kit (or some
truncated version of the resource kit that you can download on the
Microsoft web site).
Hope this helps, fantam
[11/55] from: sharriff:aina:med-iq at: 25-Oct-2000 12:09
Hi List!
One cannot use the "+" or "-" operators on a Date! value, how does one
increase or step through date! values then? I´m trying to construct a
graphical calender.
Best regards
Sharriff Aina
med.iq information & quality in healthcare AG
[12/55] from: timewarp:sirius at: 25-Oct-2000 4:33
I've found the attached REBOL library useful for things like
this. It's overkill if you just want to use it for dates, but
it can be used for a lot of other values.
Cheerfulness,
------EAT
[Sharriff--Aina--med-iq--de] wrote:
> Hi List!
> One cannot use the "+" or "-" operators on a Date! value, how does one
<<quoted lines omitted: 7>>
> [rebol-request--rebol--com] with "unsubscribe" in the
> subject, without the quotes.
-- Attached file included as plaintext by Listar --
-- File: word-gradation.r
REBOL [
Title: "Increment and Decrement (++) and (--) Functions"
File: %word-gradation.r
Author: "EAT"
Date: 16-Feb-2000
Purpose: {Provide polymorphic ++ and -- gradation functions.}
Usage: {
Increment or decrement the value of a word by using the word
as the argument to ++ or --.
Examples:
int: 1
probe ++ int
block: [a b c d e f g]
probe ++ block
money: $1.00
++ money
time: 11:11:11
--/skip time (60 * 60) ; hourly decrement
}
Category: [util 3]
]
increment: func [
"increment a value by one"
val [number! time! date! money! char! tuple! pair! series! port!]
"value to increment"
/prev "return value before incrementing"
/skip n [number!] "amount to skip per iteration"
][
jump: get bind 'skip 'rebol
if not skip [n: 1]
either any [port? val series? val] [jump val to-integer n][val + n]
]
decrement: func [
"decrement a value by one"
val [number! time! date! money! char! tuple! pair! series! port!]
"value to decrement"
/prev "return value before decrementing"
/skip n [number!] "amount to skip per iteration"
][
jump: get bind 'skip 'rebol
if not skip [n: 1]
either any [port? val series? val] [jump val negate to-integer n][val - n]
]
decimal-increment: func [
"increment decimal, money, or time value (default is by one tenth)"
val [decimal! time! money!] "decimal, money, or time value"
/prev "return value before incrementing"
/hundredth "increment by one hundredth"
/thousandth "increment by one thousandth"
][
if hundredth [return val + 0.01]
if thousandth [return val + 0.001]
val + 0.1
]
decimal-decrement: func [
"decrement decimal, money, or time value (default is by one tenth)"
val [decimal! time! money!] "decimal, money, or time value"
/prev "return value before decrementing"
/hundredth "decrement by one hundredth"
/thousandth "decrement by one thousandth"
][
if hundredth [return val - 0.01]
if thousandth [return val - 0.001]
val - 0.1
]
++: func [
"set word referenced by 'word to an incremented value"
'word [word!]
"supports number! time! date! money! char! tuple! pair! series! port!"
/prev "return value before incrementing"
/skip n [number!] "amount to skip each iteration - rounds n with series"
/tenth "supports decimal! time! money! - ignores /skip"
/hundredth "supports decimal! time! money! - ignores /skip"
/thousandth "supports decimal! time! money! - ignores /skip"
/local v
] [
if not any [
if tenth [set word decimal-increment v: get word]
if hundredth [set word decimal-increment/hundredth v: get word]
if thousandth [set word decimal-increment/thousandth v: get word]
] [
set word either skip [
increment/skip v: get word n][increment v: get word]
]
either prev [return v] [return get word]
]
--: func [
"set word referenced by 'word to a decremented value"
'word [word!]
"supports number! time! date! money! char! tuple! pair! series! port!"
/prev "return value before decrementing"
/skip n [number!] "about to skip each iteration - rounds n with series"
/tenth "supports decimal! time! - ignores /skip"
/hundredth "supports decimal! time! - ignores /skip"
/thousandth "supports decimal! time! - ignores /skip"
/local v
] [
if not any [
if tenth [set word decimal-decrement v: get word]
if hundredth [set word decimal-decrement/hundredth v: get word]
if thousandth [set word decimal-decrement/thousandth v: get word]
] [
set word either skip [
decrement/skip v: get word n][decrement v: get word]
]
either prev [return v] [return get word]
]
[13/55] from: joel:neely:fedex at: 25-Oct-2000 8:04
Hi, Sharriff,
[rebol-bounce--rebol--com] wrote:
> Hi List!
>
> One cannot use the "+" or "-" operators on a Date! value, how does one
> increase or step through date! values then? I´m trying to construct a
> graphical calender.
>
How did you reach that conclusion?
>> thisday: now/date
== 25-Oct-2000
>> thisday + 1
== 26-Oct-2000
>> thisday - 1
== 24-Oct-2000
-jn-
[14/55] from: doug:vos:eds at: 25-Oct-2000 9:09
I like Erin's ++ and -- function/operators - very cool!
Or the KISS method...
>> now/date + 1
== 26-Oct-2000
>> now/date + 2
== 27-Oct-2000
[15/55] from: sharriff:aina:med-iq at: 25-Oct-2000 14:13
>> newweek: make date! [ 14 10 1999 ]
== 14-Oct-1999
>> newweek + 1
== 15-Oct-1999
>> then: make date! [ 23 12 1999 ]
== 23-Dec-1999
>> then + 10
== 4-Jan-1999
>> then/weekday
== 5
>>
I´m suprised myself at my former conclusion, sorry to have bothered you
guys!
Sharriff Aina
med.iq information & quality in healthcare AG
Gutenbergstr. 42
[16/55] from: sharriff:aina:med-iq at: 25-Oct-2000 14:15
Great functions Erin! Thanks
Regards
Sharriff Aina
med.iq information & quality in healthcare AG
Gutenbergstr. 42
Erin Thomas
<[timewarp--sir] An: [rebol-list--rebol--com]
ius.com> Kopie:
Gesendet von: Thema: [REBOL] Re: [REBOL]
rebol-bounce@
rebol.com
25.10.00
12:33
Bitte
antworten an
rebol-list
I've found the attached REBOL library useful for things like
this. It's overkill if you just want to use it for dates, but
it can be used for a lot of other values.
Cheerfulness,
------EAT
[Sharriff--Aina--med-iq--de] wrote:
> Hi List!
> One cannot use the "+" or "-" operators on a Date! value, how does one
<<quoted lines omitted: 7>>
> [rebol-request--rebol--com] with "unsubscribe" in the
> subject, without the quotes.
-- Attached file included as plaintext by Listar --
-- File: word-gradation.r
REBOL [
Title: "Increment and Decrement (++) and (--) Functions"
File: %word-gradation.r
Author: "EAT"
Date: 16-Feb-2000
Purpose: {Provide polymorphic ++ and -- gradation functions.}
Usage: {
Increment or decrement the value of a word by using the word
as the argument to ++ or --.
Examples:
int: 1
probe ++ int
block: [a b c d e f g]
probe ++ block
money: $1.00
++ money
time: 11:11:11
--/skip time (60 * 60) ; hourly decrement
}
Category: [util 3]
]
increment: func [
"increment a value by one"
val [number! time! date! money! char! tuple! pair! series! port!]
"value to increment"
/prev "return value before incrementing"
/skip n [number!] "amount to skip per iteration"
][
jump: get bind 'skip 'rebol
if not skip [n: 1]
either any [port? val series? val] [jump val to-integer n][val + n]
]
decrement: func [
"decrement a value by one"
val [number! time! date! money! char! tuple! pair! series! port!]
"value to decrement"
/prev "return value before decrementing"
/skip n [number!] "amount to skip per iteration"
][
jump: get bind 'skip 'rebol
if not skip [n: 1]
either any [port? val series? val] [jump val negate to-integer n][val -
n]
]
decimal-increment: func [
"increment decimal, money, or time value (default is by one tenth)"
val [decimal! time! money!] "decimal, money, or time value"
/prev "return value before incrementing"
/hundredth "increment by one hundredth"
/thousandth "increment by one thousandth"
][
if hundredth [return val + 0.01]
if thousandth [return val + 0.001]
val + 0.1
]
decimal-decrement: func [
"decrement decimal, money, or time value (default is by one tenth)"
val [decimal! time! money!] "decimal, money, or time value"
/prev "return value before decrementing"
/hundredth "decrement by one hundredth"
/thousandth "decrement by one thousandth"
][
if hundredth [return val - 0.01]
if thousandth [return val - 0.001]
val - 0.1
]
++: func [
"set word referenced by 'word to an incremented value"
'word [word!]
"supports number! time! date! money! char! tuple! pair! series! port!"
/prev "return value before incrementing"
/skip n [number!] "amount to skip each iteration - rounds n with
series"
/tenth "supports decimal! time! money! - ignores /skip"
/hundredth "supports decimal! time! money! - ignores /skip"
/thousandth "supports decimal! time! money! - ignores /skip"
/local v
] [
if not any [
if tenth [set word decimal-increment v: get word]
if hundredth [set word decimal-increment/hundredth v: get word]
if thousandth [set word decimal-increment/thousandth v: get word]
] [
set word either skip [
increment/skip v: get word n][increment v: get word]
]
either prev [return v] [return get word]
]
--: func [
"set word referenced by 'word to a decremented value"
'word [word!]
"supports number! time! date! money! char! tuple! pair! series! port!"
/prev "return value before decrementing"
/skip n [number!] "about to skip each iteration - rounds n with series"
/tenth "supports decimal! time! - ignores /skip"
/hundredth "supports decimal! time! - ignores /skip"
/thousandth "supports decimal! time! - ignores /skip"
/local v
] [
if not any [
if tenth [set word decimal-decrement v: get word]
if hundredth [set word decimal-decrement/hundredth v: get word]
if thousandth [set word decimal-decrement/thousandth v: get word]
] [
set word either skip [
decrement/skip v: get word n][decrement v: get word]
]
either prev [return v] [return get word]
]
[17/55] from: timewarp:sirius at: 25-Oct-2000 6:19
Thanks, thought it might appeal to PERLasours and JAVAsours.
Cheerfulness,
----EAT
Vos, Doug
wrote:
[18/55] from: gkoplas:localnet at: 25-Oct-2000 9:34
Just guessing here, jn, but I think he might mean the following issue:
>> thisday: now/date
== 25-Oct-2000
>> otherday: thisday + 5
== 30-Oct-2000
>> print otherday - thisday
5
-- perhaps he's looking for a way to obtain that "otherday - thisday"
results in the date format for October fifth, not the integer 5.
Just guessing on the nature of the original question,
-Geoff
[19/55] from: doug:vos:eds at: 25-Oct-2000 9:46
Not only that but
There is already a graphical calendar for rebol/view in the demos.
Someone already wrote it.
Who has the pointer/link to it?
[20/55] from: petr:krenzelok:trz:cz at: 25-Oct-2000 15:48
Vos, Doug
wrote:
> Not only that but
>
> There is already a graphical calendar for rebol/view in the demos.
> Someone already wrote it.
> Who has the pointer/link to it?
>
1) just try native rebol/view one - type request-date in console
2) in /View panel go to Sites/RF/Styles/Calendar ....
-pekr-
[21/55] from: sharriff:aina:med-iq at: 25-Oct-2000 14:45
Oh! that would be great, maybe the authour give me another tip or two. I
want it implement the calender as a CGI script that outputs XHTML.
Regards
Sharriff Aina
med.iq information & quality in healthcare AG
Gutenbergstr. 42
"Vos, Doug"
<[doug--vos--eds] An: [rebol-list--rebol--com]
.com> Kopie:
Gesendet von: Thema: [REBOL] Re: [REBOL]
rebol-bounce@
rebol.com
25.10.00
14:46
Bitte
antworten an
rebol-list
Not only that but
There is already a graphical calendar for rebol/view in the demos.
Someone already wrote it.
Who has the pointer/link to it?
[22/55] from: gkoplas:localnet at: 25-Oct-2000 10:05
Of course, that wouldn't make any sense at all.
Oh well, I have a tendency to think that if the answer is simple, I didn't
understand the question.
All's well that ends well.
-Geoff
[23/55] from: allen:rebolforces at: 26-Oct-2000 2:12
The date datetype is extremely flexible and does most of the work needed for
making a calendar.
**The only gotcha is the month subtraction bug.**
Month Addition
date: now
date/month: date/month + 24
probe date
26-Oct-2002/1:53:07+10:00
Month Subtraction returns an incorrect date if the result would be a date
earlier than January. :-(
date: now
date/month: date/month - 24
probe date
26-Feb-23844/1:53:55+10:00
(submitted to feedback)
Subtraction via day does not have that problem
date: now
date/day: date/day - 365
probe date
27-Oct-1999/2:04:31+10:00
To get first day of the month
date: now
date/day: 1
probe date
1-Oct-2000/2:00:17+10:00
probe date/weekday
7
To get the last day of the month
date: now
date/month: date/month + 1
date/day: 1
date/day: date/day - 1
probe date
31-Oct-2000/2:06:32+10:00
probe date/weekday
2
Hope this helps
Cheers,
Allen K
[24/55] from: al:bri:xtra at: 26-Oct-2000 10:01
Sharriff Aina wrote:
> One cannot use the "+" or "-" operators on a Date! value, how does one increase or
step through date! values then? I´m trying to construct a graphical calender.
It seems to work for me:
REBOL/View 0.10.38.3.1 3-Oct-2000
Copyright 2000 REBOL Technologies. All rights reserved.
>> d: now
== 26-Oct-2000/10:56:30+13:00
>> d: d + 1
== 27-Oct-2000/10:56:30+13:00
Perhaps you should restart Rebol?
Andrew Martin
[25/55] from: al:bri:xtra at: 26-Oct-2000 10:22
> There is already a graphical calendar for rebol/view in the demos. Someone already
wrote it. Who has the pointer/link to it?
Allen Kamp wrote it.
try
RebolForces on the WWReb.
or
www.rebolforces.co.au IIRC.
Andrew Martin
[26/55] from: chaz:innocent at: 25-Oct-2000 20:58
a mochinet reb site might also have great appeal
chaz
At 06:19 AM 10/25/00 -0700, you wrote:
[27/55] from: timewarp:sirius at: 25-Oct-2000 20:31
Need to revamp other skills right now.
Cheerfulness,
-----EAT
chaz wrote:
[28/55] from: sharriff:aina:med-iq at: 26-Oct-2000 7:30
Thanks Allen!
Sharriff Aina
med.iq information & quality in healthcare AG
Gutenbergstr. 42
41564 Kaarst
tel.: 02131-3669-0
fax: 02131-3669-599
www.med-iq.de
"Allen Kamp"
<[allen--rebolf] An: <[rebol-list--rebol--com]>
orces.com> Kopie:
Gesendet von: Thema: [REBOL] Re: [REBOL]
rebol-bounce@
rebol.com
25.10.00
17:12
Bitte
antworten an
rebol-list
The date datetype is extremely flexible and does most of the work needed
for
making a calendar.
**The only gotcha is the month subtraction bug.**
Month Addition
date: now
date/month: date/month + 24
probe date
26-Oct-2002/1:53:07+10:00
Month Subtraction returns an incorrect date if the result would be a date
earlier than January. :-(
date: now
date/month: date/month - 24
probe date
26-Feb-23844/1:53:55+10:00
(submitted to feedback)
Subtraction via day does not have that problem
date: now
date/day: date/day - 365
probe date
27-Oct-1999/2:04:31+10:00
To get first day of the month
date: now
date/day: 1
probe date
1-Oct-2000/2:00:17+10:00
probe date/weekday
7
To get the last day of the month
date: now
date/month: date/month + 1
date/day: 1
date/day: date/day - 1
probe date
31-Oct-2000/2:06:32+10:00
probe date/weekday
2
Hope this helps
Cheers,
Allen K
[29/55] from: bo:rebol at: 26-Oct-2000 10:08
Yes, yes! Robert Service on the REB. :-)
-Bo
On 25-Oct-2000/20:58:08-7:00, [chaz--innocent--com] wrote:
>a mochinet reb site might also have great appeal
>chaz
<<quoted lines omitted: 19>>
>[rebol-request--rebol--com] with "unsubscribe" in the
>subject, without the quotes.
--
Bohdan "Bo" Lechnowsky
REBOL Adventure Guide
REBOL Technologies 707-467-8000 (http://www.rebol.com)
The Official Source for REBOL Books (http://www.REBOLpress.com)
[30/55] from: timewarp:sirius at: 26-Oct-2000 10:15
Just as soon as printing from a view window can be accomidated. ;)
Cheerfulness,
-----EAT
[bo--rebol--com] wrote:
[31/55] from: bo:rebol at: 26-Oct-2000 11:15
It already can! Just do a TO-IMAGE on your View layout, save it as a .png
with SAVE/PNG, use BROWSE to browse that image and then click PRINT on the
browser! Voila!
OK...so I admit it's a hack, but a pretty useful one if I do say so myself!
:-)
-Bo
On 26-Oct-2000/10:15:43-7:00, [timewarp--sirius--com] wrote:
> Just as soon as printing from a view window can be accomidated. ;)
> Cheerfulness,
<<quoted lines omitted: 6>>
>[rebol-request--rebol--com] with "unsubscribe" in the
>subject, without the quotes.
--
Bohdan "Bo" Lechnowsky
REBOL Adventure Guide
REBOL Technologies 707-467-8000 (http://www.rebol.com)
The Official Source for REBOL Books (http://www.REBOLpress.com)
[32/55] from: timewarp:sirius at: 26-Oct-2000 11:21
Built-in printing that uses the OS's printer interfaces. C'mon,
this is poetry we're talking about here.
write printer:// face
Cheerfulness,
------EAT
[bo--rebol--com] wrote:
[33/55] from: al:bri:xtra at: 27-Oct-2000 17:24
EAT wrote:
> Built-in printing that uses the OS's printer interfaces. C'mon, this is
poetry we're talking about here.
> write printer:// face
My-Picture: read scanner://
Andrew Martin
Writing poetry since way back...
ICQ: 26227169
http://members.nbci.com/AndrewMartin/
[34/55] from: timewarp:sirius at: 26-Oct-2000 22:20
Oooh ooooh oooooh!
BookText: read scanner://OCR
How ya like me now?
Cheerfulness,
------EAT
Andrew Martin wrote:
[35/55] from: al:bri:xtra at: 27-Oct-2000 20:22
EAT wrote:
> Andrew Martin wrote:
> > EAT wrote:
> > > Built-in printing that uses the OS's printer interfaces. C'mon, this
is poetry we're talking about here.
> > >
> > > write printer:// face
> >
> > My-Picture: read scanner://
> BookText: read scanner://OCR
No, no, no. It doesn't scan! :-)
BookText: parse/ocr read scanner://
or:
BookText: parse/ocr read %MyImageFile.tif
write sound:// read %tada.wav
:-)
Andrew Martin
ICQ: 26227169
http://members.nbci.com/AndrewMartin/
[36/55] from: timewarp:sirius at: 27-Oct-2000 0:27
You win. :)
Andrew Martin wrote:
[37/55] from: petr:krenzelok:trz:cz at: 27-Oct-2000 9:35
Andrew Martin wrote:
> EAT wrote:
> > Andrew Martin wrote:
<<quoted lines omitted: 12>>
> write sound:// read %tada.wav
> :-)
all that possible with amigaOS device system? :-)
-pekr-
[38/55] from: jean:holzammer:faedv-n:bayern at: 27-Oct-2000 9:56
> -----Ursprüngliche Nachricht-----
> Von: Petr Krenzelok [SMTP:[Petr--Krenzelok--trz--cz]]
<<quoted lines omitted: 6>>
> > > > EAT wrote:
> > > > > Built-in printing that uses the OS's printer interfaces. C'mon,
this
> > is poetry we're talking about here.
> > > > >
<<quoted lines omitted: 13>>
> > :-)
> all that possible with amigaOS device system? :-)
write %/Audio/ read %tada.aiff
should work :)
Jean
[39/55] from: bo:rebol at: 27-Oct-2000 10:22
home-video: read/part video:// 0:0:10
:-)
-Bo
On 27-Oct-2000/9:26:25-6:00, [Al--Bri--xtra--co--nz] wrote:
>EAT wrote:
>> Andrew Martin wrote:
<<quoted lines omitted: 20>>
>[rebol-request--rebol--com] with "unsubscribe" in the
>subject, without the quotes.
--
Bohdan "Bo" Lechnowsky
REBOL Adventure Guide
REBOL Technologies 707-467-8000 (http://www.rebol.com)
The Official Source for REBOL Books (http://www.REBOLpress.com)
[40/55] from: joel:neely:fedex at: 27-Oct-2000 17:14
Well, since I have to do development to support non-technical types,
I'm hoping you'll add this scheme to REBOL 3.0
actual-requirements: read mind://customer/current-project
. .
|
( * )
(that's me, holding my breath...)
-jn-
[bo--rebol--com] wrote:
> home-video: read/part video:// 0:0:10
> :-)
<<quoted lines omitted: 41>>
> [rebol-request--rebol--com] with "unsubscribe" in the
> subject, without the quotes.
--
; Joel Neely [joel--neely--fedex--com] 901-263-4460 38017/HKA/9677
REBOL [] do [ do func [s] [ foreach [a b] s [prin b] ] sort/skip
do function [s] [t] [ t: "" foreach [a b] s [repend t [b a]] t ] {
| e s m!zauafBpcvekexEohthjJakwLrngohOqrlryRnsctdtiub} 2 ]
[41/55] from: bo:rebol at: 27-Oct-2000 16:03
Regarding your ASCII art, you look a little younger than I had you
pictured in my mind. And your eyes are a little more beady, but the
nose is what I expected... ;-)
-Bo
On 27-Oct-2000/17:14:16-5:00, [joel--neely--fedex--com] wrote:
>Well, since I have to do development to support non-technical types,
>I'm hoping you'll add this scheme to REBOL 3.0
<<quoted lines omitted: 64>>
>[rebol-request--rebol--com] with "unsubscribe" in the
>subject, without the quotes.
--
Bohdan "Bo" Lechnowsky
REBOL Adventure Guide
REBOL Technologies 707-467-8000 (http://www.rebol.com)
The Official Source for REBOL Books (http://www.REBOLpress.com)
[42/55] from: andyyork:gte at: 27-Oct-2000 19:41
Today's date: 27-Oct-2000/19:39:40-4:00 This experimental version of
REBOL/core has expired. Please download a newer copy from WWW.REBOL.COM or
contact [support--rebol--com].
I've tried to get the newer ver. at rebol.com to no avail. Any ideas as to
what I do now? Thanks in advance for any help.
ay
[43/55] from: rishi:picostar at: 27-Oct-2000 15:39
Scary. I hope rebol/view for solaris doesn't expire soon. I did my programming assignment
in rebol. My prof is going to take a look at my code next week. (He wants me to teach
him Rebol!). Hopefully it will run!!
Rishi
Previously, you (andy york) wrote:
[44/55] from: joel:neely:fedex at: 27-Oct-2000 21:21
I had my glasses off, so the camera was out of focus...
-jn-
[rebol-bounce--rebol--com] wrote:
> Regarding your ASCII art, you look a little younger than I had you
> pictured in my mind. And your eyes are a little more beady, but the
<<quoted lines omitted: 12>>
> >(that's me, holding my breath...)
> >
--
; Joel Neely [joel--neely--fedex--com] 901-263-4460 38017/HKA/9677
REBOL [] do [ do func [s] [ foreach [a b] s [prin b] ] sort/skip
do function [s] [t] [ t: "" foreach [a b] s [repend t [b a]] t ] {
| e s m!zauafBpcvekexEohthjJakwLrngohOqrlryRnsctdtiub} 2 ]
[45/55] from: larry:ecotope at: 27-Oct-2000 19:28
Hi Rishi
You can check the expiration date. On Windows I get
REBOL/View 0.10.38.3.1 3-Oct-2000
Copyright 2000 REBOL Technologies. All rights reserved.
>> beta-expiration-date
== 2-Nov-2000/8:17:31-7:00
I have sent a message to feedback encouraging RT not to let the View beta
expire before posting a new one.
Cheers
-Larry
----- Original Message -----
From: Rishi Oswal <[rishi--picostar--com]>
To: <[rebol-list--rebol--com]>
Sent: Friday, October 27, 2000 8:39 AM
Subject: [REBOL] Re: [REBOL]
> Scary. I hope rebol/view for solaris doesn't expire soon. I did my
programming assignment in rebol. My prof is going to take a look at my code
next week. (He wants me to teach him Rebol!). Hopefully it will run!!
[46/55] from: sharriff:aina:med-iq at: 6-Nov-2000 15:19
How does one compress a directory and its contents? I have discovered no
refinement for this property while trying to create a backup and compress
utility for my CGI scripts.
Sharriff Aina
med.iq information & quality in healthcare AG
[47/55] from: sharriff:aina:med-iq at: 10-Nov-2000 7:31
Hi guys!
Excuse the naive question but:
>>save http://127.0.0.1/ %testfile.txt
connecting to: 127.0.0.1
Can someone tell me where REBOL puts the file? I´ve tried it at home and at
work, the file is nowhere to be found on my Webserver configured as
Localhost. Yes , I´ve tried using its DNS Name:
>>write http://isis/ %testfile.txt ( or save http://isis %testfile.txt)
and I´ve searched "Hi and Lo" in every directory for the file-> nothing!.
Reading an existing file works though...
Sharriff Aina
med.iq information & quality in healthcare AG
[48/55] from: bo:rebol at: 10-Nov-2000 10:34
Sharriff,
In your example, REBOL just sends the text {%testfile.txt} to the
webserver. The webserver most likely discards it because it isn't
formed with a proper HTTP header.
-Bo
On 10-Nov-2000/7:31:42, [Sharriff--Aina--med-iq--de] wrote:
>Hi guys!
>Excuse the naive question but:
<<quoted lines omitted: 12>>
>[rebol-request--rebol--com] with "unsubscribe" in the
>subject, without the quotes.
--
Bohdan "Bo" Lechnowsky
REBOL Adventure Guide
REBOL Technologies 707-467-8000 (http://www.rebol.com)
The Official Source for REBOL Books (http://www.REBOLpress.com)
[49/55] from: coussement:c:itc:mil:be at: 7-Nov-2000 13:23
I'm now stopped in my developping work by following problem.
I would like to store data into a file (on the HD) in a nested block
structure, but I cannot find an elegant way to compose it from raw data:
>> b: make block! []
== []
>> append b "the-name"
== ["the-name"]
>> append b "123456"
== ["the-name" "123456"]
>> append b [123456]
== ["the-name" "123456" 123456]
>> append b ["123456"]
== ["the-name" "123456" 123456 "123456"]
>> write %_test.txt b
>> read %_test.txt
== "the-name123456123456123456"
>> bb: to-block read %_test.txt
== [the-name123456123456123456]
When I would like to get in the file something like :
["the-name" "123456" 123456 "123456"] or [["the-name"] ["123456"] [123456]
["123456"]]
So I can use an easy-to-follow path notation to retrieve elements
dynamicaly.
Any idea ?
Best regards ;-)
C. COUSSEMENT
[50/55] from: bo:rebol at: 10-Nov-2000 16:24
Capitaine COUSSEMENT,
Use SAVE/LOAD instead of WRITE/READ if you want to preserve REBOL datatypes.
Have fun!
-Bo
On 7-Nov-2000/13:23:08+1:00, [COUSSEMENT--C--ITC--mil--be] wrote:
>I'm now stopped in my developping work by following problem.
>I would like to store data into a file (on the HD) in a nested block
<<quoted lines omitted: 26>>
>[rebol-request--rebol--com] with "unsubscribe" in the
>subject, without the quotes.
--
Bohdan "Bo" Lechnowsky
REBOL Adventure Guide
REBOL Technologies 707-467-8000 (http://www.rebol.com)
The Official Source for REBOL Books (http://www.REBOLpress.com)
[51/55] from: coussement:c:itc:mil:be at: 13-Nov-2000 8:34
Bo:
Thanks for the hint: it works all OK!
C. COUSSEMENT
[52/55] from: sharriff:aina:med-iq at: 13-Nov-2000 9:38
Hi Bo!
can you give me a clue as to how I´m going to do that with REBOL?
Regards
Sharriff Aina
med.iq information & quality in healthcare AG
[bo--rebol--com]
Gesendet von: An: [rebol-list--rebol--com]
rebol-bounce@ Kopie:
rebol.com Thema: [REBOL] Re: [REBOL]
10.11.00
17:34
Bitte
antworten an
rebol-list
Sharriff,
In your example, REBOL just sends the text {%testfile.txt} to the
webserver. The webserver most likely discards it because it isn't
formed with a proper HTTP header.
-Bo
On 10-Nov-2000/7:31:42, [Sharriff--Aina--med-iq--de] wrote:
>Hi guys!
>
>Excuse the naive question but:
>
>>>save http://127.0.0.1/ %testfile.txt
>connecting to: 127.0.0.1
>
>Can someone tell me where REBOL puts the file? I´ve tried it at home and
at
>work, the file is nowhere to be found on my Webserver configured as
>Localhost. Yes , I´ve tried using its DNS Name:
<<quoted lines omitted: 7>>
>[rebol-request--rebol--com] with "unsubscribe" in the
>subject, without the quotes.
--
Bohdan "Bo" Lechnowsky
REBOL Adventure Guide
REBOL Technologies 707-467-8000 (http://www.rebol.com)
The Official Source for REBOL Books (http://www.REBOLpress.com)
[53/55] from: bo:rebol at: 13-Nov-2000 10:29
Sharriff,
I'm not sure what webservers expect as a header when a browser requests to
do an HTTP upload. But once you find this out, it should be possible to
do an HTTP upload with REBOL.
-Bo
On 13-Nov-2000/9:38:24, [Sharriff--Aina--med-iq--de] wrote:
>Hi Bo!
>can you give me a clue as to how I´m going to do that with REBOL?
<<quoted lines omitted: 56>>
>[rebol-request--rebol--com] with "unsubscribe" in the
>subject, without the quotes.
--
Bohdan "Bo" Lechnowsky
REBOL Adventure Guide
REBOL Technologies 707-467-8000 (http://www.rebol.com)
The Official Source for REBOL Books (http://www.REBOLpress.com)
[54/55] from: p_trotter:y:ahoo at: 13-Nov-2000 16:28
Sherif, Bo,
if you can follow ( and would want to...) some
pretty straight forward VBscript and VB code - there
is an article on implementing a file upload facilities
in asp and vbscript at:
http://www.aspzone.com/articles/john/aspUpload/
The official RFC for file upload mechanisms can be
found at:
http://info.internet.isi.edu/in-notes/rfc/files/rfc1867.txt
Sheriff the sort of info that you will be looking for
is in page 8 and 9.
hope this helps.
- Phillip
[55/55] from: sharriff:aina:med-iq at: 17-Nov-2000 18:21
Hi!
Can someone tell me why the second snippet sometimes fails?
; selects all HTML or HTM files and stores them in a separate list
foreach file file-list [if find/any file ".ht?" [append toc-list :file]]
**** exits sometimes with a read error??!! ***
; parse the titles from the html and htm files and store the titles
foreach file toc-list [temp-file: read file
parse temp-file [thru "<title>" copy title-list to
</title>
]
print title-list]
****** trying to save titles also produces an error ***
titles: make block! 0
foreach file toc-list [temp-file: read file
parse temp-file [thru "<title>" copy title-list to
</title>
]
append titles title-list]
Sharriff Aina
trying to get rid of my REBOL training wheels
Notes
- Quoted lines have been omitted from some messages.
View the message alone to see the lines that have been omitted