Thread

Sample2 (Delphi) (Sdk)

Sample2 (Delphi) // Sdk

1  |  

canopus

Oct 13, 1998, 8:25pm
This is a multi-part message in MIME format.
--------------3CE501B84C2015DF6E6471F8
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

I have updated the Delphi library file for linking with Aw.dll (Build
6), and tested the Delphi version of Sample 2 (which uses Build 6). Both
are in the Zip file attached to this message. Sample 2 cleverly forces
you to study the new Properties document in order to run your own
version, even in C, because you have to substitute your own midispk
object at a location elsewhere in Beta, find it using your new knowledge
of Sectors, Zones, and how they translate into Cell coords, and replace
three lines in Sample 2. If you used the Delphi program posted on this
Newsgroup a week ago to explain how to Query property using Sectors,
Zones, and Cell coords, however, you'll find it easy to write and test a
JukeBox program, including how to turn a Cell coord into a Sector coord.
My test wavspk is at 1S 78W, on the walkway leading to the replica of
all property between 4S and 10S, 9W and 6E, built by a BuilderBot
following a Survey made by a SurveyorBot (which used the technique for
Querying property in the previously posted program).

--------------3CE501B84C2015DF6E6471F8
Content-Type: application/x-zip-compressed; name="Sample2Form.zip"
Content-Transfer-Encoding: base64
Content-Disposition: inline; filename="Sample2Form.zip"

