[REBOL] %rgbcolors.r 0.9.5
From: rchristiansen::pop::isdfa::sei-it::com at: 2-Aug-2000 12:24
--Message-Boundary-18221
Content-type: text/plain; charset=US-ASCII
Content-transfer-encoding: 7BIT
Content-description: Mail message body
Earlier I submitted the script %rgbcolors.r for your perusal, but the script
included a significant bug. I have fixed the bug and attached is the nearly
complete version (I still have to figure out how to make the sliders return a
low tuple value of 0.0.0 instead of 1.1.1).
-Ryan
--Message-Boundary-18221
Content-type: text/plain; charset=US-ASCII
Content-disposition: inline
Content-description: Attachment information.
The following section of this message contains a file attachment
prepared for transmission using the Internet MIME message format.
If you are using Pegasus Mail, or any another MIME-compliant system,
you should be able to save it or view it from within your mailer.
If you cannot, please ask your system administrator for assistance.
---- File information -----------
File: rgbcolors.r
Date: 2 Aug 2000, 12:20
Size: 3969 bytes.
Type: Unknown
--Message-Boundary-18221
Content-type: Application/Octet-stream; name="rgbcolors.r"; type=Unknown
Content-disposition: attachment; filename="rgbcolors.r"
Content-transfer-encoding: BASE64
UkVCT0wgWw0KICAgVGl0bGU6ICAgIlJHQiBDb2xvciBTZWxlY3RvciINCiAgIERhdGU6ICAg
IDItQXVndXN0LTIwMDANCiAgIFZlcnNpb246IDAuOS41DQogICBGaWxlOiAgICAlcmdiY29s
b3JzLnINCiAgIEF1dGhvcjogICJSeWFuIEMuIENocmlzdGlhbnNlbiINCiAgIEVtYWlsOiAg
IG5vcnNlcG93ZXJAdXN3ZXN0Lm5ldA0KICAgT3duZXI6ICAgIlJ5YW4gQy4gQ2hyaXN0aWFu
c2VuIg0KICAgUmlnaHRzOiAgIkNvcHlyaWdodCAoQykgUnlhbiBDLiBDaHJpc3RpYW5zZW4g
MjAwMCINCiAgIFRhYnM6ICAgIDQNCiAgIExhbmd1YWdlOiAnRW5nbGlzaA0KICAgUHVycG9z
ZTogew0KICAgICAgSW50ZXJwb2xhdGVzIGFuZCBkaXNwbGF5cyBSR0IgY29sb3IgdmFsdWVz
IGluIHR1cGxlIGFuZCBpbiBoZXhpZGVjaW1hbCBiYXNlZCBvbiByZWQsIGdyZWVuLCBhbmQg
Ymx1ZSBzbGlkZXJzLg0KICAgfQ0KDQogICBDb21tZW50OiB7DQogICAgICBDdXJyZW50bHks
IHRoZSB0dXBsZSByYW5nZXMgZnJvbSAwLjAuMCB0byAyNTUuMjU1LjI1NSBpbnN0ZWFkIG9m
IDEuMS4xIHRvIDI1NS4yNTUuMjU1LiBBbHNvLCB0aGUgaGV4IHZhbHVlcyByZXR1cm5lZCBo
YXZlIGEgc2ltaWxhciBwcm9ibGVtLCB3aGVyZWFzICMwMTAxMDEgaXMgdGhlIGRhcmtlc3Qg
dmFsdWUgaW5zdGVhZCBvZiAjMDAwMDAwLg0KICAgfQ0KDQogICBIaXN0b3J5OiBbDQogICAg
ICAwLjkuMCBbMS1BdWd1c3QtMjAwMCAiQ3JlYXRlZCB0aGlzIGV4YW1wbGUiICJSeWFuIl0N
CiAgICAgIDAuOS41IFsyLUF1Z3VzdC0yMDAwICJGaXhlZCBzbGlkZXIgZXJyb3IgcmV0dXJu
aW5nIG5vbmUiICJSeWFuIl0NCiAgIF0NCg0KICAgRXhhbXBsZToge1NsaWRlIHRoZSByZWQs
IGdyZWVuLCBhbmQgYmx1ZSBzbGlkZXJzIGFuZCB0aGVuIGNsaWNrIG9uIHRoZSBmcmFtZXMg
dG8gdmlldyB0aGUgY29sb3IgY3JlYXRlZCBhbmQgdGhlIHR1cGxlIGFuZCBoZXggdmFsdWVz
IGZvciB0aGUgY29sb3IufQ0KXQ0KDQpyZ2ItY29sb3Itc2VsZWN0b3I6IGxheW91dC9zaXpl
IFsNCgkNCgliYWNrZHJvcCAyNTUuMjU1LjI1NQ0KDQoJcmdiLXR1cGxlOiBmcmFtZSAxMDV4
NTAgWw0KCQllaXRoZXIgcmVkL2RhdGEgPSBub25lIFtyZ2ItdHVwbGUvY29sb3I6IDAuMC4w
XSBbcmdiLXR1cGxlL2NvbG9yOiBtYWtlIHR1cGxlISByZWpvaW4gW3JlZC9kYXRhIHsufSBn
cmVlbi9kYXRhIHsufSBibHVlL2RhdGFdXQ0KCQllaXRoZXIgZ3JlZW4vZGF0YSA9IG5vbmUg
W3JnYi10dXBsZS9jb2xvcjogMC4wLjBdIFtyZ2ItdHVwbGUvY29sb3I6IG1ha2UgdHVwbGUh
IHJlam9pbiBbcmVkL2RhdGEgey59IGdyZWVuL2RhdGEgey59IGJsdWUvZGF0YV1dDQoJCWVp
dGhlciBibHVlL2RhdGEgPSBub25lIFtyZ2ItdHVwbGUvY29sb3I6IDAuMC4wXSBbcmdiLXR1
cGxlL2NvbG9yOiBtYWtlIHR1cGxlISByZWpvaW4gW3JlZC9kYXRhIHsufSBncmVlbi9kYXRh
IHsufSBibHVlL2RhdGFdXQ0KCQllaXRoZXIgcmVkL2RhdGEgPSBub25lIFtyZ2ItdHVwbGUv
dGV4dDogIm5vbmUiXSBbcmdiLXR1cGxlL3RleHQ6IG1ha2Ugc3RyaW5nISByZWpvaW4gW3Jl
ZC9kYXRhIHsufSBncmVlbi9kYXRhIHsufSBibHVlL2RhdGFdXQ0KCQllaXRoZXIgcmVkL2Rh
dGEgPSBub25lIFtyZ2ItdHVwbGUvdGV4dDogIm5vbmUiXSBbcmdiLXR1cGxlL3RleHQ6IG1h
a2Ugc3RyaW5nISByZWpvaW4gW3JlZC9kYXRhIHsufSBncmVlbi9kYXRhIHsufSBibHVlL2Rh
dGFdXQ0KCQllaXRoZXIgZ3JlZW4vZGF0YSA9IG5vbmUgW3JnYi10dXBsZS90ZXh0OiAibm9u
ZSJdIFtyZ2ItdHVwbGUvdGV4dDogbWFrZSBzdHJpbmchIHJlam9pbiBbcmVkL2RhdGEgey59
IGdyZWVuL2RhdGEgey59IGJsdWUvZGF0YV1dDQoJCWVpdGhlciBibHVlL2RhdGEgPSBub25l
IFtyZ2ItdHVwbGUvdGV4dDogIm5vbmUiXSBbcmdiLXR1cGxlL3RleHQ6IG1ha2Ugc3RyaW5n
ISByZWpvaW4gW3JlZC9kYXRhIHsufSBncmVlbi9kYXRhIHsufSBibHVlL2RhdGFdXQ0KCQlz
aG93IHJnYi10dXBsZQ0KCV0NCg0KCXJnYi1oZXg6IGZyYW1lIDEwNXg1MCBbDQoJCWVpdGhl
ciByZWQvZGF0YSA9IG5vbmUgW3JnYi1oZXgvY29sb3I6IDAuMC4wXSBbcmdiLWhleC9jb2xv
cjogbWFrZSB0dXBsZSEgcmVqb2luIFtyZWQvZGF0YSB7Ln0gZ3JlZW4vZGF0YSB7Ln0gYmx1
ZS9kYXRhXV0NCgkJZWl0aGVyIGdyZWVuL2RhdGEgPSBub25lIFtyZ2ItaGV4L2NvbG9yOiAw
LjAuMF0gW3JnYi1oZXgvY29sb3I6IG1ha2UgdHVwbGUhIHJlam9pbiBbcmVkL2RhdGEgey59
IGdyZWVuL2RhdGEgey59IGJsdWUvZGF0YV1dDQoJCWVpdGhlciBibHVlL2RhdGEgPSBub25l
IFtyZ2ItaGV4L2NvbG9yOiAwLjAuMF0gW3JnYi1oZXgvY29sb3I6IG1ha2UgdHVwbGUhIHJl
am9pbiBbcmVkL2RhdGEgey59IGdyZWVuL2RhdGEgey59IGJsdWUvZGF0YV1dDQoNCgkJZWl0
aGVyIHJlZC9kYXRhID0gbm9uZSBbaWdub3JlOiBjb3B5IFtdXSBbcmVkLWhleDogdG8taGV4
IHJlZC9kYXRhXQ0KCQllaXRoZXIgZ3JlZW4vZGF0YSA9IG5vbmUgW2lnbm9yZTogY29weSBb
XV0gW3JlZC1oZXg6IHRvLWhleCByZWQvZGF0YV0NCgkJZWl0aGVyIGJsdWUvZGF0YSA9IG5v
bmUgW2lnbm9yZTogY29weSBbXV0gW3JlZC1oZXg6IHRvLWhleCByZWQvZGF0YV0NCg0KCQll
aXRoZXIgcmVkL2RhdGEgPSBub25lIFtpZ25vcmU6IGNvcHkgW11dIFtncmVlbi1oZXg6IHRv
LWhleCBncmVlbi9kYXRhXQ0KCQllaXRoZXIgZ3JlZW4vZGF0YSA9IG5vbmUgW2lnbm9yZTog
Y29weSBbXV0gW2dyZWVuLWhleDogdG8taGV4IGdyZWVuL2RhdGFdDQoJCWVpdGhlciBibHVl
L2RhdGEgPSBub25lIFtpZ25vcmU6IGNvcHkgW11dIFtncmVlbi1oZXg6IHRvLWhleCBncmVl
bi9kYXRhXQ0KDQoJCWVpdGhlciByZWQvZGF0YSA9IG5vbmUgW2lnbm9yZTogY29weSBbXV0g
W2JsdWUtaGV4OiB0by1oZXggYmx1ZS9kYXRhXQ0KCQllaXRoZXIgZ3JlZW4vZGF0YSA9IG5v
bmUgW2lnbm9yZTogY29weSBbXV0gW2JsdWUtaGV4OiB0by1oZXggYmx1ZS9kYXRhXQ0KCQll
aXRoZXIgYmx1ZS9kYXRhID0gbm9uZSBbaWdub3JlOiBjb3B5IFtdXSBbYmx1ZS1oZXg6IHRv
LWhleCBibHVlL2RhdGFdDQoNCgkJZWl0aGVyIHJlZC9kYXRhID0gbm9uZSBbcmdiLWhleC90
ZXh0OiAibm9uZSJdIFtyZ2ItaGV4L3RleHQ6IG1ha2Ugc3RyaW5nISByZWpvaW4gW3sjfSBy
ZWQtaGV4LzcgcmVkLWhleC84IGdyZWVuLWhleC83IGdyZWVuLWhleC84IGJsdWUtaGV4Lzcg
Ymx1ZS1oZXgvOF1dDQoJCWVpdGhlciBncmVlbi9kYXRhID0gbm9uZSBbcmdiLWhleC90ZXh0
OiAibm9uZSJdIFtyZ2ItaGV4L3RleHQ6IG1ha2Ugc3RyaW5nISByZWpvaW4gW3sjfSByZWQt
aGV4LzcgcmVkLWhleC84IGdyZWVuLWhleC83IGdyZWVuLWhleC84IGJsdWUtaGV4LzcgYmx1
ZS1oZXgvOF1dDQoJCWVpdGhlciBibHVlL2RhdGEgPSBub25lIFtyZ2ItaGV4L3RleHQ6ICJu
b25lIl0gW3JnYi1oZXgvdGV4dDogbWFrZSBzdHJpbmchIHJlam9pbiBbeyN9IHJlZC1oZXgv
NyByZWQtaGV4LzggZ3JlZW4taGV4LzcgZ3JlZW4taGV4LzggYmx1ZS1oZXgvNyBibHVlLWhl
eC84XV0NCgkJc2hvdyByZ2ItaGV4DQoJXQ0KDQoJYWNyb3NzDQoNCglyZWQ6IHNsaWRlciAz
MHgyNTkgWw0KCQlyZWQvY29sb3I6IDI1NS4wLjAgKyAoMjU1IC0gcmVkL2RhdGEpDQoJCXNo
b3cgcmVkDQoJXQ0KDQoJZ3JlZW46IHNsaWRlciAzMHgyNTkgWw0KCQlncmVlbi9jb2xvcjog
MC4yNTUuMCArICgyNTUgLSBncmVlbi9kYXRhKQ0KCQlzaG93IGdyZWVuDQoJXQ0KDQoJYmx1
ZTogc2xpZGVyIDMweDI1OSBbDQoJCWJsdWUvY29sb3I6IDAuMC4yNTUgKyAoMjU1IC0gYmx1
ZS9kYXRhKQ0KCQlzaG93IGJsdWUNCgldDQoNCglyZXR1cm4NCgkNCglidXR0b24gMTA1eDI1
ICJjbG9zZSIgW3Vudmlldy9vbmx5IHJnYi1jb2xvci1zZWxlY3Rvcl0NCg0KXSAxNDR4NDUw
DQoNCnZpZXcgcmdiLWNvbG9yLXNlbGVjdG9y
--Message-Boundary-18221--
