S rsc_cz jsme dali dohromady makro, ktere by melo pridat do sloupce UserData 3 informace o hodnoceni kesi ze serveru GC.CZ.
Pokud jste hravi a mate chut zkouset a testovat, vkladam zde zatim jen kod makra (pokud se to osvedci, vytvorime samozrejme normalni makro soubor ke stazeni pro sirsi pouziti)
# Download evaluations from server geocaching.cz
$temp=$_Install + "\temp\data.txt"
$data = GetUrl("http://www.geocaching.cz/api.php?a=ctihodnoceni&v=1&d=0","Getting evaluation")
$status = putfile($temp,$data)
# Set input
$input = GetFile($temp)
# Create the list using the | symbol for our list separator
$data = List("data","create","|")
# Populate the list with our $input data
$data = List("data","replace",$input)
# Get the number of items in the list
$count = Val(List("data","count",""))
# Process all items in the list
While $count > 0
$data = List("data","item","$count")
$code = Extract($Data, ";", 1)
$evaluation = Extract($Data, ";", 2)
$countnr = Extract($Data, ";", 3)
# Find this code, and only update user data 3 if found
$Spaces = " "
If seek($code)
$d_User3 = Right($Spaces + "$evaluation" + "% " + "(" + $countnr + "x )",10)
EndIf
$count = $count -1
EndWhile
# Position display back to very first record
GoTo Position=Top
Jedna se zatim o velmi syrový polotovar, urceny pro verzi GSAK 7.5x.x. Pokud si makro vyzkousite, budeme radi (doufam, ze mohu mluvit i za rsc_cz), jestlize napisete svoje postrehy a pripominky.
Ke zverejneni tohoto kodu me vedl fakt, ze cim vice lidi makro vyzkousi, tim rychleji se odladi...a vice hlav vice vi :)
Makro umi pouze data stahovat. Az se odladi, pokusime se vytvorit i nejake udelatko na jejich odesilani.
A jeste jednou upozornuji, ze se jedna JEN O TESTOVACI VERZI, kde se MOHOU VYSKYTNOUT I CHYBY (proto doporucuji ZALOHOVAT DATABAZI).
...tohle je jen prvni nastrel 
..ale podivam se na to.
)
GeoGet
URWIGO
CWG
Ještěrka zdarma
Významné stromy
publish