UEsDBBQAAAAIALldTSUHs6mqIwwAAOpAAAALAAAAYWtBV0FQSS5wYXPFWutv28gR/27A/8PC
XyIHqVsccP0Q44BSEm3zQpEqScWPohVoaW3zjiJ9JG3HF+R/7+zytW9RctI6gEPO7PzmtTu7
O/TX+Hfr0po7J/O4/HZ4cHjwlCUVaoinhPD1/RSnjw8JGvm3v+FVhWDkKk6P0Rqv0riIqyTP
ShRna5RsHvOiQmlyW8TF6+EBussLVD1gZK2q5Bmjy7xI1yUC4PdUVZJVuLiLV5jqLXEJIugy
ydb5S/kBzXBZxvcYnsLXclElKTxN0riEcdSuFaitkHW5nFlXSyuKAme8iOyla3vn0QX6Bf30
88+nzKjxwnGnQP47FT48GL3/y/f8IaYbfmJUwb8CJegWPcETRuDsdtQdft4fE6+q10dMvO3i
AR6PiG1Ac/1zx1t61sz+wFHmVhhe+sGUp/qXnh0IAwPns+Pa57ZGpOd7i9lYL60wAXjW5Jon
WvO560ysyPG9lrHwnM92ENrLceBfhnawnDmeM1vMtPzAdm0rtLX8sR1ZEhM8c6da6JobRlYQ
SbzAPnfCKKA2w8s/F05gd0GaOJFzY3tCcDoqE5SWJoa5pdszy3FFYuTMyOw/iyQUbdraEc5s
5pw3VhMYSd/V3DGw2SC2NNcKozqP0mgfGM7M6eysA8r6X1MiJ3IF0tiafJoG/pynngf+wpvy
NH/8qz2JwOPoQskI7LPADgUerRHLwDm/EIyzYTLYXrSc+hB5TznCi8h0kxnh3J44ltvoDVVD
Wq+WzGQROOeBbXsa3thdCGGaWAGk5BMYNLHm1thxneiaHwG+Q4GYRDY8WlNnEfLs+WIMS4/Y
bkQRhilcmwR2P29gzcyE1F34MzItz8U800TwC0XIKz+Ta+bUCa2xa9da7eUicAWvwRbvnKdd
2u6EGAHmhZIddj1XFOmmDF1cJrbrquZ47ZZOynJd/5J6Fl0ECxXvzL2W7K85EdS5uR+Ic29i
QTQ+BzNXJdOEMgTRiWioL87U2fXyinm+Zp5vWLp1ybxF13ObeT2HGbAIOor12YIiCvrDkCnx
DZUtBw3pSni/Ft5vRH5vS0Nh7WlIgk2TCysSLaI0YXrQDF9xbzfcWwjF3/YmvEAIBbAlNNHn
53hDvBLer4X3G5Hfe9pQZv7UdgXa1A4ngTNn99OGY00URF9agQxDtJDQRKu4E0Q32bjQNtR6
XUglAiIYXC9hdc5dO+JTxGYSSpDthcKxoqFJB5WGvoDNPxSJgeWdSwjcXtsSwaYZVHyJzFY7
CUi9ibZsumFypwq6FF04T8h7I6XC4Ego3JTO+Warwl4Tp4uAO1xRKjHPmk5hfwgleu9By4KC
O/E9r95QrbBnnMGBgzObEgLYCucOEzhKDW1v2k8UhiQDCH5QmmAtpTWlkJBG71FcVUVy+1Th
Et3iNH9BcYFRllcI7hxrdPtK7yjh9BOqz9D1LPO9yJLWZ0vlQ9+NZY9wDY2mRSTO/L7ikMoN
Z6/ZMvIl0lngz+Rx9lUkEUMmqB2RVfOrL5z9KaE5k3E0zmJKueLerrm3G57XF6L6KEwODxNO
L0fngstyZhCpCxXj2rZkAWEK9OOZPbYjktzJ1tw4c4k2v/A98S7TMceLEM6EYah27jNMYF8W
AisXbr+nshfXw4PjU/YGZ38mB07VPa7h1PsXuP5BRYcqyRQzjgU7A1NOaxbdnsY2c1xn6HWV
VjBsT1BOajNPaXcY0cxuT5Jt6W5TnfMhP6A5xBi5jnfmq+h9xeK5pOLQ2iE4xCx4gdUuM55K
lgGbX0qF3CIuuXAuc8n5nclqSxIuTS2V3i8kaneZYadVj9RsLXKkpCEahPbOZkBoh2gQ6B4u
UetckN1KYkmJ6DhsaDtiu8FTOYnbXmxlsHZJsrlqmXK62iNHyCaMHhUtp9dKCOPAt6YTi3GM
UC8vHLgkBTIwO7048Ibhn525UGY+iGRPRfXgZm21CZF0NVcCURMl1/sZrLxPHpzaPihY9VVP
ySG9G1q/OH0PDmm8/YLmOW3znRJJ+Jn3nP80jy3LurSfcVbNi3wF3Ef4D6+fCtyzJ3Ga3sar
38URo2KFPiIH1NzjgqmiIV5VeRHiP0oYbRVF/Pqvv52c/PQBkd//RvldK3P6v28Ikp8NwqhC
DyhH6x/UDrx7ylakPwvK4pdlQlq7o9unJF0z8eqeTtGKtHQhGF1kqRhkb4N6Jo+5KnBcYTRa
55s4yQB2PnmIAYp2ghnoBBIdZytMRjR5P0YfIUiSchX+ssBlnj7DaW0Ur9fwUgLOJC7WSRan
JmWggFG3Tdkal1WRv6LtIzsNMLSdxluGLksM0WfiMNyuNL+H2G4f9xKTBG+SNE1KvMqzdcnk
eYhTIB1Ty/qKP0yudk6UPUXPcfqEdzICMpBk92o7mrllEtxmCIUYYMZtnqd7BYMIviUa6Cv9
9IKe82RNbi9kDTR1D42YHQytjo+FwveNSHt5hT/SGw3+8khWCrHsiEE5+usRA3OEkrK+B1Uv
CUzLB1zgk2+iU793Fqxqp1rxY/rKFmbWE2EpN6Pq6HCunNbujt63Y44R71tdK5gVfoJPqJOd
ike6z6zhskdudF3INk+w1zzEz7genUMpO2qZtEQLMTzqx8H+QJ7JaBKko3+0cnfZkTZCtXNC
lE57e8RwaYqgYhZgsjnSuIlXgxhmAhlIZwBvViPUTEVBsE5et+nqM0dRurRJ6rvsPcTZOiXz
ujZn16Q14oqc0UwdNfwRZEmfpGYQ2cLkLDGOqENy2hnBhWbQVoXJOQeNXshXzr5Yxc9xFRe7
FWL8Ber4gFIZv0K1rz+T7lDaXh6S8pFYWtbVYZmsWSEDIMRAV3vJJr2C2N3jAYavkir5E2fL
vjGzvH1dZvEGDhL093BnNFBPm1viYcNVB1/rTYe5Xu/gzM7er3GKydHJaOQWjAx/GTJT2uGw
ITwn+VM5QCSF3SAr8cAgdKP7VtuumWwhBsexFWjjuKe+gSFshytDqFtppBSAZDlEQU7/umJg
vJvBg2PVjG9CtX38H0+4gOLyBWoluUOxAn8qaCUGgfbA3V+7BmShgHKbb4acbWksmWU+2Pen
LHnGBTc5hws3NXKwgZj+icwORlEBUoWHJb6O/fKuyDfLFYZNb0R/m2sHudxCXa8e8rXYAl89
FQVsXOkr2aiSNL5NMVyfhI64UEzyrIqbmbpf8WoA3lQAGwy6uEbNW8nJdagxufoz1/3jAZv5
GnZt1RE+xdl99UDKDGOr8V5CkAbdShjwHnu7pRVE8b6IN6AjGzKDfoMz134xJ5JwE3+EySLL
nyLKWXLHaYat3W0f47KEtbMean+y2STg76AyVuB7mB9wEhiysLL18i5JhxWFZmwbDbPrzDo8
PEg2jynewJKjfzhX0wQHh7Vp4H4HnmVxit5ZLyfrNH2HyA4IcX7XgLw7NbZyNACIypOR7+RV
98ZuzzAXagtqXTobflBHSGfRO1mxbJm+fWSCbaRkOEOPaVvua0E95A69qE4VAZeMZwFldbq+
lSkcVEaG2rG1ZbaagKmCM6z91VsvRr+OiBr6TT0hQ7waaFnn4EaaOVY1jA5+/3abyaceW9Y7
uDFnXiMERg3+oxLVYsta9+iumXPWdpv0qr5Lm8pYLBlFshn7tKXMLlNEjaL9Gj7yycXkb6dI
YUO2f1/IqJLgKtSpm0dGpC+qeii2l1bqpWxeZwCiKOaDO1CizkG5aOBVNcvYptriCSOsOJW8
paVlXEha4MFG7NQM28MWim+wRnmxNQebkdUD75lIXlwPv8v1dEs95hD1GjWtqGHuEGE9tKHz
Nwy+BVCc8oydQjM6I2sAHt5UNOdBBtQr3XNy8eJ6+IFNy2H+6ObVlhbnME/U88rYDt0FXj+v
jN1TM3gvKsMa+6xm2F5UC7vntOGkteDa9u0gcN0s+WG9XtNWQpXKtmjbwSasWkg3gYZ0fc3L
TIMjK9yp02zWqYdSHGu0PWpT1BopXdh0jewhC4/KGsKzpedtVqFEUQVl50a5OSMiIFH5f26s
bzl19HCKc8EePfhh6rSHnO/csTceVBldsiVv6e2btBJctbbv2f/fZoH6ErrtK4F5zXHSMvjw
TwrmKURw1Ohv/+xgCluvQda+7fOEOXCctAxu+pZhBu4kFXuo/qOHGbMVVBVT/ccRM2YnaQDd
8SuKeVPjMOsaDbSTw4P/AlBLAwQUAAAACACoik0lrx0kq4sIAAAeIAAAEQAAAGFrU2FtcGxl
MkZvcm0ucGFzvRlrc+JG8vtW7X/oq1wd4OMo7Dzuso6TCKHdkMVAAK/XpFKULI2xzkJDNMKs
49r/ft0zI2kkC+NcQdiqtdTT06/p6Zce3buJu1yF7OQtj5etkSs+v34Fj9YlTLrvawL0Ioxi
vojdZRM2cZAkLIIggi4LV7dBS24YM1pgkNwGAlYKGdybhMXwwNdw694zWIWux3xwYRn4gVjd
Ab/+L/MS4JsIwdcPhIm0QPAl29yymBGTDkvcU/Bu3WhB1Bl4nMe+ADeRb8ltzDRlgeh+4LkJ
EsONuErEUlkSLvFDjggBj6COKDYLQwE8JvQJSsJj0QB+Q3LEqZCkHv1bR0ECBWOdEjiIUMUb
5C5xBBPE8xIF4RvRhHMmhLtg+DR5EBdJEOKTHbpCEOhd7KL5PALxKIk5LRJd/NMN3JAvRJOI
IVPr0hr1kEbi20lMaM6nRD5JEZKHldR0ehMvMwHhDDxiVJ8SyYYkBCM3YuHxG5jKh1MDeFIC
nrMlJ0T6q0GddZLwiIDqSYMdP0gISH8N0EkRpLaclDfj4aBHrPGkNXU7DLy7+oRFPosReSgd
pPEEm3SyY4ZH/TLcLhNo4Idq5FUc3CMlte8RPV2+gs/QgLF0FgGfJeL6GsXL8ORbBZrJ3JZ+
e46uJFkh+1PlTgYKOmGHLQKySRGqhCyAx+yXNYsf6rEHb6CHvrdgcUOSvHdj4mD6wJuiS0gJ
7N60N3MG88HFeccZ50Tk4sT55cIZ2A6C1XWYsN+FWhk51ntnPP9Y3qHhV1vgs234GGCqVyoF
s51+/wlvCSwzsC/GY2cwnZ/3ur3C0utXHp5QArQwwRU3jt0H+LXdah23f6NLP0niIFrgvanX
5M05bmEEqDVBvZ2oN3W+oIFfFlC+Krx9XXj7pvD27ypi/ymgfFt4O26nr7WGocvb3gcHNR1c
TJ0JCf41HME3bfzvuN1uE6JCS0077Pzs2FNErKWxLd58qmVol8Nxv0ur1xhya9pPA3KdJYsS
6eEEefz7GI5a3bfnn4t+XPC11q77rN0VTEdWV5cAI7w39HpN90KbKbiBugw2rSn7lJCctQbF
bgk8MYEY5yMwt4IOaK1+EDHRsny/XnMocIMdJMEfiD1YL6/x9R/y9gchSoNxUYgNpppaGlLo
xz5lIU1fZvlIWpyBu5kHmCXq1uW8c9Hrd7ONJDqifPc9tF8o3UXkXoeMkhZRxGyAUoJMAhj1
BKavGvwz3472Szj6LzJpPCMtsFDoMPeUYy/jY2ic6cXu0QXmgknlnA90w+T16zjveoMm/JgF
sT3pLBI3DPPQiPVD5IcsPpz6T1iBu0LfvmfF83+BSdQt0zYpJqW9GUWR/WusUuS10yx3KOO1
692llrGtfr9j2e/nmFrGV2gWncL2ahNN8/AGKTGqsIa0QxSkhVRuGE/VK14T2k1C2IsBFFFl
h8hjhwwPioPmaChcrijOKJMmHJka4Tpna4RKeXuAnKQ/xDAyH14OnHGzRHAvZupzutlD7DMO
6BvIZIGtB3Uz1FFURFEhS4yS1qNx70Ov77xz5iNrMsEk3G2q/GcktsYerZDmtYMbImX0J2xh
jUb9nm1Ne8NBaoSarihq+7SBtVqFgWoED24G5PUnLDCwzp1M9V50H4gAJe/+vFf1B+7ygKFC
6x0hk2rFQ666nf1oc3BFKnVgVD7W1TnJwrmBcX0vRyQpA16c8IBX9JLIK1ZmLH9U2Q1z2orF
yQMNWd7NWp+3G4jfUc90g2W4WDH3jsWtVisnh3b6XbarbZn00vaycQr1o+kt001mOtFZrrEJ
8XgcM7HiKH/CU90Kgxts1eg9nSHRdEnnJOBqXNQ60vMO2NxiLQ91lGPjYmFu9ksNbBbwcHxe
OJpHiyZbN1R0E0u+ypRXv/pRB3ndAV8nqSCEBTSt+iFjq37kBKWu1nCI0mQA0n4iHRFsa6wK
+7Z3UaIJrift9UZ3tqfFdirPwBR8VNE6H/a7WtRmqSE3z7R638d8y8fd2LMce/Y89svpXuWY
V89jvpz7lXVpULUud2j2bAVTiPnGrvNh1+k3S216tktQxKlNuu/1LNZMXvDFiRxowETdvtou
Vl1nYo97IzPBijyIpB6D/HRhKfgabyKGHzU3+dUcr/yWRbvIq5sLhTBYsc9o0/MLUxzc4N3c
pYplm1oo0XNVskCtZsxzNUDeGp9zOZ4rttUQWkc6MzgXY3JGjCJwOfJX8tDHpzn4RgjVv/J0
LK2gDXuUnK0YTV6/evxJtSyiNLYxx4+PV1iLuBFHi6AsuACBQPkpxCexG4kljf79FlysfDdR
0/h8TqgmahQv06ik1uj+yofiqM40SzreM7VSsEyddNj3BCW/v5pdWl3Jt/lNzJdzUqVeIpjJ
9Az2rODJKf3v4F/HavKUQr6HAmCmUPITNJckrswAZr4uhPjKNhwz22KtKpGnKaIwLS6cov7E
Un2OPQFBor52FIPPD8YpWlQtbssievFMr9azy1oOb8XyVR/4GdkC3VIDZgZAET4rB0VNQ5YP
Qul9wPKhsnQzRuEVt/CjeXON6XgF6lUV6qwSdVZJlWboVXSNLAX/T+iAXf6YhitpVOb/rbZ1
68urnG1fNh57+nucDrvkyiIJ8NzRw7HyxPzUxLjJvDvyLDpaVcMimsdJiISd0gpi08BdLboL
lxqHTZDcyi1rGdB8EAzrVZpyRHIeLCialWfQJXuebSvxFU/ocB4yN6KbcY2PZHU5CZvbw/NR
35k6jXIGgu2F819VN6uTyvuH7LcjTvF16EeFZsX4ffHlt5gpa3hoAUqZHqcKULkHlfPWtjr4
+U+A5lkYHw2osslqJOO7QQFuqmXj2cXpwlv0OllspOeBJxP8wYY3GSBtAncV8Tu+SZbqdF9h
Vsknza4p0Td0nhS6L2zvllu3WaMeTBEhiLKBXm52fGq9fvU/UEsBAhQAFAAAAAgAuV1NJQez
qaojDAAA6kAAAAsAAAAAAAAAAQAgALaBAAAAAGFrQVdBUEkucGFzUEsBAhQAFAAAAAgAqIpN
Ja8dJKuLCAAAHiAAABEAAAAAAAAAAQAgALaBTAwAAGFrU2FtcGxlMkZvcm0ucGFzUEsFBgAA
AAACAAIAeAAAAAYVAAAAAA==
--------------3CE501B84C2015DF6E6471F8--

