Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[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


Its 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 habent found any Im 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? Im 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? Im 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
>>
Im 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? Im 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


> -----Ursprngliche 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? Ive tried it at home and at work, the file is nowhere to be found on my Webserver configured as Localhost. Yes , Ive tried using its DNS Name:
>>write http://isis/ %testfile.txt ( or save http://isis %testfile.txt)
and Ive 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 Im 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? Ive tried it at home and
at
>work, the file is nowhere to be found on my Webserver configured as >Localhost. Yes , Ive 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 Im 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::yahoo 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