[ALLY] MAGICAL view/swis!!!
[1/4] from: cyphre::volny::cz at: 6-Oct-2000 13:54
This is a multi-part message in MIME format...
------------=_970833282-75300-0
Content-Type: text/plain; charset=windows-1250
Content-Disposition: inline
Content-Transfer-Encoding: 7bit
Hello Allen and all,
yesterday I found very MEGA COOL thing. With SWIS you can verz easily put almost any
kind of REBOL/view script into my window.
It's really very easy to "hack" any script into my windows;)(in posted examples it costs
about 2 hours of experimenting)
Maybe someone would complain that I post so long(66Kb) archive but it's really amazing
thing...
CHECK IT ALL and enjoy!!
Cyphre
P.S.: On my Amiga2000 68060/50 it is not so fast but on some PC >50Mhz it would fly.
> Hi Cyphre,
This is a fantastic script!
I really like the use of
> litwords in the pane, so you can use 'select to
grab a face by an ID.
I
> didn't know you could do that, I had thought view would complain if
> anything other than faces were in the pane. It slows down full pane
> redraws,
as view has double the items in the pane to iterate through,
> but it makes
things much easier.
One small speed up I found is,
> instead of
remove remove (find screen-face/pane
> face/parent-face/id)
remove (find screen-face/pane
> face/parent-face/self)
you can use.
remove/part (find
> screen-face/pane face/parent-face/id) 2
more efficient, because you
> avoid having to do the second search.
Allen K
P.S
You should have
> mentioned needing %bay.jpg in the same directory though :-)
-----
------------=_970833282-75300-0
Content-Type: application/x-zip-compressed; name="C:\1AAAA\Swis.zip"
Content-Disposition: inline; filename="C:\1AAAA\Swis.zip"
Content-Transfer-Encoding: base64
UEsDBBQAAgAAAExtRikAAAAAAAAAAAAAAAAFAAAAU3dpcy9QSwMEFAACAAgA
nRZGKeS+1OaYHAAAJx0AAAwAAABTd2lzL2JheS5qcGedl2VUFFzU7wdmgJFS
ShgaZpRGUrolBh5AEIZWGofuFClFYhg6HUpausugO5SGGRAZBqSRUkJ4fd71
xpf74d77Px//e521fmvvfc7eNws3q4A72hpwDQARERFA6+8B3GABagAwKSkZ
KQmYjIzs1i0wOSU9FSUFBSWElu42PRszBzsbMysrJ0yYh5NbEMrKyivFJygi
KiEhwcEjoyAtJi8sLiH27yVEt27doqSgZKKiYhLjYuUS+3/WTReABgxIAnQB
ibgBxDREQBqimz4ABwBAREL0nwL8l4iIgSASUjLwLXKKvwHNdwDEREAgMQhI
QgIC/XVD//oAEA0JLZeoCimdgQ0Ztxe9WERyIRiqWt/NYPj1ECZu6x15i/wu
IxOE+d59Hl4+fgnJh1LSMrJqj9Q1NLXg2k+MjBEmpmbmdvYOjk7Pkc4+vn7+
AYFBwVGvXke/iYmNS0lNS8/IzMrOeVdUXFJaVl7xvqGxqbmlta29o6e3r39g
cGh4ZGp6ZnZufmFx6fsafp2wsflja/vn0fHJ6dmv3+cX/3IRAYBE/63/IxfN
Xy5iEAgIIvuXi4g44N8AGhAJlygprYoBmY0XHbdYBJheNbmwvvsWVNzwkMHW
+yv5XZjE93s//0X7T7L/O7DI/y+y/wH7X64lACWQ6G/ygDQAJcC6v12z8EjH
14ofgPKroq1nzonytY1TqcitLYR/iEHjUgUXw1m+tlXerN1okYMcycgl7+Jf
w9D1vZYJJwV6ppA/NM21zLod/I/hbkWPLYZxKfeVyaI+Tb42RnNP+850HU2Q
L3jbrWk1bZeR2/SNeRKvQVfFQ6cCiU49WUMCBWollPeYoxneupTpVFeUTjL0
YXCAT8U2qAL06KwMrKtoJIAyIqvWrmTa5r2TE5AWym/52LLcdpyUVo65jRwP
MnofsxxTE7LwZUz00oAQgqiIlg+ZVm9IncvJockkGAbZIyrNa6Q3stxC+We+
oFbTXCvHnTWdUV0uj75K8e+WLCJeZJwUH8Vs81WSDMl3PH5l9F2rjOSUwZ9h
5FJX+r7zQH8JmJci/ezScE/S6fnF10aeEkOGkVUO80DV4Nm0V0aFZCX3v9QY
/4UNjJnNzSpy0+1ZJ+bSIcxgkf5fGLlovjYCq3Xj3JdIvO/H+D1R3X+K9Fwp
TSiTx+Dn2gVdvBFtosgGnfUDAUEbDBqqlqSvb1gExNA9aYEAVNxRTJty9Yld
fmUWqvcaM3g0PCT2Fj73aZAnXu4wPBWpTNqljAgQDNoWR90A8j0sTZIlCAiT
VO0zxIFdicS7JlibDaWn2LkrW1iEqbdo6qS7hsxO8lKhRYPSGyhudvNYsdcF
dBQ5NSjYDiNKT25B5Z/Bmdh+ml1b+a9ySAroI95ejbkghchYas9I+XkcwlaB
W4ZBL2e+czQHlDDUJ4xgtbZyLKW+Iz58dn4mXJlNTlASzJv5ZGxJYxjzvr3P
6Kiih7+VEGJ4bhSizA9+La25h7iqdX7Gnykd1y2qfWej6twoKHBPBwNWvZhu
Ic/6WyhQxXT5nnbSEdVPkVXnL5veiWqKWFYQUjXTnH/ET2WODEp8LKCX/xT8
N8e2NTH0+R+UoLqtsesBJkdfikQEOjHEnsHBlNfpm5N0TO6+vFL1d+zYOtLs
2rRUgL9fHigll+KwdUHEguNXWowsC37sH5LRSkCEfHny2hFW0b6BkfNnUniY
ttlT3itMB3e76Lqf3Tzm4mSydXNjoOM1fHjH/+vUGs5wV9N7nGoinaDILuDU
rfbLYoxNiVmYy0B43RDq1a4BBs5QbnKyon71awlFdCSko78SnQwEJF63EhBz
uCC96jrrAwQPWztHwVXbjoWN83sXk9ns2fjkLOhZyVGl5m50mjnHkcCXi74Q
zBVqksbw3PidEHhbSTtHSGGDx5YO3ST/D2LXmdbxcczFk1fGpW7aoggmaH2B
RdSA+EnFxdizx2euEzQc2gY01UAwGZNMgeb5H96LHkYoHxj5AhMy29Mmf3ph
SAJbfbAJnychbk1HR1U/SM17V+1GsaX/uGxHB5uYnPYhNb9TM0W58vfyCN6j
WlrjtqF02ekrnn/Gj0IT5IahC8ZziUilB5u6WEzUVOFaMHe6MEGfN0ozI9R5
NV4BLB88BY4WA18545+1C7PFUdVrBHFjpvqig8hThsZRh4pvrvgSAohSxFIH
vqIye/kGS8PMK31kKeDvaAde26dRDeYuKs3MT+jTPTx1KmNGgr6urQx1pdSc
r6iWRQPCxy/oEDj1X2ymXUapKcTsHzuTiJjkX8zStxpk7d4D3YH5DclsOt0A
3r/L+AHNNvUuk2cF+HRPuvfljBsn6/F+ovqA2Gr1qaCOsygfoA4dfBYcLJIw
m5wlIkNZBmIuUuiKMavvItU417R+UmYY/HOSB3KAMHQ8ogMAno1C2PQtfdeP
lETNVRvjmofT6O55oy9nVQXoYuZ5mC6ONUenKXUN3hgmHSib8llbuD5Kamc9
HnzZzp4Nqbx79HRS8C1Il7acq9eatit9Z4JagVRuLt88xbwhNG7XnFyKUpis
BIk8tJrkivuqYksR7LUzbrNo+ewpbpAeyQwltswQNNAUDOyWBhacMrSedZec
S2lsT0jfU22EHSVzdk9oMrGR1QRtYfM+8Y+a+CPJrV7nUj6Bg0ZA71+6tnid
h1IZozdkasyZcB4m9gv0qelDSuWSyYq1HsL1fr4Tjo13zt/HYIbII2VGkntp
qcOonUvfBnn4hfjWBRWNRbuEN4Qz2adiayWjBoymBvIGFPTi/iwN8IG+aKeA
Vh4TLNi7/lAZTAtPG1PObd3//iD9zYCO18E+P6/kq1n5f5asRkd9wCvbDY13
tEDAJOwbkjamnT2zjGk2ub7gkoT4YQ96UZZiUa1FhBAz3j/AmlhDfKX1Ykdv
sj6nyNfDoYYryQIHjqWuhGVzmdrbr7Ljp9qXgU/aseXNp32frNoSEt+mjGKi
DmaolS5Ond2eroXq4awscf/oNnXLDz6I6hDH/eySHMNtUyCrVlT4iFfWE2Xa
hwxlE0vXnAvjMCVlj9hH+Ez3i9J5XvMktGpyUpaxqWwZQvcmy6bqN35WdTCG
N2FDAqFBtQClD6By5afiX6IwPWXTG9BWyReiaxQfHc+eBLjmO6HlX+IpLnte
qo8+VLT1yi/1JII6xDXjMgZe9n+kmVmGM569nvESno10jIecyHP0WV9LzNiS
rVS4W53U0iiWVsTcszoaIUVIgX+PrNOSF9nfdscAK5E2Ll5Ih7MQxxAXU5gZ
28MyjNEeKEXj9ogFWen3HcuTRnC5OtxXODBgbMlRQwWwDzNoYp+tO3OdT3Qd
p9XK2FAggMIZHrHENeA5Kz1vucqyentl0Fs53ym2Lw5IbegXdIah78twsSBX
V8vx0APW73A5NbEyHqfCt73jro8qE9VyrMJpuq62DpGyuPmIxIWUcfLYyZwx
OxhljXI3VB6f+PLU7nFzazPGIj7iDGVt8eYbDD24DrAGiKIwq07ToB+NzIyE
9ge3FSYE9OKE1IwstByTZODMGkTalQBFA3SBO9nO7w3ULyofLz/K+obXaRmP
u+gSFlyBx1TFecHue0m6iSRW2tcw4g0L2310eSyz6i1OJ3CBvyH8DLJZtbTy
1mcd6bbJ5JDi9E1e2cPen4IJn94FcCqDnCcy4Mc/uYg3S7YzD9Uj5xLEs7ml
3PVMCUmP2tkXlwIruD7X5cypeHnaZagjIkniJwJYPrkbvTxwV4q56sXYNuzC
8m4A+g3t0SYWr3JMS8DUA9zyN4DKywJajcA/0sz+dBPmS9c9m7s+75u0U9x8
WpGTmW3s2hWTpeB9Pm094eU4uMTTaO79JF4WhAHsAXfLMpZoUA1zCZwQ7ddL
qrS02H1uz6It/1WnSVpmVYZNZlBxZbZf0+/9/eqK7JTHDtn7zCYR0BQNu2lP
wCrbIhB15Klc3fYzpCDsubyBtEn/lMgjXxCnGK+C6aZCtJp1RJe77ikZfayf
23zA3fqsIus9KKAebQp1W/U7j8EfVpxsZFCYNKUXx5aK9NL0CveMRmoBMU4F
63SDnj6vUnAfGB+Kw45KvxJ2+btbohIFUaxu3dgkL5xjIU16+zFCY0znztI+
fIKxfmccttxKOoV4vi1hUVioFiDU7UhpH6Oq2mLZ4CmLYjiWkfc7rfrjzFKN
sJ3bcm5Jub2c39TPvstLdZRCvrruLfM+2O94nPLn8qiAhYNOgwgVO8MnB55p
joDCCcUzsNv48rpIP2fgvdjpWAMi0M90GGrdq3vdnv0VrbTO22xySe6kuq15
A6xUPmsyqOFR+j1dVJUtAIhhL5qqe4hbcrFVR3JGPUfDjXyfRH6zdDqulvto
aDHstp4uNNqTZakcHuwtGjX9ybkqk0og062gxdvIbWfGC7uUg0pt+1ilmwAh
+XgSMF1CmMUr5QhT/iNVVKNoE2lRs+pzHpVzQjHku9iE1TV8FIKNiSMCHYsr
3hPYYJVz8HzVQg0A5JG6jJbMOOWBbdJHYTrNMtDnXV3s4XaJ1eatc6dCkg7R
c2da3SMZTz+SH+pDE9UWgil1iu4fePoVfflcuaRzA7gFa7RQdWgxc+xu6Yuj
aWUAuod1TrcIxM1fTe7xrds7PBMy2rdqk9PQVDydloqVTJXJv9Q7GJc5v5pO
xvx9JMjYe6feWzoHzD/KPuDJ5FGSf3UDyGv+KPxcLrsjNtsbuz0fLPleMi2B
rY7dIgvrqXlvVvmHyYZQG/DXgJ4o+m1vcOjym2i/5YdrnJkB+Q4Pv57Ht09c
rVJuSkPRzbkeFc53yx7+ahVlV5odMinTy92WcS/LQ2Q4ig2tZwQBbOEy8vk+
enre03prT2J/EFt0umCtlvxG4PY78l9junuiU4VQEag6CBkZaPPrDWBJdiDf
TXH97s+lpX53qAXB2DauPzt6uTuGX+SNvJ2/8mAuI4yIMCA6TVM+uKWzIed3
HVlvlIJwrXVZ93PDn7S2NnXEjWybrQkcveECvug6g1XyDeHghuOnEu4vufRL
4KxKDpeWhu8YkE7CWDEOG2ikMsy7MEKhDoCvkTSrG4kZyu5KRqvsDe5Ynm6U
+DFm/OysYfGOmlbKu/13VGhIl/V+Ua8RV1ztH5x2A2Dw03HxC4FNCys+Nr9n
Rq/84epzjxYZyh4NYNvh0PxdxlB19KmwdNCHC1RJBrWPSuaaMIuBQgSpZUPO
N5dQXm5+9+GagibzmJefc1XNJXAbKrmdWs+y8o/PjQdStnl4vpywsCxK7LTV
2KZXyyy5g2xVww+1KMETt+eq1Ncqn8m5thZbUExKIU3EXtsNG4pIP2YEnXSt
O0G4FvKCSs+LpX4byOFihu/ZXGSwPEpoOm8Ia8ozsp8cWTFPIupaB8icHliY
+613YMxfRCvV6ROl49QgJMYm/ieQvagjtOYXlJ2zhubhOjviJw/W9OoNJshO
WrFtnFEglAEXgGgcZlgP5B3yZvIbkKW58JcMu5t4IAS/51N0PdOcA9+TpFF6
S2mrIiKX5faIklQDvqY5rNQDGAjyr2CYSxfNk9OCJTtmm9rEFfzoRUIVov+2
9lZ3uQS2UmfYXfJhjGY5FlZ6hBPlL0nvTr7FAxUamhyN+iFe5OE/6ePhIW/I
m12d0MsfTQuxo4hkwjfkBTskgjYat82PZMYdwZLDwn5fgwTO0bSPFsyV19OJ
WhI+ko30ARZYI8HUIcO+nXcj3Nc+xwn4GqEDiyk55Ig5pdfdh7BJqqlLrfe0
lm07W8zsTGscE6rvJ4RnEQL4nkoBm291jXy/fbhfNdxk4YKnr3dUo3TXfT2a
0rKNI2aRLxBkUmJ76epbgVzZ27WarbYRKp7eF3qn3oFeQq6t2KX6L5/bhC9H
T92Wkce36FWjX1drJAaQ5Iw/hx2VGHCnv/UwxmLq9kWHtkWUJccs47UIcfCy
LJz27ziZMe2vlQLe1BoEqCM17qE+lPVXDmOfCxVwd07KXCUw/Rkjovq43nFy
nMKX57k05XJ9YofEryJY/hMpcNuyu4+3qeC0oFdRd6DyspvS6M5I/QU7C1kB
Sex72p7DzkGYa1VCc5QwWPGNApW/VKMKnu9B80mLiwtU1ly9Q+oSnqQBaeXf
t6TpgqGz5JMtCXNFbkhKConDZ+Yi3JITMIMBkd50eTyZwKAamsxAaOzP2xDI
InDnpEx833alTOJHUdyP67W1B+IQUe1HbieWhyu5KgqvJffc3VQ1fUBJQxr+
Q6/1xFGrf26vPzf81KdNLRfbkcRqGIocZhkZqy/0J5+MmAfQhikjt7XCXxur
AyHXaXuDDKbfFrvsdeKRBAyXqMSTV4+kZXDkbL1lgIpfG/WwmYShwMUFkF1b
xWUbtAJy4VSiqWTbrvt5jynA2j6/nP3PuMGMJJgQ9cswXBMq+DA1GXU6NFlW
WNUZ+6KfUXjb3jYAhQ53Kg08uwGcGjEF6CsKhL5TyuIlw7BrsnlFTZ7THSgs
wmHjEEJr4OMqLxj+zQiG/Zz9jdLkZ4YIwbrRsc98kyxaMuxZm9iruHpYzYgj
9V46uZgK6FB/+gZQqxuo0wPDPazj8vy0iQmVOa3mbA9gJyBnZCGaCE7vhdUw
WdN3gcmO1opnxK2GnwbrSyW8LT6ov+VfpEgRIWL/cJGTATYrG9gbRLryXbYd
HAwEVb+dHkqt3ctxIUevbAi0vRh65r0JgTLcvyU9oF9Qg6znntlN+h0MsdxT
CVyU3rr8YBxTM0XhRd7Y0Daa5IXClxEMty/sbgA9ClRR94WN+44E7oAnDy9Z
7arV7Py4mtDcdq1HSRqgwlhppk3374YERnrXIhicKr7bJuy9+cShpUWXA9pI
Gupxz/TlszKD/udm2/U7HSHjFEEmMbYpR4ukIJc70slimkxAAgQasBHDriu2
PRfShrMs0mDgTnpRRhRzj1QfOt/s42PhfFcKatAcucZSzpEEfcHRFa51YTyV
5uTHUy6BdxGibjTOOb2ehQ5A3Pz0m/WGFvxt7h48gNEq7ubPVX/ci3SudfEI
k/ilFbkhEJ1o7Tdkj+jldTrvshVNwUVfFnGTJfZ94piplWi1z43N2R+G5KKK
V9twcCU+V95VPJCMu3Smtrq6+HA9A0yTMz3kFHNVnbumvLBKCFd6rMCb4uXP
Z/bqwq0488ufehAd1ehGrKgHJ5CoQQRqKxduQrhmV7eYkqfzq1zhwZ5Muerw
plgU88F0whdR+Z+Tir3a/Hjqy6hE7Vsi933NnPJW7tr2tYT5t8mfyHmK8ZvC
MJaDLHqkOa/tA9FK3jSelg76h5tcQdLy9qmW21XOCrvjrOYLm37DrvYf8ncz
vVdULykTNzuGN5K8by19sqY0jcZ2ya/mdHW4mKhwZLZHvu4BFJPgW2UGBJwG
eN38sr/ANxK6+0oshJnch3lSVOxSJ7RkqhAdOsPwDr8AdZ8N8Ts+0QM+w+tH
mv9Qf3ic2rYvO2mc7QgvNkqRHsJVKd4AOK33CTFd0qxHQQzYhW9mz5ZKmpv3
/ZPjXQgrBU4sRqlpcsoQw48JnrSysf6v40cTM0RrlLgGN/M+p+t7CP6q8ACj
zbgn09D+AvaegPW8XuC3lWaU/TWtVd5mUEgRtu6YWarxXsBdqo3ucDlaNXT+
XqhzMxo13VTK0glfy1hZkyZEK++0dd8XowZz4iPFz00EGJpazMuWfHdqBUAa
Qu7RGylisuKeTJS39bQGRAeu86uWNMvPIxS7fR9neIcPJlUfW/spTUMltMt0
h87g296Z5nrVyPf8S4v64qiECkhyFsDniw8urzeuxBsWGfQ9kF2o9rjquRFw
kuz472qcVas965EREuHjUN7//HW6Wiegspd4cROAetE2+eSkSLizkCtFZs7C
NNeA8M1xLIGHJS2PYjXDdW8z9RtDWiUcyYSby2MX/11iN7YsvzqgKIXa4wlX
CMsVan/4Dm52tDdkk+cpouGtoD9/7tr9Tl00g4ra4XO6AzCoz5tEmqW+k0Vl
tcUrg02mZKZpx18n5C0iA1m9JhTc0MFfRALiRxE+uS12Kbxsnt5j7P2y6ekV
nB2tvNWsB7/srSF7knoyWW0c+pPshfdkL+mZ/E8sdipJV7DGbKJ/+N7b5Hy7
8yfCNKpvqPXWtOSC8/5cvGT7s6M1MDGWEAyalphXN6KDWFfOt69O9Tzlu52R
1bNaLxfls/VN+g/fpA1ttjaOLFogsIalZa0fyPuLZOgGEJ6D7n47lmC7Zux9
3jUAwOOOsVfOS5YdwI7gVKTnctt9LGeLci/R5OeyG4AFzgQhyfJHaKzFFe+1
pJmSMDhfuxn33bYt4/apuwnmMGTeqsSKZZQ+eaEpPN3WhPUGcFFvusZ5zVP3
XdgqXq3/KTdyccrkybSiFllZm5I2+rgveI0kJH7R6Pb+rmV+b04LYPCfOY3C
oHZtDTteabnOfLtrhtG7mOqRBDa4hXdTa2sjndzyP2xvDw6GmXimpxkkfrWa
f+BzES7ypOPJ8Hdd9+VsEeArpe7iXejl4QioZVoNnjVzdPDDNgdQfg9xutro
mBXYKxLbdILbeIR9r5h+XN+G2zpqc+hp+IWAEPQ3pOXtoHXtH+P7mN0SrnPe
Me2GBXjZ023GpCajoyCTY4DV1ktln44X71yY4Jwt3W3A1OmPKvTiyKWmJ1g5
bu0XGcZsal51KNYK6UH2XGkuvuNKHa/+xbxKD7K3JVtvwzZXAJ5hW1lVQqoa
8Kccggcs0TrWNJNKEx25sqS6YjhWd615Auuq26rvSY1mfwh3hyiJDYWo5xAY
G82Jb2XA91/OyZnLyO3gfaR4qwz8eSkiuoEY6mD2sIuBcu2fIDF6ZQcWU751
1sNbOwscY8z+BUfVeHfXlG+KPWKBuyG+Z9DpaieWVGhJx56DY7cxEMauIH1y
FcZ8wkVRTVkipEOrzrpdaCnKQwBy4qex+cfjpnCqyVGFYjdW6/Iw2H1Pn8Q0
b2UeyCQTZJXcPZGS0Xssk3/lEUhOu57RhlEGLz2Mv/woe2zO3NKxP7w+9FAr
NpHvIUjaqo0VZINiJRpy15IRNtFPp2be1vxTIVgrSAVIpvf481138Lni4oRi
rkJFK3OEuo5jHiIh4pxFTu0h0eIpUdgDGzODkXpxK7qm8pFXlm6Qk9WA3VD+
TpxGS3efq2oaTu0IABmUub7/97s35jdx6GgJUD+pz9mWselM3kstEOSo+T5r
gfIMGtr8WR0qU3PSiWhuM/Vj0eQKTwZhfAcNlfEF7y8cs71cbwBukabL66ii
vpEyAr6NffHsdN83cmmYG6Z9FsB0Pps4ssmTJGvHtK8P+tXFI7f1JXd5ZdNr
dfTufNX+N90WNHYoOYBbZEkHmFvUunx68EQxlgfrEL87LLhz3X6X2J4o83d9
6hAU5Svxjez3/qh6a/R4k058fKxWJLzptxGjp7I6/zPhb+IOnwwVDSJlquPD
Yp/SR4Yanjan1OsHNvbU9/WXqoC8MJHtBu0WNbdH8145hDB7v57b8E7X0h43
xbtdQQuxYyl/Xt2C2hoL0ymJSHNG44kiQHeCJqufZHZ/MYfVIh9k8iy+4rV6
0aW3m83m6e3VRc7IEnLED8W7PXx2x3nK3IrBIvu+7wOIb5LoSGR1wscGTSjG
SbICGVIxfkfkT6oRglzbHKNdBuHnluYBQri0Lw+9XuERD8I+zNHCj4UmFWYl
WCpDKDrtm4M+ZBW1w0eurrUzyPhvLeaLmlasu220lyTBvN1ADhEc2mdOc02d
mWhIb4+aQwZBPAqbVxz1g8Tk41chSZ2sdYvntTpDU3A+67HBxNOENi0TNEA+
BHHyU49/lgaz9cy08WbxPwBQSwMEFAACAAgAoRZGKdVc3T82pwAA6OIAAA0A
AABTd2lzL2JvaW5nLnJ3lLxZj7Nc1yZ2nJLqPzz6ohyhbuappT4AzGxmMEOU
A2YzmhlMK/89u763W0l3lETxrVW4sL29WXutawDqdkXeev7zv/7+/E9+s/Xl
f/rn3/hPM9b/8Gnf/xvYKzV/O/+X7G/nf1zADm7f3p8FvM9o8nfa/6Mvad50
f299pBt4K/ofpDL7DxiCIGCXvS/TZ/0blRuaOv3n/xz7n6IcPn+fMj9/n/o3
I+3Kf843GOIol3+aYVo+RzmU47b+8/3s/6xl+U/VbP8RfOJ/+/35/cnAEOt/
+ps3RfzP/+X3p9S+Znd0MEIwj4uFMgPLlW62vJQgSKNn1jR/s9PrfjMI1r7e
jT9QsZuVrn7vXmlYqfr7EwniF71O7UTyQOis1C99qrKz3oZrSGFghWKriIBf
xGGcq69EKL2rnCLyLQedLScR2O/PaRjy/sy5bEuvSN+XGXeoyl3qsU6JqRb2
POYXWm1a/lHDFUww1uOtTi+NLsfPRxI/JhhBCh65FD9G0eNWyI3b95cz4C1u
j5YoOZ0X+eAlOdLpco/6owv1afCcTXCPyrvjL3M8f38Q1vCbwE8x8x2H6Nq2
9YMTOB6hnZrjOX4lbPbB+o21nY88Ex3r6q+XOocVJIODQInz9yd8k50XpduQ
ErpcfFXowVcylm79sWvR58MprWdmGG1hpnsyFoHBV1UWBqc2BGW1j+j6/WEi
xFNggzFKgudi1G6DfEzACny7EXuI4/M6k16Kq763slJwxBek8mqaNd5tPqkX
FuxgNcOx00cN/bzYojBM5RtkSrPPWDFeWbnhStbNdvRy+iU0CKawP+QtL+Ta
hcH4EfI04X9/upagk1tzMf9DsA+sqPC+f7n6txrxVqLDF/vCjO07LWx0L2BV
4byK8sG+LPiZccQ4H6AeyoretdzrIIXlKjNlwsopkS9TxGQTtN/cFZ3rPmzp
+nR1jBiShxt3ISnu6iEfoubo3x/yuimdCQR+J+329TBJ1o+djfhwdRN+BmXS
vy/sw9EKd9FpI9pSGeH3BRWOaaIRZGbs748d7PHCbP5yfYisKL4n7boFRaCQ
LrenyCeeeTe5HHw+yL48PS+O+KFZq4c70iP7gNUN9Emh7E9oSEMlj/qxjo0r
JoOIzJQ28BArbMr12cNW061FgFaByCJ3iLbKp6VtHiFzCP79kekkM5KJqtlX
pZZymdHJ1/bFJx5BEh/7ZXYMdKW1T06Gz2FjJ7rFE+tVPMiGH04G8n9/nL0h
JOKb+3NJfIsJpSw8mjtMphqH7mooOW6GvrGHLZB+78L+nJdRthrDSJLMLoBv
/v3hLRwlLG3PdtKSvLl8WP3oM6ke6pqxCRGj8gnRWMNeqq5Rt31kC4hSdw33
8qvRrTCARBUkhhU+irCy66zQU6/bw0XUoNxSqfIGXm99/NZ1jQYIWMXIkvo3
k7gfvPFojnmTqfT787AqQ8YEoZHR6PuxFjR99Kbst5ymnTh5LO3hPoJ1+wrj
RPrfhTxFVSPjuXknZf+OD1CT0ouno3TXy8r8mszmjQtJBhIVpCub6Y0+Z0Uf
dcOibwi3SoqZNgq9uwz28tXeeTUfUJNh55su6YQlA/F6V9/GFJnOLkuBD/YI
CTeGtq6V3uCmH9zG3bFiQoq62eq5xS9P9ObfH6G9QuXjEw+WjWbnU5oxz30p
+epGgtyWVXtey7SIHbaXQ8ZLMA4h2IXRcOm7FW3od/T7c1EJJPqBShGX0UC3
So2JBeOh3bYGjFJ7JucwsbMbVNzvLRjf3XzzkjPCIer1hzYzAGGgyzmOgl4d
PxdMFxKL0EEKgUG8agjvNCQjKp75eQrZeUy0KDVpSXrhsC8M7RfJtgDkQbk1
5bY3CB0ZB5IeWrlu8KNesxx+ILN9do/LRiZ0iiAvMU8Ne1tEsM/PMeWc/i2z
DUD7NwHr97tgK/F4kKJVWAMvbF6vZVV6DSfK+pKyKMycm9qBkN8Dawl8nbjn
zOQEg+ku8ftTfOR64OFQ1GvpVR38E60yTxwjphjakL6Qxz6YYk4qtSE3yMGn
8QRX7Dyj7dvLvsjpgKrevwd6Eiltm+hjJeQlQ0OfwBkz9/SzlVVFvR52S1kz
kWe3W8zqAmFpNR5ZjqQzYo4Aow4l2wRjeNKPag3joKUnesTxGINwk9lZZ9I/
kaxcWYTJiETjba1N64rrsJd+pajd8t+fLVq9x5TnVWtT3NoiFyu9yIVRB/fw
tnSvLE6QFKEfHwFDdKEp1ueFR3DeaOPBjHDy+v0hjsZ4nffyaYvLGOwdl8ov
x0vRDtJbRRXUvJGWcYi5HpXzLmocQ976udH09wPRZ2/2gC+aNJUNDQ2fsuoN
M4sLcAU9kOV9293ZkHwIZQCV0ugyqaqPsw/v3zQT3Vdm5o/CDbvfHxd6riy6
XXBMXunIYVozGI38zckSzZAiRnImfgkY2bN4d1KoSj0w59i6h4EG0DiVOqgo
8TYf+BomoAQhQSv118i1rMTaW3dh/Hn2NNeF0EatrPnFLGKxlO6DK12glNS6
N8U7A70pY45CAc71SQHVwrU3kjjM9ClnH04rLChK9QntOkmbfsOiP3rkovdD
EHpAwA8W/aK/P2sr81/29UCIT2oZ3lLtW09nJCHDQ1FbLu1QUaN4hRzaGbrg
pLrErf4i3wtaZOMWeM3vz87Hit1gxrGeVtfaAxlQ50nrCDPL+/XSq+j5bt8y
Jz0UjKI3ObpCAw9O9SxUb10X1AZr4SaQ6byR6/22QAuxoVOTja8/jwGF57Bm
Oh9v3BnOz/hbZJqxPKNXhCwN7iOabxYIyKSDmSbiKm0y7PCK+ZyomO1eJaad
Gt7oeV7QzWKS0cJWv+z0KxPQRcD2YTRUmJaHbiSgN6dsIi1Bg3Z9TvNjfD13
IKMA4wPF0khKebqHSj27l3TxKGZQr2YMR8avTy1sm7FYQE1igvNG0avnsBNe
DsGCRSiruZ62y8BQa7Ig41HB3fMzNiyrLWyz1V6lriZLMcihbzBA+/vztY8O
PRDxtnG6cWV2hz3B1iTjoNctN5KGVNAzrftbGKxnLqmhhPBspvqRW3vHF3T3
ccr6wk9qR5xZbiBrfu2ROD++e3oXh7lyD48kMM284tJ2GWVTJLIuEJDeGKpe
03AD1hOXNzcPA3V60NIIY6yEqQ1ac7POdcx8uWSk1q6/L9zC+y3FbOuxYkuu
6pwOM4+iGFegghxG5TjuP//+/O///DedfPKmM+psV2huW5NxzHE193jB5wP+
e3BcC6ICkWH/iuhk7MdBQ3AGfgd1DvakIELwG4joBSJATd9HWNtBzId9M7B1
rxTKcSHyr/B2sAXhbSCqvxG8iuOsEoTXTbrbJRLQ1ihTKRfDcSZd4hv9t+U4
jQRbEBoBYkmxbU6HCeBeghVDMoD+kt7RCy1E8CoI6QGCB885RwQbsOU4Ef6b
ENhynA0G/6+Pvzn8Pz7Wf/+p/uWF4/iD5QacV5/8bH919/sNT2pkhQ/Af3He
whmOFyV70tEME0+e8AUqu7F6iA3U2plo3bWLm2j4COihjEoYZ2Je5sZd5BRK
AZqkpvhsOIX2Q0mV2vg8L7qPqXzGuG6PCfV4T17Tk2nXTFOROyrPJZC1aIL3
+QzhoDUAMcT0nYwadc7Ud3tnhrgtDcCTLtn7MD9WYRsn+ftmSvzKW+2LCsyy
4V45YsO1xe63zNLfn3ReCnyDRFL3zw3KRkosKIqBDq7EJMGmr6trzS+a2sKz
2I83famQd6iORkzpafpKCjCHeKIozWdznr/d0RA07TvNyGkaCpOwclt8o8ew
KyIADW3iDXhcAubD6rgNrXfoqt0NFKbD57SWX0RH4NYHZqmgv5AMasZP8Hqp
LTabgle/EiSNfSd55XQwuyfBPn3q2tNyeWFAJ1ctkpr79TRv4+WNq6hjWL6F
d7a9UZWtL3PHxova3Ccm3eqI2c2nO6eNOuozdp4J9Aa+adq9eaCoxl6JZK/M
7pIfTT3ozHOPhj5B/QCmvRRWhOU19GOQFtaoP9EXOl+Nalp3ZgHMccgFowkz
/Byfz4I+8TMoo2dbSht/xZT4fETmd+OE2MTzUlom/EljTsSys5etMD38+1Gw
kDdUFVHkeWOIVRX5KMKubH7ghA1AiERg/zWRREiHo6iADF1VEdf8HaOIGprW
CCrqJhRWi1ojrE+Msngkj3sFhsRR+qTqS40te3hLtZNAgqyrT+Upx2o3DntY
Nh/qTC0TrMUjkYnYDZs2iZs2hnNddxlBBiUXoQEnPNoWeYSW7jmq1agJT64r
r706RIQEL1CDQgVzUMlwDtWy56Rp/4ZhdE+vT/x2echvo0GOytJK81RPB216
p9ArUweRlmVPLwozwabLASM8X92nU6ivYDXNGOHa1C4xGff9Z2T2tOnf9U27
2nAtjNgNk9OnegNgwZ8vPTwVhhuAyn2nllXuXjC8KQp1RBk1l26eZUwfPkY7
fWYdiWXg3ZfFST+NvDH7h9Sd88uc2yIuDKcDNqf2Ezk0/Pl8Ai6f
[2/4] from: carl:rebol at: 7-Oct-2000 9:23
Well done. A windowing system in 388 lines of code! Cyphre, you win the REBOCOOL scripting
award for this week... Great job.
-Carl
At 10/6/00 01:54 PM +0200, you wrote:
[3/4] from: petr:krenzelok:trz:cz at: 6-Oct-2000 14:09
placed in picture archive: http://www.rebol.cz/~can/rebol-view/image25.jpg :-)
-pekr-
[4/4] from: cyphre:volny:cz at: 8-Oct-2000 13:16
Hello Carl and all on the list,
Thanks for all comments and suggestions regarding SWIS ;) I have many
others "interesting" ideas in my brain but since I cannot find any job as a
IT/REBOL programmer in my country I have to make stupid commercials in one
small local TV station which steals a lot of my time. :(((
The SWIS was my second attemp to write something in REBOL/view. The first
core-version of SWIS I did in 4 hours and it has less than 3Kb of code.
Nevertheless I still continue to work on my plans in REBOL , REBOL/view
which is the greatest language I have ever known.
Thanks for it
Cyphre
[cyphre--volny--cz]
P.S.
I have just found some differences in behaving SWIS on Amiga and on PC and I
think there are some problems in REBOL/view -WIN98/NT version.
1) try to open "Welcome" button in SWIS-this will open a window with
gradient effect. Move it behind the right and the left border of main
REBOL/view win OS window. When the SWIS window reaches the left border and
get out of the "screen" the gradient effect is gone?!?! On amiga version
there is no problem with that.
2)another "feature" of REBOL/view on Windows98/NT is when you drag the SWIS
window and move it/resize it moving the mouse out of the WIN98/NT window the
reading of mouse position will react even when the mouse is out of the
REBOL/view vindow which allow to drag/resize any window/face out of the
REBOL/view window. On Amiga version of View when the mouse left the
Workbench window it will stop the reading mouse coords(which I mean is the
right function).
If you find these or another differences on other platforms please write it
to me or to RT feedback.
Cyphre
[cyphre--volny--cz]