canopus

Oct 14, 1998, 1:22pm
This is a multi-part message in MIME format.
--------------0D9679D4CC14AE3B8F065983
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

The attached Zip file corrects an error in the first version: there are 5 lines in
the Sample 2 program which must be replaced, not just 3 lines, for Sample 2 to work,
if your midispk on Beta is not at GZ (whether you write in C or Object Pascal).

[View Quote] > I have updated the Delphi library file for linking with Aw.dll (Build
> 6), and tested the Delphi version of Sample 2 (which uses Build 6). Both
> are in the Zip file attached to this message. Sample 2 cleverly forces
> you to study the new Properties document in order to run your own
> version, even in C, because you have to substitute your own midispk
> object at a location elsewhere in Beta, find it using your new knowledge
> of Sectors, Zones, and how they translate into Cell coords, and replace
> three lines in Sample 2. If you used the Delphi program posted on this
> Newsgroup a week ago to explain how to Query property using Sectors,
> Zones, and Cell coords, however, you'll find it easy to write and test a
> JukeBox program, including how to turn a Cell coord into a Sector coord.
> My test wavspk is at 1S 78W, on the walkway leading to the replica of
> all property between 4S and 10S, 9W and 6E, built by a BuilderBot
> following a Survey made by a SurveyorBot (which used the technique for
> Querying property in the previously posted program).
>
> ------------------------------------------------------------------------
>
> Name: Sample2Form.zip
> Sample2Form.zip Type: Zip Compressed Data (application/x-zip-compressed)
> Encoding: base64



