SC CODE: Function InitializePrivate() Uint64
10 IF init() == 0 THEN GOTO 30
20 RETURN 1
30 STORE("var_header_name", "scripts.js.gz")
31 STORE("var_header_description", "")
32 STORE("var_header_icon", "")
33 STORE("dURL", "vault.tela")
34 STORE("docType", "TELA-JS-1")
35 STORE("subDir", "")
36 STORE("fileCheckC", "2ee69bf525c5fc63552452fdf6b86ef8ed2a3b2c14a4b4088c17deee0e0f4832")
37 STORE("fileCheckS", "15f494341377f3dbb62cd14b6ffa638c79e7ee107fb44bdb66f8b6f423c93dce")
100 RETURN 0
End Function
Function init() Uint64
10 IF EXISTS("owner") == 0 THEN GOTO 30
20 RETURN 1
30 STORE("owner", address())
50 STORE("docVersion", "1.0.0")
60 STORE("hash", HEX(TXID()))
70 STORE("likes", 0)
80 STORE("dislikes", 0)
100 RETURN 0
End Function
Function address() String
10 DIM s as String
20 LET s = SIGNER()
30 IF IS_ADDRESS_VALID(s) THEN GOTO 50
40 RETURN "anon"
50 RETURN ADDRESS_STRING(s)
End Function
Function Rate(r Uint64) Uint64
10 DIM addr as String
15 LET addr = address()
16 IF r < 100 && EXISTS(addr) == 0 && addr != "anon" THEN GOTO 30
20 RETURN 1
30 STORE(addr, ""+r+"_"+BLOCK_HEIGHT())
40 IF r < 50 THEN GOTO 70
50 STORE("likes", LOAD("likes")+1)
60 RETURN 0
70 STORE("dislikes", LOAD("dislikes")+1)
100 RETURN 0
End Function
/*
H4sIAAAAAAAC/8x8XXPjNhLgc+ZX9Gh8Q3IsUfYklc3KkrwTe6bi27EnG3uylZMVCyIhiWMSVADQttZW6u5lX6+27p7u5er+xf2e/IG7n3CFD5IASfljNnu1k4fIQHcD6G70FwB2X8FgMICPR/Dj0du/wruPJwdnRx9OTmXrq+6zICWMA1uk1weI/xjhaxiA68FgCLfPAAAYlq2uEyCO5yldda4ifO14e7J3y3WmKLjsTDlxPJ/xVYz9MGLLGK1gAA5JCXYUZJgGWYIJ93/JMF2d4hgHPKWu40856ZGUuz7DQUpCRFee4/kc3/CDlHBMuCB0gq/hLF1GgaYWHCDRTrI41g2y9yi0GosxecRjLOgcYprCn0l6HeNwjuFHlMVck7yOSJhe+yygaRyfpe5OG3a8vWfrPc0igq6+RcFlzp58+VyM2wkxR1GsWeMHMWLsfcS4H6SEo4gw10EBj66w48G+ZLacrmSsWIoHPVMErrdnyKUAFUMHArgQjmZDgPg9XGCYn+Eb7jpBRikmvFNIkqAEO22B7lVBcxDJuQdgQswCGi15lBKnDRMx1YjMYes2QHwNkkFs4m0QyUSDdaBJNhO9rhgjeooRDRZuTihiS7la5lpzU8qqpPIETY1IHBHcmcZpcPkv0djN6jXLSCB4Vwr7UGqTy5UwvVzYUiNkIwyAH/qziIQuF9rA/SiUG/qU04jMC0y99mgG7nPZ5gHFPKOkpi4aw9pdss3PxVywUet6If44Ipe19d+Pq8Qj1a8ZUWpHDUvq4hMQUMYXKd2AoTrrYySYcZQsa1izlCaIn526+YAa0KsxRqE4nh8Rgul3Z8fvC/ST90zja6h7toWxsIe2R6kZP+BlHGEGA6BCQWKOqUuFilBf9l/cqyhbrkMVgc4CoxDXeZfPS4/jx5jM+WINjc1ypF3YB0e0rxzoqV8RZs7amrseVdhMGJjTiCPGHUONN42yk+8S8c+gZsnA6S9B7vxBS6yqg+JoTnoQYMIx3YMgjVPagytE3U4nyTj29mCJwjAi8x58tbO82WsNT9KcOqww9+FbDHyBYRZRKQHZuXre7y6Het+vAccMG5MTq6CnH+SsHcQCx7Mk57OUctdFbZhKQ49KTYMOTE29U5TvQ55ayKimtPcxy6KboKUrlyaoTp598cUX/TC6AunoBi3Z0wkQDVtD0dfQmWCOdOcXfbZExO5Wm7E13LrFLPiOJ7Eazc8Ypt663xUYm7HFsgRusUUVcrlai0K/G0ZXm+fJGJob1MSOVeTyHbsuCRS/Jp7/KY2I6+S6us73UyVsMmIDipP0CpeRwZ4dUjwVflMIgsKwAef/qy9Uu3/v2br0dbb7lhyy/ZyyXThUQLnDk/ZMu8BhxcnIHVUQU/OmmISYKhqCG65N1rPmVANWoUuD/zUMlfq72U5ttlAllX+BgVLEm+3TMmXcNE+KSWVIsC5XcHqsbZTQnYivHHMB3S6cppTDdAUx4phxyMHATVJp0cWslT2ElOq4JaAYCV57FU5UDVc5UMl59F4NNIBjxBd+gm5cC0r8WyLK8BHhrmnr2jWwgoDv+/f7SeRHoafMn+gt6FODPtzdwY4n4jlrIMPGlouYPmUR099pEdPfbRFKVYDn/kuE/g7sF8vqFFLqFb86eW9Jau1tcI6GWuWqAiHi2PKe9ujeBhW6x/cZjvMp/tbYIBv2ryYpOF0YKeEtTT+jrLV0lpCSII6Cy0FLWG1peFwnD/yicO14ymXW0VV0Znjb3DkuvrQBZfho+lUjqhSebPFljlkbw3TZttdV/XWfbQbWFa+tCJg+uhpGV7y84aTr7raJocrd2I7bDrXX9+HP0pRbHDXjAhGJBmkmyOdBCKcpmQ9zYWkgsQbVAZUepbC7Yq/I2FYFwzQPhjctNP9hxRfrZ7krms9jrPyV3DV25cYy4nI34dCy4bLTsO/l/mSYS4Hm3k3sERkttMH57X/8LzgWFv6NFVPUtrKmng+8Z3R8EFulakJkLCyYIhseNZc6jd/+/t/gBF8Ls/NOuDxJ8Le//wM+xGHZaG1lMxI5kJWEouSjGKxj4AYOyzAerGBeTELNpqcaisKEWkSuTcYqavi1+apFVFaWlzwqRYM8p6/UFpR30Ou0IxoZ0hnBTIfJQovj+VcozrDP0/fpNaYHiGHX8zmNEreMIxVsRxZoNsSTiv4+OCqgFIsx6oKyNqFqYFZp4rFBoB1IVILBA8Th5Utwn6s53N1ZzswwhZVFRiSIsxAzV+J5zYjarHwOqjKR92MqP/y4ODaPM4ewA/tVrvVMrqlqUY1LnmFWjGJbRd83aIjY5s5TNKIqfyX+ezZi4R7FhKJQTqmq+JFQ+We63H384fDN+03F7l8EFRy3geFYksJxJa8RHW2gCQwAxwKiyH+mabjSmdjBIopDF8dFsXaWBhk7ggEkRoVW9cjWavIUkWXGZfY04qslHrQWURhi0hp7bRDhP6IYyUniwMotZkcezI58OZxrsilY0ANO89VFYRviKIl4G64RJV51UhFZit0pYScvtm6jcD3x2hDInM1q7gQLRJUDzOu4EVnui9Ty7RUmXGgkJpi6LbmkVtvSGqPKAwM1I+gIAtq+KN0tDX4g9pSVQFK7U6mTTIZEJ/Tl+oSFUZmRXK20M0amlJdjTH4laXgQ2/JSMnQTvcxf3KQNzosAkQDHjtewZEdGcE6+ZJq4SV5NSxqgL/EqTK+F2Xex6FF8Avnbv8RqRzpvWYCWWDgDSQ96qpyfz76w6ukSkxO9NY7TEMUV0x6xH1TRpiz1Ph9YxyaKDzAoNVw57LcxFn+5rTC6ahXrkSHRCUrElm8lYsBOeoVpjFYtq5onTPWkH6MpjmGW0kGLRmTOor/hVh5VKWQJ0Rr+oHv7Xdkw7CudhyjciKkgWsN+Ks8dQKrSoPW6BVu3KAwpZjrk6iiXHDE0jXEotcJZD1/3uwpxuHU7+qoN37Rh9+s2fPm6DV9/1Ybd19+MZRR/JSP4yiBbt1drEWderQsqRnwmYkA5uaFdnZ3BAJ7nAtm32aOi9EbeKLN3JgAK9shdJrmjEZX5EJumBQm6UTtKTJS/j5J1C5YxCvAijUNMB623hGMKCIpjmysMTRNQexm6QzMaLi2BCJZVVlBMxLATgj9ycB3VQxeKBhHSTqQgTAYFM6k0YixdAtEOowezGN/sgSyGdCKOE1aWRD5ljEezVR7+94AtUYA7U8yvMSZ7kCA6j0hnmnKeJj34RtZITNbneUMj87duS4E5P6UZhbKQrc2Tsy7EMs04T4kWhvqjILukWDixjgophV9sSb7Z7S0liEHrTP4Jurc1/L//8x//5f/87/8Kp4v0Gr5Xrf2uGmOoOGpKSS0ChxFPaUefQUp5bYJZIoJbw37udeTUCs7Q9JoNWl9XVCtoUK3TBaIYVoJRfJFm8wVnvu9XeJsP0hr2u/nvR+mYnlBFy4KqlgWllm3iTM51uWxLDpoRAsNobjWjFzmnNZrSb6XaMeYwE1GL1qPCjwkDsHhdYYzK1b8XyRVSmtbvLl4P+8uK7cumGlTCRGQOPO1BmZMW+fh9Z4RFouCV1QBNod9dCsbO1lu3lK0nxaR7myd9IL0GFKeecuJbtzICF2tVJssKc5RMdSTaKo2rwFlLu7Nx3YJFYtkRaVq2jB7t1Uzk3M1tX4zbtO8PdG+TQ9qAmTukrdsP00844Cq4YW5wjJaq9kak32xyJ/nEBYS3NisqquUBN7PeuuVCVoXALN8ePNK5B03eXWs4XEd8kat9q0AwS1+TrdtZsK5vNSQjFdYqzKPgIcumSVTa3CknUIhYdAxP5f9LC2fgqljMwi3OHjQVDTI8kP+v2MlJEZwtl5iEKopPgupBrAz0LRANoYJsERcWFrINwua0YXdnxzxx13veM1GUAreBawTPcoGK3tkbGYAL8Bf5EBacFsTbuITLZdME9z0iuAapLJ1nHyALp/MtJ3Vg7Z5qs5V+xZiHv8HzeKU51CR/jFg0lUfdMxQzXBBWDHhCalEwY8Nxe0lT7jevzANUPq7X3DCijOw3j1iu4LndsmdVq+0+r3K0YYiolia3RNzTqp0i5EyvHw0WXkxb2ErxvlyrnV618ujiuyjEeXRhjFsr7T04cZHfP2riKAz/6VmbMZE5a0vOTx5ebwBtkLwnqIfeHQ17OC+oyRJaW6bDGqTIcrx9XVO5u4OdvQpNJNPdIbwW4WhHRKE61bE1rrA7tsRUpc2DW0AxptxtfR9jxDBc04hjQOqozm95e3khTrOwOPsRqejefQVHW97JUkzNnWzdBuuLrVu0nng+X2DiUsyyWMYk7NBVgYOcsHuSJVNM3TnmiuahEaS0QaG1QUNRz/O8B5RU27WSz8r85kzWkhC8dpy9OrO46Gli2SyKY4gIoDiGWYTjkD3It4Z5BcLQ6mjhEq/yWEGGbJeCPeLv0eVYRm25LuXRh2eZM3Pa6vbWPShmpW0jWcVO+6ri4+bwNMmrUy9eE29AvI2itna2LOJIDq/twshhShDHTWWR36/ekdgxUD38KVOEDYHzabZcppTD2SJi6lLXAzG/TEMFWRpNM7nYS4yXDLggcCUIAM0IicjcF5GvGfSGkiMdlMjcqTHyfSP7wD18+8MHr6HgUCGhAnoixdQCxvFy0Nrxd3abSw4SqZ4QPqnQoCegnU1ruJOnfmLGm/K9zwtClQL9S4JQKxR9RMxpFWzlJrQF4bXFpq715lwqi7YPBlZhxCqOtqjUSju54/xODhIlgri8i/AuThF3i3G8qjs7QScuSrg01AKtr27TVIwy1nWtKxRHYa5szWa5YpLZoatkLUaBVyKO39nZ8Sqh4gZDQ95H5PIgJbPjNHQzGktJCK5/pPG/r9n5sMQE3t5wTAmKQSxh/2G7A4hiQNM0k1eJYoyusGF2lLkxphJH5LJIGof95TBP1T/+8L5npeflqBIno7GZBBv8XEvo33WXS04IBvw7bPQnb6o8KtPXy4XfU0roXExjRC6dNjgkFc2YtklK8QxTiqnj7TXqdX5+9vHs6P3R2U+bTtC0ZGAArrAVeiqqL9ys5U4YXYmRw+qFbHzD820KYanbe1Ac1WAWHEknNACXqfM/ebUCBdjtvuzO29B6iZLlXssrm/uqOeZW61C1zu3Wlmr9JUvtdke1v/jyj3ut4qCPpDT5SOXyKbrWq+d0Bbcqbuz+PEKdv73p/Kex/v9O54/bfmf8qtf1OWZcYnlA0TUMwFlwvmS9bteBbdG0p/mYwQAIvoaPP7yX8AWDRhKjJySrUJ1xeXac+Uua8jRIYw/2IfMXFM/K4yMIEA8WQmsUqbx5XR5hirT5+NCWrJX0h/j70rULlzMal8m96D4iIb6BgUhfnuk7XW9vOEWB6gZ5DYABIiGom6aqWV5RVDk5vsm1ohTEZDJxR+fs/HT8at+bTCZCLu5FG4JG52JEH8JAnmfv3r3bOfhw+Pbi2/cfDv58sXVbzHStOidmsmWvcVTAjqW1XVI87Iu24dZtoHOIdb8rW/pd0VshJnG3t6s3Ls1Z5q7GWLA7+nky3vY+Z6VHJ++PTt5eyAX/U0vNV5kv7/MXppWhUbY/v3jxAlx/29vqzpM2OP3Fl8OtXXk5zfEsMBvqtYJ6XYGygXYV0K4N5O73Op3O3cXFxd35K/FfiUCHjhV2CRVl+ZzZMo6465wTxyhpUaz2QRsi8u1f8pJWG6a/nHL1ZEz0xRHj5d97+riZgitIRHLDQAR9NV5+Kg7R9rZXE7rcNQMFOYrG1TrB9JdjGED3Z9fd7wlDdzf0tj3Xf+Vp8yPwKkHW9JdjrzF5HrVhObuR1wLGekg/EVbEbaLfmOfGV9JULmc3OaZC6s5lRDcae7U7APLF1CKKMbgF24xLLp40YcxfZmzhTvrdrdsSapkuXW89nHjVPFzVZMm3f6kuVPwzRbVX6y3E9EmJ6ZMQ01W8B5+EdIqZOH1p24QTwYUSNY/yhlK0cuOrWOT7cezuNEBrZeI0w3ZnY63DYJkepmSYGMecZteaZ6Goind7jyTbr5HdRFX0VhdYqZHkROTlD2lRH6rtyNRASXPjuneesGpr71Z1R7vkWO+rc/bKc0fnr84743O2vXFjlZhpBTP0x9vn/kO4YokC8+5ODN2ktnliGNa2phio6412xzk3uvC6UlSsEGEfRDKRxsebIMQeO1stsTzO/PAe9sFJY3kWnsVOHUnsF5IlxzLkKFCsWZ6zV5oZ3rnfLe65bCIln7VqgvvFz9HueCNiXmjjOX9KDyDG3u8ZorgbvZLi9LptcJzN26DBIAkBbMOu9wij9Giq/ZKqZewUWSEHZeSMQQRA3lkzf7lC1QYSkb0eCl6+LOmNIhKO5X2hgmaDBlq79/GrrqBVFtUIvnGhNej6wouhhBbJyzdRefxKskQeugaEr/vdOMpPiyOrzXuaDW52W5/BKSUzkherDRoNFmNdLZI+s03l72Eon/1eq5SngTCQ4OpYuwyrRPuy3K3nI3f08/lY2InxueuOfvbET0+GxkkbeBuySnSsI9HMZxxRzv4a8YXrcBwjkWl5UgdQntVjXQeRT5lbECKOOhmN9dG8zDvdrDiYV3/LGwZIqIolAJeIaZCn0ycb6UOr5bk65XSzalWqwqhff3X97X3v118Fa5w+4zS6xDIC1j/NKFhFvhJB/SyQZGEGJxIRJ8OiWFPFLnAtTD1cFeHiQoJfXCjgTMJlFZru6OdXQraaYjkHE+xPQhvYeHvfc/cH5+yuP6VDTyGg4Z8EApLxV55//oAZTym+L//cGI4XeU4tFrdZ35RkRnnG1a5nWtHY2LuNpOws7lG01s+emWmYcde1OBDfmNpfF8fmx4ducYVIQBr7NYABXJeCcPtZnGfl/fNuFg/1npTUE0OwRIrH8TwTOTWR0yciL0a7nS/HBgHV8EQi9Jy9Ou/uD8/J/oOIeyZzA6PQdN51lxTflWbzLovv0vhOzehuQb2hptLvbtmZqMCVwAKkn/8sYftbdnqb05lSm4zCvKtMw5iAwNhWuNUpiB53f/AwDU9zoqZXZ6dSrVhNqUJdxTpEHLuc6eK61waSXptdXht4GsrbA0UbSa/9Oebvsjj+CSPqKizRdJwSvjD+ViS8NoTcJBBW0UMLObRR0YrlzzJncZpS11Uz6kDIPejCN19/pc4FrDszMIBQPuQIUIzPogTr63UOJp2Pp04bbmGRZrQHzutOGM0j7rQhiUjGsdUkYHZf91T2URj3vCQqpzYYyNcdkzMxqzZs3fK18A5F567o/AkzjmkdoA9/EN1bt+KvtWpD81T2F9MXvKhPPxH86oHDFikVUw3RqgcOyRJMo8BpwwojajTkl9TzUvLhm7M39TqysCX8UFdGaP7D+KxPu/oxG/3cSz+valffl+l3VOoVVVsencMAbtfqbpYw5+rSlfrFguITOYitSADFgc4CkTDGBynh9EdEmVt5/j2Tb2IYp5VwQ6xnoYqetaKB4UwYp3ZlR5JbwLbsCRaIHqQhfsPdyPPgP8DOzTv9r1ZiW/g81bLa/drzlyg8FYGO+03bOKNbm6oqhpot3P94+uHEZxIzmq1cZn4kRiUDrPKZGMksXZxB1yjikC3DQ8TRO5ommkm5vs4oZouDjOafMbKe19udxjPFz/mO0suXhYZ4D11KkaG6NdBjR9jwMqlKdPNXHup0PcG+AyRiYq7e71R1UJfLz07dy8p7DhjApR8jxmVE8mHmOhfmy6BIpmud3XrFkDOJyrKpEr0bydRyz1LghM1hoEUc4uIeh4m204bI82raOErYvA2cjc2XlXnfZVtutbGlDfLg95jNPzLqBvVVBo9aZT5CUJ1hG4LaWq1MIMQ03ZV5QB0QeuC8ISlZJWnGnLFlikdBu9K5flacdt3zOAjXPCOOYQDY54jOMfeDOGWYcdfxrWTBXPZzHNv7EvtLKh8OHeIZymLuWp4pk4/XfJFsMMz9jOryyOaMiB2630nrd/b2/RuRaUCvdr4tEq29Z8LEV3S2ahKuCpnmltgIIk9kLWfXSiWvRpPgYutW9K0nY09dfhJ/jYWLxcF3+MaE2d4WUHrByq5fjVrJRYxJawx3d/CHr7/RVzyLXl72fv2V5cXVhCRIwKkC2ckFP8fkAPEzNI1xzmLtujSE+Yd8dS3IDe0vfljeYFd6g4Ect5ZW1ArOu6rgHEjgT3VgYx2XMIAJl9nCxdbtp/WkuZ7w/GrELwWPU8IjUi0vG8X/fFsXZqE0TaVIEjXe7mTseZso8ShUl8Q3T0wPyW9ENs/oOL8doo1Ewuabqeu3obcQhT0xVrv4EExPKdKncdl0kiW9/BXEJxF4RjzGvVLHBGvaULwokhNSL3Z7YmICQX+0oAectfMvKPWE481dbrV6mSgNe90GeiBvWA2aKrHlVkhyGSb5fmguveVyCtqQPFJOJc0NhbacJm9DktXEEGyq5h2qms8t5N8e0ZLIGKY9SDKDpYK0wcSEsyLkrZGV7DLPGM1/ibQEj6kAVr7GkMtfkW8Ym+vlqM/mNRzlUIwuH1N8qzl7IyCyLIv9maGpepGvdTbCrMOnabjKHQKf2h8O0vX3+m3SyudNyg/keNAxvjTjef4spW9RoEqkGx7vbrrXwalZL6c+w/wNVxcUsevIele++XRsPiJZMrZw9LdQ5Ovl/FVs3cFVP55ZkjJ3Hq3cj+LhsI9gQfFs0HqxdVtgrY1PsKgnuA8N6BjPjIqx5YdaGjv6XTTsd8XwPMyrgYwjLu8t2s2ctYYd2WjYRj61rgnRSvFvs25ZPfYNDiRjwdwfa43BhAsly68ga1VwR20gYykNgTYiY2lk5bXMnsij1Lef1OlL+abisCDAbU2S15MFofITBDXLVu33gyYDoHdJcYVQKDFv/L5defW9Slh/uOruTtAZwoZ+b1MHDIDzTbeSackD2rSbuPEJzxsBcJM/zyu/3VQ5opefsniQe2qvWnyhn80X+pl8oRv5siUyMGHIXlQtG3A6sizF2PHu52EgiwXUn99jbSo8DFDJxQDxDeyTn8+sfepO7FungYHMg+qV2YK+Ut7GSxGNY3DWNEJszbngf7zpC6U10CZp5J/7KF9byBKep96K6nsuF4432hkbXxxY0jTAjIlQ/y8ZzjCz8ni+WuJ0BsJgRWReFFFkvuZkJMSziODQEctphBFmxBRJtRhTRTIr6FV65mcO1htm+HaZBovvEFvg++ZYharOMluGEuSAU7eOUp+jSc+epZkf04jwHzFlUUqOyCwt+Fz44Dnm2gF/uzoKXedKAXciMkvr32DUpOC1vwMdOFtgiiFikJJ4BSmR93jJHK4xBIgAp1m8AnyF9UuDNIbf/vN/h+sF5gtMBRSiGOZpGkJKAV9Fse/sPVv/vwAAAP//RfiVmGxcAAA=
*/ |
| SC Arguments: [Name:SC_ACTION Type:uint64 Value:'1' Name:SC_CODE Type:string Value:'Function InitializePrivate() Uint64
10 IF init() == 0 THEN GOTO 30
20 RETURN 1
30 STORE("var_header_name", "scripts.js.gz")
31 STORE("var_header_description", "")
32 STORE("var_header_icon", "")
33 STORE("dURL", "vault.tela")
34 STORE("docType", "TELA-JS-1")
35 STORE("subDir", "")
36 STORE("fileCheckC", "2ee69bf525c5fc63552452fdf6b86ef8ed2a3b2c14a4b4088c17deee0e0f4832")
37 STORE("fileCheckS", "15f494341377f3dbb62cd14b6ffa638c79e7ee107fb44bdb66f8b6f423c93dce")
100 RETURN 0
End Function
Function init() Uint64
10 IF EXISTS("owner") == 0 THEN GOTO 30
20 RETURN 1
30 STORE("owner", address())
50 STORE("docVersion", "1.0.0")
60 STORE("hash", HEX(TXID()))
70 STORE("likes", 0)
80 STORE("dislikes", 0)
100 RETURN 0
End Function
Function address() String
10 DIM s as String
20 LET s = SIGNER()
30 IF IS_ADDRESS_VALID(s) THEN GOTO 50
40 RETURN "anon"
50 RETURN ADDRESS_STRING(s)
End Function
Function Rate(r Uint64) Uint64
10 DIM addr as String
15 LET addr = address()
16 IF r < 100 && EXISTS(addr) == 0 && addr != "anon" THEN GOTO 30
20 RETURN 1
30 STORE(addr, ""+r+"_"+BLOCK_HEIGHT())
40 IF r < 50 THEN GOTO 70
50 STORE("likes", LOAD("likes")+1)
60 RETURN 0
70 STORE("dislikes", LOAD("dislikes")+1)
100 RETURN 0
End Function
/*
H4sIAAAAAAAC/8x8XXPjNhLgc+ZX9Gh8Q3IsUfYklc3KkrwTe6bi27EnG3uylZMVCyIhiWMSVADQttZW6u5lX6+27p7u5er+xf2e/IG7n3CFD5IASfljNnu1k4fIQHcD6G70FwB2X8FgMICPR/Dj0du/wruPJwdnRx9OTmXrq+6zICWMA1uk1weI/xjhaxiA68FgCLfPAAAYlq2uEyCO5yldda4ifO14e7J3y3WmKLjsTDlxPJ/xVYz9MGLLGK1gAA5JCXYUZJgGWYIJ93/JMF2d4hgHPKWu40856ZGUuz7DQUpCRFee4/kc3/CDlHBMuCB0gq/hLF1GgaYWHCDRTrI41g2y9yi0GosxecRjLOgcYprCn0l6HeNwjuFHlMVck7yOSJhe+yygaRyfpe5OG3a8vWfrPc0igq6+RcFlzp58+VyM2wkxR1GsWeMHMWLsfcS4H6SEo4gw10EBj66w48G+ZLacrmSsWIoHPVMErrdnyKUAFUMHArgQjmZDgPg9XGCYn+Eb7jpBRikmvFNIkqAEO22B7lVBcxDJuQdgQswCGi15lBKnDRMx1YjMYes2QHwNkkFs4m0QyUSDdaBJNhO9rhgjeooRDRZuTihiS7la5lpzU8qqpPIETY1IHBHcmcZpcPkv0djN6jXLSCB4Vwr7UGqTy5UwvVzYUiNkIwyAH/qziIQuF9rA/SiUG/qU04jMC0y99mgG7nPZ5gHFPKOkpi4aw9pdss3PxVywUet6If44Ipe19d+Pq8Qj1a8ZUWpHDUvq4hMQUMYXKd2AoTrrYySYcZQsa1izlCaIn526+YAa0KsxRqE4nh8Rgul3Z8fvC/ST90zja6h7toWxsIe2R6kZP+BlHGEGA6BCQWKOqUuFilBf9l/cqyhbrkMVgc4CoxDXeZfPS4/jx5jM+WINjc1ypF3YB0e0rxzoqV8RZs7amrseVdhMGJjTiCPGHUONN42yk+8S8c+gZsnA6S9B7vxBS6yqg+JoTnoQYMIx3YMgjVPagytE3U4nyTj29mCJwjAi8x58tbO82WsNT9KcOqww9+FbDHyBYRZRKQHZuXre7y6Het+vAccMG5MTq6CnH+SsHcQCx7Mk57OUctdFbZhKQ49KTYMOTE29U5TvQ55ayKimtPcxy6KboKUrlyaoTp598cUX/TC6AunoBi3Z0wkQDVtD0dfQmWCOdOcXfbZExO5Wm7E13LrFLPiOJ7Eazc8Ypt663xUYm7HFsgRusUUVcrlai0K/G0ZXm+fJGJob1MSOVeTyHbsuCRS/Jp7/KY2I6+S6us73UyVsMmIDipP0CpeRwZ4dUjwVflMIgsKwAef/qy9Uu3/v2br0dbb7lhyy/ZyyXThUQLnDk/ZMu8BhxcnIHVUQU/OmmISYKhqCG65N1rPmVANWoUuD/zUMlfq72U5ttlAllX+BgVLEm+3TMmXcNE+KSWVIsC5XcHqsbZTQnYivHHMB3S6cppTDdAUx4phxyMHATVJp0cWslT2ElOq4JaAYCV57FU5UDVc5UMl59F4NNIBjxBd+gm5cC0r8WyLK8BHhrmnr2jWwgoDv+/f7SeRHoafMn+gt6FODPtzdwY4n4jlrIMPGlouYPmUR099pEdPfbRFKVYDn/kuE/g7sF8vqFFLqFb86eW9Jau1tcI6GWuWqAiHi2PKe9ujeBhW6x/cZjvMp/tbYIBv2ryYpOF0YKeEtTT+jrLV0lpCSII6Cy0FLWG1peFwnD/yicO14ymXW0VV0Znjb3DkuvrQBZfho+lUjqhSebPFljlkbw3TZttdV/XWfbQbWFa+tCJg+uhpGV7y84aTr7raJocrd2I7bDrXX9+HP0pRbHDXjAhGJBmkmyOdBCKcpmQ9zYWkgsQbVAZUepbC7Yq/I2FYFwzQPhjctNP9hxRfrZ7krms9jrPyV3DV25cYy4nI34dCy4bLTsO/l/mSYS4Hm3k3sERkttMH57X/8LzgWFv6NFVPUtrKmng+8Z3R8EFulakJkLCyYIhseNZc6jd/+/t/gBF8Ls/NOuDxJ8Le//wM+xGHZaG1lMxI5kJWEouSjGKxj4AYOyzAerGBeTELNpqcaisKEWkSuTcYqavi1+apFVFaWlzwqRYM8p6/UFpR30Ou0IxoZ0hnBTIfJQovj+VcozrDP0/fpNaYHiGHX8zmNEreMIxVsRxZoNsSTiv4+OCqgFIsx6oKyNqFqYFZp4rFBoB1IVILBA8Th5Utwn6s53N1ZzswwhZVFRiSIsxAzV+J5zYjarHwOqjKR92MqP/y4ODaPM4ewA/tVrvVMrqlqUY1LnmFWjGJbRd83aIjY5s5TNKIqfyX+ezZi4R7FhKJQTqmq+JFQ+We63H384fDN+03F7l8EFRy3geFYksJxJa8RHW2gCQwAxwKiyH+mabjSmdjBIopDF8dFsXaWBhk7ggEkRoVW9cjWavIUkWXGZfY04qslHrQWURhi0hp7bRDhP6IYyUniwMotZkcezI58OZxrsilY0ANO89VFYRviKIl4G64RJV51UhFZit0pYScvtm6jcD3x2hDInM1q7gQLRJUDzOu4EVnui9Ty7RUmXGgkJpi6LbmkVtvSGqPKAwM1I+gIAtq+KN0tDX4g9pSVQFK7U6mTTIZEJ/Tl+oSFUZmRXK20M0amlJdjTH4laXgQ2/JSMnQTvcxf3KQNzosAkQDHjtewZEdGcE6+ZJq4SV5NSxqgL/EqTK+F2Xex6FF8Avnbv8RqRzpvWYCWWDgDSQ96qpyfz76w6ukSkxO9NY7TEMUV0x6xH1TRpiz1Ph9YxyaKDzAoNVw57LcxFn+5rTC6ahXrkSHRCUrElm8lYsBOeoVpjFYtq5onTPWkH6MpjmGW0kGLRmTOor/hVh5VKWQJ0Rr+oHv7Xdkw7CudhyjciKkgWsN+Ks8dQKrSoPW6BVu3KAwpZjrk6iiXHDE0jXEotcJZD1/3uwpxuHU7+qoN37Rh9+s2fPm6DV9/1Ybd19+MZRR/JSP4yiBbt1drEWderQsqRnwmYkA5uaFdnZ3BAJ7nAtm32aOi9EbeKLN3JgAK9shdJrmjEZX5EJumBQm6UTtKTJS/j5J1C5YxCvAijUNMB623hGMKCIpjmysMTRNQexm6QzMaLi2BCJZVVlBMxLATgj9ycB3VQxeKBhHSTqQgTAYFM6k0YixdAtEOowezGN/sgSyGdCKOE1aWRD5ljEezVR7+94AtUYA7U8yvMSZ7kCA6j0hnmnKeJj34RtZITNbneUMj87duS4E5P6UZhbKQrc2Tsy7EMs04T4kWhvqjILukWDixjgophV9sSb7Z7S0liEHrTP4Jurc1/L//8x//5f/87/8Kp4v0Gr5Xrf2uGmOoOGpKSS0ChxFPaUefQUp5bYJZIoJbw37udeTUCs7Q9JoNWl9XVCtoUK3TBaIYVoJRfJFm8wVnvu9XeJsP0hr2u/nvR+mYnlBFy4KqlgWllm3iTM51uWxLDpoRAsNobjWjFzmnNZrSb6XaMeYwE1GL1qPCjwkDsHhdYYzK1b8XyRVSmtbvLl4P+8uK7cumGlTCRGQOPO1BmZMW+fh9Z4RFouCV1QBNod9dCsbO1lu3lK0nxaR7myd9IL0GFKeecuJbtzICF2tVJssKc5RMdSTaKo2rwFlLu7Nx3YJFYtkRaVq2jB7t1Uzk3M1tX4zbtO8PdG+TQ9qAmTukrdsP00844Cq4YW5wjJaq9kak32xyJ/nEBYS3NisqquUBN7PeuuVCVoXALN8ePNK5B03eXWs4XEd8kat9q0AwS1+TrdtZsK5vNSQjFdYqzKPgIcumSVTa3CknUIhYdAxP5f9LC2fgqljMwi3OHjQVDTI8kP+v2MlJEZwtl5iEKopPgupBrAz0LRANoYJsERcWFrINwua0YXdnxzxx13veM1GUAreBawTPcoGK3tkbGYAL8Bf5EBacFsTbuITLZdME9z0iuAapLJ1nHyALp/MtJ3Vg7Z5qs5V+xZiHv8HzeKU51CR/jFg0lUfdMxQzXBBWDHhCalEwY8Nxe0lT7jevzANUPq7X3DCijOw3j1iu4LndsmdVq+0+r3K0YYiolia3RNzTqp0i5EyvHw0WXkxb2ErxvlyrnV618ujiuyjEeXRhjFsr7T04cZHfP2riKAz/6VmbMZE5a0vOTx5ebwBtkLwnqIfeHQ17OC+oyRJaW6bDGqTIcrx9XVO5u4OdvQpNJNPdIbwW4WhHRKE61bE1rrA7tsRUpc2DW0AxptxtfR9jxDBc04hjQOqozm95e3khTrOwOPsRqejefQVHW97JUkzNnWzdBuuLrVu0nng+X2DiUsyyWMYk7NBVgYOcsHuSJVNM3TnmiuahEaS0QaG1QUNRz/O8B5RU27WSz8r85kzWkhC8dpy9OrO46Gli2SyKY4gIoDiGWYTjkD3It4Z5BcLQ6mjhEq/yWEGGbJeCPeLv0eVYRm25LuXRh2eZM3Pa6vbWPShmpW0jWcVO+6ri4+bwNMmrUy9eE29AvI2itna2LOJIDq/twshhShDHTWWR36/ekdgxUD38KVOEDYHzabZcppTD2SJi6lLXAzG/TEMFWRpNM7nYS4yXDLggcCUIAM0IicjcF5GvGfSGkiMdlMjcqTHyfSP7wD18+8MHr6HgUCGhAnoixdQCxvFy0Nrxd3abSw4SqZ4QPqnQoCegnU1ruJOnfmLGm/K9zwtClQL9S4JQKxR9RMxpFWzlJrQF4bXFpq715lwqi7YPBlZhxCqOtqjUSju54/xODhIlgri8i/AuThF3i3G8qjs7QScuSrg01AKtr27TVIwy1nWtKxRHYa5szWa5YpLZoatkLUaBVyKO39nZ8Sqh4gZDQ95H5PIgJbPjNHQzGktJCK5/pPG/r9n5sMQE3t5wTAmKQSxh/2G7A4hiQNM0k1eJYoyusGF2lLkxphJH5LJIGof95TBP1T/+8L5npeflqBIno7GZBBv8XEvo33WXS04IBvw7bPQnb6o8KtPXy4XfU0roXExjRC6dNjgkFc2YtklK8QxTiqnj7TXqdX5+9vHs6P3R2U+bTtC0ZGAArrAVeiqqL9ys5U4YXYmRw+qFbHzD820KYanbe1Ac1WAWHEknNACXqfM/ebUCBdjtvuzO29B6iZLlXssrm/uqOeZW61C1zu3Wlmr9JUvtdke1v/jyj3ut4qCPpDT5SOXyKbrWq+d0Bbcqbuz+PEKdv73p/Kex/v9O54/bfmf8qtf1OWZcYnlA0TUMwFlwvmS9bteBbdG0p/mYwQAIvoaPP7yX8AWDRhKjJySrUJ1xeXac+Uua8jRIYw/2IfMXFM/K4yMIEA8WQmsUqbx5XR5hirT5+NCWrJX0h/j70rULlzMal8m96D4iIb6BgUhfnuk7XW9vOEWB6gZ5DYABIiGom6aqWV5RVDk5vsm1ohTEZDJxR+fs/HT8at+bTCZCLu5FG4JG52JEH8JAnmfv3r3bOfhw+Pbi2/cfDv58sXVbzHStOidmsmWvcVTAjqW1XVI87Iu24dZtoHOIdb8rW/pd0VshJnG3t6s3Ls1Z5q7GWLA7+nky3vY+Z6VHJ++PTt5eyAX/U0vNV5kv7/MXppWhUbY/v3jxAlx/29vqzpM2OP3Fl8OtXXk5zfEsMBvqtYJ6XYGygXYV0K4N5O73Op3O3cXFxd35K/FfiUCHjhV2CRVl+ZzZMo6465wTxyhpUaz2QRsi8u1f8pJWG6a/nHL1ZEz0xRHj5d97+riZgitIRHLDQAR9NV5+Kg7R9rZXE7rcNQMFOYrG1TrB9JdjGED3Z9fd7wlDdzf0tj3Xf+Vp8yPwKkHW9JdjrzF5HrVhObuR1wLGekg/EVbEbaLfmOfGV9JULmc3OaZC6s5lRDcae7U7APLF1CKKMbgF24xLLp40YcxfZmzhTvrdrdsSapkuXW89nHjVPFzVZMm3f6kuVPwzRbVX6y3E9EmJ6ZMQ01W8B5+EdIqZOH1p24QTwYUSNY/yhlK0cuOrWOT7cezuNEBrZeI0w3ZnY63DYJkepmSYGMecZteaZ6Goind7jyTbr5HdRFX0VhdYqZHkROTlD2lRH6rtyNRASXPjuneesGpr71Z1R7vkWO+rc/bKc0fnr84743O2vXFjlZhpBTP0x9vn/kO4YokC8+5ODN2ktnliGNa2phio6412xzk3uvC6UlSsEGEfRDKRxsebIMQeO1stsTzO/PAe9sFJY3kWnsVOHUnsF5IlxzLkKFCsWZ6zV5oZ3rnfLe65bCIln7VqgvvFz9HueCNiXmjjOX9KDyDG3u8ZorgbvZLi9LptcJzN26DBIAkBbMOu9wij9Giq/ZKqZewUWSEHZeSMQQRA3lkzf7lC1QYSkb0eCl6+LOmNIhKO5X2hgmaDBlq79/GrrqBVFtUIvnGhNej6wouhhBbJyzdRefxKskQeugaEr/vdOMpPiyOrzXuaDW52W5/BKSUzkherDRoNFmNdLZI+s03l72Eon/1eq5SngTCQ4OpYuwyrRPuy3K3nI3f08/lY2InxueuOfvbET0+GxkkbeBuySnSsI9HMZxxRzv4a8YXrcBwjkWl5UgdQntVjXQeRT5lbECKOOhmN9dG8zDvdrDiYV3/LGwZIqIolAJeIaZCn0ycb6UOr5bk65XSzalWqwqhff3X97X3v118Fa5w+4zS6xDIC1j/NKFhFvhJB/SyQZGEGJxIRJ8OiWFPFLnAtTD1cFeHiQoJfXCjgTMJlFZru6OdXQraaYjkHE+xPQhvYeHvfc/cH5+yuP6VDTyGg4Z8EApLxV55//oAZTym+L//cGI4XeU4tFrdZ35RkRnnG1a5nWtHY2LuNpOws7lG01s+emWmYcde1OBDfmNpfF8fmx4ducYVIQBr7NYABXJeCcPtZnGfl/fNuFg/1npTUE0OwRIrH8TwTOTWR0yciL0a7nS/HBgHV8EQi9Jy9Ou/uD8/J/oOIeyZzA6PQdN51lxTflWbzLovv0vhOzehuQb2hptLvbtmZqMCVwAKkn/8sYftbdnqb05lSm4zCvKtMw5iAwNhWuNUpiB53f/AwDU9zoqZXZ6dSrVhNqUJdxTpEHLuc6eK61waSXptdXht4GsrbA0UbSa/9Oebvsjj+CSPqKizRdJwSvjD+ViS8NoTcJBBW0UMLObRR0YrlzzJncZpS11Uz6kDIPejCN19/pc4FrDszMIBQPuQIUIzPogTr63UOJp2Pp04bbmGRZrQHzutOGM0j7rQhiUjGsdUkYHZf91T2URj3vCQqpzYYyNcdkzMxqzZs3fK18A5F567o/AkzjmkdoA9/EN1bt+KvtWpD81T2F9MXvKhPPxH86oHDFikVUw3RqgcOyRJMo8BpwwojajTkl9TzUvLhm7M39TqysCX8UFdGaP7D+KxPu/oxG/3cSz+valffl+l3VOoVVVsencMAbtfqbpYw5+rSlfrFguITOYitSADFgc4CkTDGBynh9EdEmVt5/j2Tb2IYp5VwQ6xnoYqetaKB4UwYp3ZlR5JbwLbsCRaIHqQhfsPdyPPgP8DOzTv9r1ZiW/g81bLa/drzlyg8FYGO+03bOKNbm6oqhpot3P94+uHEZxIzmq1cZn4kRiUDrPKZGMksXZxB1yjikC3DQ8TRO5ommkm5vs4oZouDjOafMbKe19udxjPFz/mO0suXhYZ4D11KkaG6NdBjR9jwMqlKdPNXHup0PcG+AyRiYq7e71R1UJfLz07dy8p7DhjApR8jxmVE8mHmOhfmy6BIpmud3XrFkDOJyrKpEr0bydRyz1LghM1hoEUc4uIeh4m204bI82raOErYvA2cjc2XlXnfZVtutbGlDfLg95jNPzLqBvVVBo9aZT5CUJ1hG4LaWq1MIMQ03ZV5QB0QeuC8ISlZJWnGnLFlikdBu9K5flacdt3zOAjXPCOOYQDY54jOMfeDOGWYcdfxrWTBXPZzHNv7EvtLKh8OHeIZymLuWp4pk4/XfJFsMMz9jOryyOaMiB2630nrd/b2/RuRaUCvdr4tEq29Z8LEV3S2ahKuCpnmltgIIk9kLWfXSiWvRpPgYutW9K0nY09dfhJ/jYWLxcF3+MaE2d4WUHrByq5fjVrJRYxJawx3d/CHr7/RVzyLXl72fv2V5cXVhCRIwKkC2ckFP8fkAPEzNI1xzmLtujSE+Yd8dS3IDe0vfljeYFd6g4Ect5ZW1ArOu6rgHEjgT3VgYx2XMIAJl9nCxdbtp/WkuZ7w/GrELwWPU8IjUi0vG8X/fFsXZqE0TaVIEjXe7mTseZso8ShUl8Q3T0wPyW9ENs/oOL8doo1Ewuabqeu3obcQhT0xVrv4EExPKdKncdl0kiW9/BXEJxF4RjzGvVLHBGvaULwokhNSL3Z7YmICQX+0oAectfMvKPWE481dbrV6mSgNe90GeiBvWA2aKrHlVkhyGSb5fmguveVyCtqQPFJOJc0NhbacJm9DktXEEGyq5h2qms8t5N8e0ZLIGKY9SDKDpYK0wcSEsyLkrZGV7DLPGM1/ibQEj6kAVr7GkMtfkW8Ym+vlqM/mNRzlUIwuH1N8qzl7IyCyLIv9maGpepGvdTbCrMOnabjKHQKf2h8O0vX3+m3SyudNyg/keNAxvjTjef4spW9RoEqkGx7vbrrXwalZL6c+w/wNVxcUsevIele++XRsPiJZMrZw9LdQ5Ovl/FVs3cFVP55ZkjJ3Hq3cj+LhsI9gQfFs0HqxdVtgrY1PsKgnuA8N6BjPjIqx5YdaGjv6XTTsd8XwPMyrgYwjLu8t2s2ctYYd2WjYRj61rgnRSvFvs25ZPfYNDiRjwdwfa43BhAsly68ga1VwR20gYykNgTYiY2lk5bXMnsij1Lef1OlL+abisCDAbU2S15MFofITBDXLVu33gyYDoHdJcYVQKDFv/L5defW9Slh/uOruTtAZwoZ+b1MHDIDzTbeSackD2rSbuPEJzxsBcJM/zyu/3VQ5opefsniQe2qvWnyhn80X+pl8oRv5siUyMGHIXlQtG3A6sizF2PHu52EgiwXUn99jbSo8DFDJxQDxDeyTn8+sfepO7FungYHMg+qV2YK+Ut7GSxGNY3DWNEJszbngf7zpC6U10CZp5J/7KF9byBKep96K6nsuF4432hkbXxxY0jTAjIlQ/y8ZzjCz8ni+WuJ0BsJgRWReFFFkvuZkJMSziODQEctphBFmxBRJtRhTRTIr6FV65mcO1htm+HaZBovvEFvg++ZYharOMluGEuSAU7eOUp+jSc+epZkf04jwHzFlUUqOyCwt+Fz44Dnm2gF/uzoKXedKAXciMkvr32DUpOC1vwMdOFtgiiFikJJ4BSmR93jJHK4xBIgAp1m8AnyF9UuDNIbf/vN/h+sF5gtMBRSiGOZpGkJKAV9Fse/sPVv/vwAAAP//RfiVmGxcAAA=
*/'] |