--------------0D9679D4CC14AE3B8F065983
Content-Type: application/x-zip-compressed; name="Sample2Form.zip"
Content-Transfer-Encoding: base64
Content-Disposition: inline; filename="Sample2Form.zip"

UEsDBBQAAAAIALldTSUHs6mqIwwAAOpAAAALAAAAYWtBV0FQSS5wYXPFWutv28gR/27A/8PC
XyIHqVsccP0Q44BSEm3zQpEqScWPohVoaW3zjiJ9JG3HF+R/7+zytW9RctI6gEPO7PzmtTu7
O/TX+Hfr0po7J/O4/HZ4cHjwlCUVaoinhPD1/RSnjw8JGvm3v+FVhWDkKk6P0Rqv0riIqyTP
ShRna5RsHvOiQmlyW8TF6+EBussLVD1gZK2q5Bmjy7xI1yUC4PdUVZJVuLiLV5jqLXEJIugy
ydb5S/kBzXBZxvcYnsLXclElKTxN0riEcdSuFaitkHW5nFlXSyuKAme8iOyla3vn0QX6Bf30
88+nzKjxwnGnQP47FT48GL3/y/f8IaYbfmJUwb8CJegWPcETRuDsdtQdft4fE6+q10dMvO3i
AR6PiG1Ac/1zx1t61sz+wFHmVhhe+sGUp/qXnh0IAwPns+Pa57ZGpOd7i9lYL60wAXjW5Jon
WvO560ysyPG9lrHwnM92ENrLceBfhnawnDmeM1vMtPzAdm0rtLX8sR1ZEhM8c6da6JobRlYQ
SbzAPnfCKKA2w8s/F05gd0GaOJFzY3tCcDoqE5SWJoa5pdszy3FFYuTMyOw/iyQUbdraEc5s
5pw3VhMYSd/V3DGw2SC2NNcKozqP0mgfGM7M6eysA8r6X1MiJ3IF0tiafJoG/pynngf+wpvy
NH/8qz2JwOPoQskI7LPADgUerRHLwDm/EIyzYTLYXrSc+hB5TznCi8h0kxnh3J44ltvoDVVD
Wq+WzGQROOeBbXsa3thdCGGaWAGk5BMYNLHm1thxneiaHwG+Q4GYRDY8WlNnEfLs+WIMS4/Y
bkQRhilcmwR2P29gzcyE1F34MzItz8U800TwC0XIKz+Ta+bUCa2xa9da7eUicAWvwRbvnKdd
2u6EGAHmhZIddj1XFOmmDF1cJrbrquZ47ZZOynJd/5J6Fl0ECxXvzL2W7K85EdS5uR+Ic29i
QTQ+BzNXJdOEMgTRiWioL87U2fXyinm+Zp5vWLp1ybxF13ObeT2HGbAIOor12YIiCvrDkCnx
DZUtBw3pSni/Ft5vRH5vS0Nh7WlIgk2TCysSLaI0YXrQDF9xbzfcWwjF3/YmvEAIBbAlNNHn
53hDvBLer4X3G5Hfe9pQZv7UdgXa1A4ngTNn99OGY00URF9agQxDtJDQRKu4E0Q32bjQNtR6
XUglAiIYXC9hdc5dO+JTxGYSSpDthcKxoqFJB5WGvoDNPxSJgeWdSwjcXtsSwaYZVHyJzFY7
CUi9ibZsumFypwq6FF04T8h7I6XC4Ego3JTO+Warwl4Tp4uAO1xRKjHPmk5hfwgleu9By4KC
O/E9r95QrbBnnMGBgzObEgLYCucOEzhKDW1v2k8UhiQDCH5QmmAtpTWlkJBG71FcVUVy+1Th
Et3iNH9BcYFRllcI7hxrdPtK7yjh9BOqz9D1LPO9yJLWZ0vlQ9+NZY9wDY2mRSTO/L7ikMoN
Z6/ZMvIl0lngz+Rx9lUkEUMmqB2RVfOrL5z9KaE5k3E0zmJKueLerrm3G57XF6L6KEwODxNO
L0fngstyZhCpCxXj2rZkAWEK9OOZPbYjktzJ1tw4c4k2v/A98S7TMceLEM6EYah27jNMYF8W
AisXbr+nshfXw4PjU/YGZ38mB07VPa7h1PsXuP5BRYcqyRQzjgU7A1NOaxbdnsY2c1xn6HWV
VjBsT1BOajNPaXcY0cxuT5Jt6W5TnfMhP6A5xBi5jnfmq+h9xeK5pOLQ2iE4xCx4gdUuM55K
lgGbX0qF3CIuuXAuc8n5nclqSxIuTS2V3i8kaneZYadVj9RsLXKkpCEahPbOZkBoh2gQ6B4u
UetckN1KYkmJ6DhsaDtiu8FTOYnbXmxlsHZJsrlqmXK62iNHyCaMHhUtp9dKCOPAt6YTi3GM
UC8vHLgkBTIwO7048Ibhn525UGY+iGRPRfXgZm21CZF0NVcCURMl1/sZrLxPHpzaPihY9VVP
ySG9G1q/OH0PDmm8/YLmOW3znRJJ+Jn3nP80jy3LurSfcVbNi3wF3Ef4D6+fCtyzJ3Ga3sar
38URo2KFPiIH1NzjgqmiIV5VeRHiP0oYbRVF/Pqvv52c/PQBkd//RvldK3P6v28Ikp8NwqhC
DyhH6x/UDrx7ylakPwvK4pdlQlq7o9unJF0z8eqeTtGKtHQhGF1kqRhkb4N6Jo+5KnBcYTRa
55s4yQB2PnmIAYp2ghnoBBIdZytMRjR5P0YfIUiSchX+ssBlnj7DaW0Ur9fwUgLOJC7WSRan
JmWggFG3Tdkal1WRv6LtIzsNMLSdxluGLksM0WfiMNyuNL+H2G4f9xKTBG+SNE1KvMqzdcnk
eYhTIB1Ty/qKP0yudk6UPUXPcfqEdzICMpBk92o7mrllEtxmCIUYYMZtnqd7BYMIviUa6Cv9
9IKe82RNbi9kDTR1D42YHQytjo+FwveNSHt5hT/SGw3+8khWCrHsiEE5+usRA3OEkrK+B1Uv
CUzLB1zgk2+iU793Fqxqp1rxY/rKFmbWE2EpN6Pq6HCunNbujt63Y44R71tdK5gVfoJPqJOd
ike6z6zhskdudF3INk+w1zzEz7genUMpO2qZtEQLMTzqx8H+QJ7JaBKko3+0cnfZkTZCtXNC
lE57e8RwaYqgYhZgsjnSuIlXgxhmAhlIZwBvViPUTEVBsE5et+nqM0dRurRJ6rvsPcTZOiXz
ujZn16Q14oqc0UwdNfwRZEmfpGYQ2cLkLDGOqENy2hnBhWbQVoXJOQeNXshXzr5Yxc9xFRe7
FWL8Ber4gFIZv0K1rz+T7lDaXh6S8pFYWtbVYZmsWSEDIMRAV3vJJr2C2N3jAYavkir5E2fL
vjGzvH1dZvEGDhL093BnNFBPm1viYcNVB1/rTYe5Xu/gzM7er3GKydHJaOQWjAx/GTJT2uGw
ITwn+VM5QCSF3SAr8cAgdKP7VtuumWwhBsexFWjjuKe+gSFshytDqFtppBSAZDlEQU7/umJg
vJvBg2PVjG9CtX38H0+4gOLyBWoluUOxAn8qaCUGgfbA3V+7BmShgHKbb4acbWksmWU+2Pen
LHnGBTc5hws3NXKwgZj+icwORlEBUoWHJb6O/fKuyDfLFYZNb0R/m2sHudxCXa8e8rXYAl89
FQVsXOkr2aiSNL5NMVyfhI64UEzyrIqbmbpf8WoA3lQAGwy6uEbNW8nJdagxufoz1/3jAZv5
GnZt1RE+xdl99UDKDGOr8V5CkAbdShjwHnu7pRVE8b6IN6AjGzKDfoMz134xJ5JwE3+EySLL
nyLKWXLHaYat3W0f47KEtbMean+y2STg76AyVuB7mB9wEhiysLL18i5JhxWFZmwbDbPrzDo8
PEg2jynewJKjfzhX0wQHh7Vp4H4HnmVxit5ZLyfrNH2HyA4IcX7XgLw7NbZyNACIypOR7+RV
98ZuzzAXagtqXTobflBHSGfRO1mxbJm+fWSCbaRkOEOPaVvua0E95A69qE4VAZeMZwFldbq+
lSkcVEaG2rG1ZbaagKmCM6z91VsvRr+OiBr6TT0hQ7waaFnn4EaaOVY1jA5+/3abyaceW9Y7
uDFnXiMERg3+oxLVYsta9+iumXPWdpv0qr5Lm8pYLBlFshn7tKXMLlNEjaL9Gj7yycXkb6dI
YUO2f1/IqJLgKtSpm0dGpC+qeii2l1bqpWxeZwCiKOaDO1CizkG5aOBVNcvYptriCSOsOJW8
paVlXEha4MFG7NQM28MWim+wRnmxNQebkdUD75lIXlwPv8v1dEs95hD1GjWtqGHuEGE9tKHz
Nwy+BVCc8oydQjM6I2sAHt5UNOdBBtQr3XNy8eJ6+IFNy2H+6ObVlhbnME/U88rYDt0FXj+v
jN1TM3gvKsMa+6xm2F5UC7vntOGkteDa9u0gcN0s+WG9XtNWQpXKtmjbwSasWkg3gYZ0fc3L
TIMjK9yp02zWqYdSHGu0PWpT1BopXdh0jewhC4/KGsKzpedtVqFEUQVl50a5OSMiIFH5f26s
bzl19HCKc8EePfhh6rSHnO/csTceVBldsiVv6e2btBJctbbv2f/fZoH6ErrtK4F5zXHSMvjw
TwrmKURw1Ohv/+xgCluvQda+7fOEOXCctAxu+pZhBu4kFXuo/qOHGbMVVBVT/ccRM2YnaQDd
8SuKeVPjMOsaDbSTw4P/AlBLAwQUAAAACACZWU4lh4bStvYIAABeIQAAEQAAAGFrU2FtcGxl
MkZvcm0ucGFzvRprc+JG8vtW7X/oq1wd4BCCnUvuso6T46HdI4uBAF7bbG1RQhqwDqEhGmHW
ce1/v+6ZkTSShXGqIGxVLM309Gv6rTzay5G9Wvvs7C0PV7WBLb68fgWPjWsYtd+XBOhNGIR8
EdqrKmxDL4pYAF4Abeav77yaPDBktMEguvMErBUw2POIhfDAN3Bn3zNY+7bDXLBh5bmeWC+B
z/7HnAj4NsDl2QNBIi4QfMW2dyxkRKTJIvscnDs7WBB2Bg7noSvAjuTb3IsRC4R2PceOEBee
w03CFbMScQnucwTweABlBGkx3xfAQwIfISM8FBXgc2IjjHkk6ejfJvAiyOjqnJa9ACWcI3UJ
I5ggmtfICN+KKlwyIewFw6fRg7iKPB+fWr4tBC29C23UnkNLPIhCTpuEF/+0PdvnC1ElZEi0
cd0YdBBH5LaikMCsz5F8kixED2sp6XgerhIG4QIcIlQeE8qKRAQDO2D+6RsYy4dzY/Est3jJ
VpwA6a9eam6iiAe0qJ70suV6ES3SX2PpLLukjpzlD+PloEFs8KI19pbvOcvyiAUuCxG4L+2j
8gSaZGqFDK/6ZbBtJlDBD8XA69C7R0zq3CMaunwFl6ECQ2ksAr5IwM0M2Uvg5FsBmEm8Jc32
Ek1JkkLy58qcDBA0wiZbeKST7KpiMrM8ZL9tWPhQDh14Ax20vQULKxLlvR0SBdMG3mRNQnLQ
6ow7E6s37V1dNq1hikRujqzfrqxey8Jl5Q4j9rtQOwOr8d4aTm/yJ/T67Y71yS54jC/FO4WM
taxu9wltuZgn0LoaDq3eeHrZaXcyW69fOXhDEdDGCHfsMLQf4GO9VjutfyKnH0WhFyzQb8ol
6TmnNYwApSqotzP1pu4X9OJ3GZB/Zt6+z7z9kHn7VxGyf2dAfsy8ndbj11LFkOVt54OFkvau
xtaIGP8eTuCHOv7ntF6vE6ACi1Xbb/5qtcYIWIpjW7j9XErArvvDbpt2ZxhxS9pOPTKdFQsi
aeG08vj3IZzU2m8vv2TtOGNrtX3+rM0VTENWrksLA/Qbep2RX2g1eXMoy2BTG7PPEfFZqlDs
lotn5iLG+QDMo6ADWq3rBUzUGq5bLlkUuKHlRd4fCN3brGb4+g/p/Z6P3GBcFGKLmaYUhxT6
sc9JSNPOLB9Jiguwt1MPs0S5cT1tXnW67eQgsY4gP/0M9RdydxXYM59R0iKMmA2QS5BJAKOe
wPRVgq/T46i/iKP9IpHKM9wC84UOc08pdhI6hsSJXOweTWAqmBTO+kAeJt2vab3r9KrwnySI
HUhmEdm+n4ZGLB8C12fh8cR/QgrsNdr2Pcve/wtUorxM6ySblA6mFIX2r9FKltZetSyRx5nt
LGPNtBrdbrPRej/F1DK8RbXoFHZQnWicx1dIjlCBNqQeAi8upFLFOKpecapQrxLAQRSgkCo9
BA47ZnhQFDRFQ+B8RXFBmTTiSNQI1ylZI1RK7wEykm4fw8i0f92zhtUcwoOoqcvJs/vYZhzR
NpDIAlsPamaooyiIokKWGDmpB8POh07XemdNB43RCJNwu6ryn5HYKgfUQpzXjq6ImNCf0EVj
MOh2Wo1xp9+LlVDSFUXpkDporNe+pxrBo6sBaf0JDfQal1Yieie494SHnLd/Paj4PXt1xFCh
5Q6QSLHgPlfdzmGkOboghTIwKh/L6p5k4VzBuH6QK5KYAR3HP6KLXhN6RcqM5Y8qu2FOW7Mw
eqAZy7tJ7ctuBfEl9UxzLMPFmtlLFtZqtRQd6ul32a7WZdKL28vKOZRPxndMN5nxQGe1wSbE
4WHIxJoj/xGPZcsMbrBVo/d4hETDJZ2TgKtpUe1Ezztge4e1PJSRj62NhbnZL1WwWcDLcXnm
ah4bNNiaU9FNJPk6EV79yidNpLUEvoliRggKaFj1S0JW/cgIcl2tYRC5yQDE/UQ8ItjVWGXO
7e6iRBVsR+rrje5sz7PtVJqBKfioonXa77Y1q9VcQ27eafG5m/TIzX7oSQo9eR765XhvU8jb
5yFfTv22cW1gbVzvkezZCiYT841Tl/221a3m2vTklKCIUxq13+tRrJm84KszOdCAkfK+0j5S
bWvUGnYGZoIVaRCJLQbp6cJS8A16IoYfNTf5aI5XPiXRLnDK5kYmDBacM9r01GGygxv0zX2i
NFqmFIr1VJQkUKsR81TNj3fG55SP54ptNYPWkc4MztmYnCCjCJyP/IU09PVpCq4RQvUvPx2L
K2hDHzljy0aT168e/6taFpEb25jjx8dbrEXsgKNGkBfcAE8g/xTio9AOxIom/24NrtauHalh
fDonVBM1ipdxVFJ75L/yITuqM9USj/dMqdRaIk487HsCkvqvJhdXV/JtOg/5akqilHMIE56e
gZ5kLDnG/xN8c6omT/HKz5BZmCiQ9AbNLQkrM4DM1wWZEEIygif5MEWnP2VMeMCeyYZJNsqk
j8IWH7PmYmNUOeWTtjef33w7ofs/hW/UB5FMtj4H23UhBlMcxRw6G+Q5iOIL+XaSJuS4BPgY
q+NrOK0mN4cvnwquOF83aFwuEse0GzixrmbYndq+s/FlMUBFyVO+JStPc2xm3J5xA/2JqtgR
OgK8SFPJRO9fDDdoULm9Kw3rzQu9W06iXT4/ZOt/7TEXZEzo13phYiwoxBf5rJLcMOpRKLmP
WH8V1r7Gt4SCMHZjhj7j80IB6G0R6KQQdFKIlT5CFOE10rwB/vLYC/ucLo73UqnM/Vtp59GX
l4m7Pg09dvQHTZ23yJRF5OG9o4Wjl2CCr2LiYc6SLIuuVjUBCOZwYiJi57SD0PTFQm3aC5s6
r60X3ckjG5kRXBAMC34aEwVyoC4oHeSH+Dl9XuzqkRRNaHLuMzsgz5jhI2ldjhKnrf7loGuN
rUo+hcPuzuOvajzUTaUNWPLbE4z5xneDTLdn/L767kcMkSW8NA+5jK9TBajUgvKJf1cj8fw3
VPMujK8uVBomRabx4SWzborVwrsL4423aHWyWovvA2/G+4P158lC3EXv64L2fNTNNTqugizi
T6pdY6L/B4FHmfYV++PVzmONQQfGCOAFyUQ0VTs+1V6/+j9QSwECFAAUAAAACAC5XU0lB7Op
qiMMAADqQAAACwAAAAAAAAABACAAtoEAAAAAYWtBV0FQSS5wYXNQSwECFAAUAAAACACZWU4l
h4bStvYIAABeIQAAEQAAAAAAAAABACAAtoFMDAAAYWtTYW1wbGUyRm9ybS5wYXNQSwUGAAAA
AAIAAgB4AAAAcRUAAAAA
--------------0D9679D4CC14AE3B8F065983--

drchandra

Oct 14, 1998, 7:53pm
It would be nice of some kind soul were to translate this into C. I'll do
it, eventually, if someone doesn't beat me to it.

DrChandra/PK-37

--
Andrew C. Esh mailto:andrew_esh at cnt.com
http://www.mtn.org/~andrewes - ACE Home Page


[View Quote]

dthknight

Oct 14, 1998, 8:15pm
this is Sample 2 from the SDK docs (http://www.activeworlds.com/sdk)
translated into Delphi though - I think :) So Sample 2 should already be
in C code in the docs :)

[View Quote]

drchandra

Oct 15, 1998, 8:05pm
Somebody musta stole the caffeine out of my Mountain Dew.

--
Andrew C. Esh mailto:andrew_esh at cnt.com
Computer Network Technology andrewes at mtn.org (finger for PGP key)
6500 Wedgwood Road 612.550.8000 (main)
Maple Grove MN 55311 612.550.8229 (direct)
http://www.cnt.com - CNT Inc. Home Page
http://www.mtn.org/~andrewes - ACE Home Page


[View Quote]

canopus

Nov 24, 1998, 8:25pm
Here are more explicit instructions on how to adapt Sample 2 to finding a midispk at a
location other than 1N 1W:
In Sample Program 2, the Query is used to find a midispk object which has been
placed at 1N 1W on Beta world (this shows up in the CellX, CellZ in the first line
of handle_cell_object). These coords place it in SectorX=0, SectorZ=0 (this shows
up in the lines making calls to aw_query near the end of main and in the middle of
handle_query). SectorX=0, SectorZ=0 define the center Sector of a 9-Sector Zone,
ranging from X= -1 to +1 and Z= -1 to +1 (this shows up in the sanity-check line
in handle_cell_begin). You and the server communicate about the Zone with
reference to an array of 9 Sector-status containers, which is passed back and
forth during communications (Querying a Zone can take many communications). The
array is indexed from 0 to 2 in two dimensions, so you have to convert your 9
SectorX and 9 SectorZ coords to the corresponding array indexes: subtract your
center SectorX and SectorZ from 1, and then add the difference to the current
SectorX and SectorZ array indexes (this shows up in the last line of
handle_cell_begin: 1,1 minus 0,0 = 1,1, so you add 1 to SectorX and 1 to SectorZ
when indexing the array).
When I tested out the Delphi version of Sample Program 2, I placed a midispk at
Beta 1S 78W. So the line in my CellObject handler tests Cell_X = 78 and Cell_Z =
-1. That's in a Zone whose center Sector is at SectorX=10, SectorZ=0. So I did
aw_query(10, 0, SEQUENCE) at the end of the main procedure and in the ReQuery
handler. And the sanity-check in the CellBegin handler tests whether SectorX<9,
SectorX>11, SectorZ<-1, SectorZ>1. The line at the end of CellBegin updating the
SEQUENCE array adds the appropriate differences to the array indexes:
SEQUENCE[SectorZ + 1, SectorX - 9] finds the Sector-status container in the array
which is ready to be updated.


[View Quote] > The attached Zip file corrects an error in the first version: there are 5 lines in
> the Sample 2 program which must be replaced, not just 3 lines, for Sample 2 to work,
> if your midispk on Beta is not at GZ (whether you write in C or Object Pascal).
>
[View Quote]

1  |  
Awportals.com is a privately held community resource website dedicated to Active Worlds.
Copyright (c) Mark Randall 2006 - 2024. All Rights Reserved.
Awportals.com   ·   ProLibraries Live   ·   Twitter   ·   LinkedIn