tx · DMvZ9y7UFfMo6rVxRes7G4KDdwWAhoVPuFhV6ZNVKCq3

3N8BfhN3724vf6msq4iBVBGuBZywTp5Ea1Y:  -0.01000000 Waves

2019.09.08 16:33 [667162] smart account 3N8BfhN3724vf6msq4iBVBGuBZywTp5Ea1Y > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DMvZ9y7UFfMo6rVxRes7G4KDdwWAhoVPuFhV6ZNVKCq3",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1567948732156,
    "version": 1,
    "sender": "3N8BfhN3724vf6msq4iBVBGuBZywTp5Ea1Y",
    "senderPublicKey": "5AGFZr7rSXB4aVJ5anpwdR6kPiQnNtxR6PtZaRyGMPsV",
    "proofs": [
        "2y67Th51ygR7zSRQt2nEQGjb5CAFgL5mVvztm1kpH5jPcP6wLtdgC89w65HZ9hXtE5Nenu2RNU8UPQ4gmXXc2E8B"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAXAAAAAAVQUklDRQAAAAAABfXhAAAAAAALUEFURU5UUFJJQ0UAAAAAAAvrwgAAAAAABk9SQUNMRQIAAAAjM012aXNEZkE2dk5nNGk2aUtZV1o4Yld2eVA0aW1mQmI5ZXEAAAAAA1dJTgIAAAADV0lOAAAAAARMT1NFAgAAAARMT1NFAAAAAAROT05FAgAAAARub25lAQAAAA5nZXROdW1iZXJCeUtleQAAAAEAAAADa2V5BAAAAANudW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAFAAAAA251bQEAAAALZ2V0U3RyQnlLZXkAAAABAAAAA2tleQQAAAADc3RyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBQAAAANzdHIBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgMJAABmAAAAAgUAAAACeDEFAAAAAngyBwMDCQAAAAAAAAIFAAAAAngxBQAAAAJ4MgkAAGYAAAACBQAAAAJ5MQUAAAACeTIHBwYBAAAADnZhbGlkYXRlQ29vcmRzAAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgMJAQAAAAEhAAAAAQkBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIHAwkBAAAAASEAAAABCQEAAAARdmFsaWRhdGVUd29Db29yZHMAAAAEBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwcDCQEAAAABIQAAAAEJAQAAABF2YWxpZGF0ZVR3b0Nvb3JkcwAAAAQFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BwMJAQAAAAEhAAAAAQkBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUHAwkBAAAAASEAAAABCQEAAAARdmFsaWRhdGVUd29Db29yZHMAAAAEBQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgcGAQAAABBnZW5LZXlGcm9tQ29vcmRzAAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAB3BhdGVudDoJAAGkAAAAAQUAAAACeDECAAAAASwJAAGkAAAAAQUAAAACeTECAAAAATsJAAGkAAAAAQUAAAACeDICAAAAASwJAAGkAAAAAQUAAAACeTICAAAAATsJAAGkAAAAAQUAAAACeDMCAAAAASwJAAGkAAAAAQUAAAACeTMCAAAAATsJAAGkAAAAAQUAAAACeDQCAAAAASwJAAGkAAAAAQUAAAACeTQCAAAAATsJAAGkAAAAAQUAAAACeDUCAAAAASwJAAGkAAAAAQUAAAACeTUCAAAAATsJAAGkAAAAAQUAAAACeDYCAAAAASwJAAGkAAAAAQUAAAACeTYBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQAAAAdhY2NvdW50CQABLAAAAAIFAAAAB2FjY291bnQCAAAACF9iYWxhbmNlAQAAABNnZXRWYWx1ZUJhbGFuY2VVc2VyAAAAAQAAAAdhY2NvdW50CQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAARZ2V0S2V5QmFsYW5jZVVzZXIAAAABBQAAAAdhY2NvdW50AQAAAA5nZXRLZXlXaW5Db3VudAAAAAEAAAAEdXNlcgkAASwAAAACBQAAAAR1c2VyAgAAAAdfd2luY250AQAAABBnZXRWYWx1ZVdpbkNvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAOZ2V0S2V5V2luQ291bnQAAAABBQAAAAR1c2VyAQAAAA9nZXRLZXlMb3NlQ291bnQAAAABAAAABHVzZXIJAAEsAAAAAgUAAAAEdXNlcgIAAAAIX2xvc2VjbnQBAAAAEWdldFZhbHVlTG9zZUNvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAPZ2V0S2V5TG9zZUNvdW50AAAAAQUAAAAEdXNlcgEAAAAKZ2V0S2V5R2FtZQAAAAEAAAAEZ2FtZQkAASwAAAACAgAAAAVnYW1lXwUAAAAEZ2FtZQEAAAAMZ2V0VmFsdWVHYW1lAAAAAQAAAARnYW1lCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAKZ2V0S2V5R2FtZQAAAAEFAAAABGdhbWUBAAAAFGdldEtleUluc3VyYW5jZUNvdW50AAAAAQAAAAR1c2VyCQABLAAAAAIFAAAABHVzZXICAAAADl9pbnN1cmFuY2VfY250AQAAABZnZXRWYWx1ZUluc3VyYW5jZUNvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAUZ2V0S2V5SW5zdXJhbmNlQ291bnQAAAABBQAAAAR1c2VyAQAAABVnZXRLZXlVc2VyUGF0ZW50Q291bnQAAAABAAAABHVzZXIJAAEsAAAAAgUAAAAEdXNlcgIAAAALX3BhdGVudF9jbnQBAAAAF2dldFZhbHVlVXNlclBhdGVudENvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5VXNlclBhdGVudENvdW50AAAAAQUAAAAEdXNlcgAAAAUAAAABaQEAAAAGcGF0ZW50AAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAIGNhbiB1c2UgV0FWRVMgb25seSBhdCB0aGUgbW9tZW50BAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAABVBSSUNFCQAAAgAAAAECAAAAMHB1cmNoYXNlIGFtb3VudCBjYW5ub3QgYmUgbm90IGVxdWFsIHRvIHRoZSBwcmljZQMJAQAAAAEhAAAAAQkBAAAADnZhbGlkYXRlQ29vcmRzAAAADAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgkAAAIAAAABAgAAABlpbnZhbGlkIGNvb3JkaW5hdGVzIG9yZGVyAwkBAAAAAiE9AAAAAgkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEGdlbktleUZyb21Db29yZHMAAAAMBQAAAAJ4MQUAAAACeTEFAAAAAngyBQAAAAJ5MgUAAAACeDMFAAAAAnkzBQAAAAJ4NAUAAAACeTQFAAAAAng1BQAAAAJ5NQUAAAACeDYFAAAAAnk2BQAAAAROT05FCQAAAgAAAAECAAAAHXRoaXMgcGF0ZW50IGlzIGFscmVhZHkgZXhpc3RzAwkAAGcAAAACCQEAAAAXZ2V0VmFsdWVVc2VyUGF0ZW50Q291bnQAAAABBQAAAAt1c2VyQWRkcmVzcwAAAAAAAAAABQkAAAIAAAABAgAAACN5b3UgY2Fubm90IGhhdmUgbW9yZSB0aGFuIDIgcGF0ZW50cwkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEGdlbktleUZyb21Db29yZHMAAAAMBQAAAAJ4MQUAAAACeTEFAAAAAngyBQAAAAJ5MgUAAAACeDMFAAAAAnkzBQAAAAJ4NAUAAAACeTQFAAAAAng1BQAAAAJ5NQUAAAACeDYFAAAAAnk2BQAAAAt1c2VyQWRkcmVzcwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleVVzZXJQYXRlbnRDb3VudAAAAAEFAAAAC3VzZXJBZGRyZXNzCQAAZAAAAAIJAQAAABdnZXRWYWx1ZVVzZXJQYXRlbnRDb3VudAAAAAEFAAAAC3VzZXJBZGRyZXNzAAAAAAAAAAABBQAAAANuaWwAAAABaQEAAAAJYnV5UGF0ZW50AAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAIGNhbiB1c2UgV0FWRVMgb25seSBhdCB0aGUgbW9tZW50BAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAABJwYXRlbnRPd25lckFkZHJlc3MJAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABBnZW5LZXlGcm9tQ29vcmRzAAAADAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAGYW1vdW50BQAAAAtQQVRFTlRQUklDRQkAAAIAAAABAgAAADBwdXJjaGFzZSBhbW91bnQgY2Fubm90IGJlIG5vdCBlcXVhbCB0byB0aGUgcHJpY2UDCQEAAAABIQAAAAEJAQAAAA52YWxpZGF0ZUNvb3JkcwAAAAwFAAAAAngxBQAAAAJ5MQUAAAACeDIFAAAAAnkyBQAAAAJ4MwUAAAACeTMFAAAAAng0BQAAAAJ5NAUAAAACeDUFAAAAAnk1BQAAAAJ4NgUAAAACeTYJAAACAAAAAQIAAAAZaW52YWxpZCBjb29yZGluYXRlcyBvcmRlcgMJAAAAAAAAAgUAAAAScGF0ZW50T3duZXJBZGRyZXNzBQAAAAROT05FCQAAAgAAAAECAAAAF3RoZXJlIGlzIG5vIHN1Y2ggcGF0ZW50AwkAAAAAAAACBQAAABJwYXRlbnRPd25lckFkZHJlc3MFAAAAC3VzZXJBZGRyZXNzCQAAAgAAAAECAAAAHnlvdSBjYW5ub3QgYnV5IHlvdXIgb3duIHBhdGVudAkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEGdlbktleUZyb21Db29yZHMAAAAMBQAAAAJ4MQUAAAACeTEFAAAAAngyBQAAAAJ5MgUAAAACeDMFAAAAAnkzBQAAAAJ4NAUAAAACeTQFAAAAAng1BQAAAAJ5NQUAAAACeDYFAAAAAnk2BQAAAAt1c2VyQWRkcmVzcwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQUAAAAScGF0ZW50T3duZXJBZGRyZXNzCQAAZAAAAAIJAQAAABNnZXRWYWx1ZUJhbGFuY2VVc2VyAAAAAQUAAAAScGF0ZW50T3duZXJBZGRyZXNzCAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFWdldEtleVVzZXJQYXRlbnRDb3VudAAAAAEFAAAAC3VzZXJBZGRyZXNzCQAAZAAAAAIJAQAAABdnZXRWYWx1ZVVzZXJQYXRlbnRDb3VudAAAAAEFAAAAC3VzZXJBZGRyZXNzAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAVZ2V0S2V5VXNlclBhdGVudENvdW50AAAAAQUAAAAScGF0ZW50T3duZXJBZGRyZXNzCQAAZQAAAAIJAQAAABdnZXRWYWx1ZVVzZXJQYXRlbnRDb3VudAAAAAEFAAAAC3VzZXJBZGRyZXNzAAAAAAAAAAABBQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAAABAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAdiYWxhbmNlCQEAAAATZ2V0VmFsdWVCYWxhbmNlVXNlcgAAAAEFAAAAC3VzZXJBZGRyZXNzAwkAAGcAAAACAAAAAAAAAAAABQAAAAdiYWxhbmNlCQAAAgAAAAECAAAAFGluc3VmZmljaWVudCBiYWxhbmNlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQUAAAALdXNlckFkZHJlc3MAAAAAAAAAAAAFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAAC3VzZXJBZGRyZXNzBQAAAAdiYWxhbmNlBQAAAAR1bml0BQAAAANuaWwAAAABaQEAAAAKZ2FtZVJlcG9ydAAAAAMAAAAEZ2FtZQAAAAZ3aW5uZXIAAAAFbG9zZXIEAAAADG9yYWNsZUFkZHJlcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAgUAAAAMb3JhY2xlQWRkcmVzBQAAAAZPUkFDTEUJAAACAAAAAQIAAAAqb25seSBvcmFjbGUgY2FuIGluZm9ybSBhYm91dCBnYW1lcyByZXN1bHRzAwkAAAAAAAACBQAAAAZ3aW5uZXIFAAAABWxvc2VyCQAAAgAAAAECAAAAIndpbm5lciBhbmQgbG9zZXIgbXVzdCBiZSBkaWZmZXJlbnQDCQEAAAACIT0AAAACCQEAAAAMZ2V0VmFsdWVHYW1lAAAAAQUAAAAEZ2FtZQUAAAAETk9ORQkAAAIAAAABAgAAACF0aGlzIGdhbWUgaGFzIGFscmVhZHkgYmVlbiBwbGF5ZWQJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAApnZXRLZXlHYW1lAAAAAQUAAAAEZ2FtZQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAGd2lubmVyAgAAAAUtV0lOOwUAAAAFbG9zZXICAAAABS1MT1NFCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5V2luQ291bnQAAAABBQAAAAZ3aW5uZXIJAABkAAAAAgkBAAAAEGdldFZhbHVlV2luQ291bnQAAAABBQAAAAZ3aW5uZXIAAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA9nZXRLZXlMb3NlQ291bnQAAAABBQAAAAVsb3NlcgkAAGQAAAACCQEAAAARZ2V0VmFsdWVMb3NlQ291bnQAAAABBQAAAAVsb3NlcgAAAAAAAAAAAQUAAAADbmlsAAAAAWkBAAAABmluc3VyZQAAAAAEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50BAAAAA5pbnN1cmFuY2VQcmljZQkAAGsAAAADBQAAAAVQUklDRQAAAAAAAAAABwAAAAAAAAAAZAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAgY2FuIHVzZSBXQVZFUyBvbmx5IGF0IHRoZSBtb21lbnQEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDCQEAAAACIT0AAAACCAUAAAADcG10AAAABmFtb3VudAUAAAAOaW5zdXJhbmNlUHJpY2UJAAACAAAAAQIAAABDaW5zdXJhbmNlIHBheW1lbnQgYW1vdW50IGNhbm5vdCBiZSBub3QgZXF1YWwgdG8gdGhlIGluc3VyYW5jZSBwcmljZQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFGdldEtleUluc3VyYW5jZUNvdW50AAAAAQUAAAALdXNlckFkZHJlc3MJAABkAAAAAgkBAAAAFmdldFZhbHVlSW5zdXJhbmNlQ291bnQAAAABBQAAAAt1c2VyQWRkcmVzcwAAAAAAAAAAAQUAAAADbmlsAAAAANArdxk=",
    "chainId": 84,
    "height": 667162,
    "spentComplexity": 0
}

View: original | compacted
Prev: none
Next: 5UyF7wUzN9JoNpfTxzMkVcEjSZJBnCdTaE7yFKxaJKAq

Full: 

OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 3 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let PRICE = 100000000
5+
6+let PATENTPRICE = 200000000
7+
8+let ORACLE = "3MvisDfA6vNg4i6iKYWZ8bWvyP4imfBb9eq"
9+
10+let WIN = "WIN"
11+
12+let LOSE = "LOSE"
13+
14+let NONE = "none"
15+
16+func getNumberByKey (key) = {
17+    let num =     match getInteger(this, key) {
18+        case a: Int => 
19+            a
20+        case _ => 
21+            0
22+    }
23+    num
24+    }
25+
26+
27+func getStrByKey (key) = {
28+    let str =     match getString(this, key) {
29+        case a: String => 
30+            a
31+        case _ => 
32+            NONE
33+    }
34+    str
35+    }
36+
37+
38+func validateTwoCoords (x1,y1,x2,y2) = if ((x1 > x2))
39+    then false
40+    else if (if ((x1 == x2))
41+        then (y1 > y2)
42+        else false)
43+        then false
44+        else true
45+
46+
47+func validateCoords (x1,y1,x2,y2,x3,y3,x4,y4,x5,y5,x6,y6) = if (!(validateTwoCoords(x1, y1, x2, y2)))
48+    then false
49+    else if (!(validateTwoCoords(x2, y2, x3, y3)))
50+        then false
51+        else if (!(validateTwoCoords(x3, y3, x4, y4)))
52+            then false
53+            else if (!(validateTwoCoords(x4, y4, x5, y5)))
54+                then false
55+                else if (!(validateTwoCoords(x5, y5, x6, y6)))
56+                    then false
57+                    else true
58+
59+
60+func genKeyFromCoords (x1,y1,x2,y2,x3,y3,x4,y4,x5,y5,x6,y6) = ((((((((((((((((((((((("patent:" + toString(x1)) + ",") + toString(y1)) + ";") + toString(x2)) + ",") + toString(y2)) + ";") + toString(x3)) + ",") + toString(y3)) + ";") + toString(x4)) + ",") + toString(y4)) + ";") + toString(x5)) + ",") + toString(y5)) + ";") + toString(x6)) + ",") + toString(y6))
61+
62+
63+func getKeyBalanceUser (account) = (account + "_balance")
64+
65+
66+func getValueBalanceUser (account) = getNumberByKey(getKeyBalanceUser(account))
67+
68+
69+func getKeyWinCount (user) = (user + "_wincnt")
70+
71+
72+func getValueWinCount (user) = getNumberByKey(getKeyWinCount(user))
73+
74+
75+func getKeyLoseCount (user) = (user + "_losecnt")
76+
77+
78+func getValueLoseCount (user) = getNumberByKey(getKeyLoseCount(user))
79+
80+
81+func getKeyGame (game) = ("game_" + game)
82+
83+
84+func getValueGame (game) = getStrByKey(getKeyGame(game))
85+
86+
87+func getKeyInsuranceCount (user) = (user + "_insurance_cnt")
88+
89+
90+func getValueInsuranceCount (user) = getNumberByKey(getKeyInsuranceCount(user))
91+
92+
93+func getKeyUserPatentCount (user) = (user + "_patent_cnt")
94+
95+
96+func getValueUserPatentCount (user) = getNumberByKey(getKeyUserPatentCount(user))
97+
98+
99+@Callable(i)
100+func patent (x1,y1,x2,y2,x3,y3,x4,y4,x5,y5,x6,y6) = {
101+    let pmt = extract(i.payment)
102+    if (isDefined(pmt.assetId))
103+        then throw("can use WAVES only at the moment")
104+        else {
105+            let userAddress = toBase58String(i.caller.bytes)
106+            if ((pmt.amount != PRICE))
107+                then throw("purchase amount cannot be not equal to the price")
108+                else if (!(validateCoords(x1, y1, x2, y2, x3, y3, x4, y4, x5, y5, x6, y6)))
109+                    then throw("invalid coordinates order")
110+                    else if ((getStrByKey(genKeyFromCoords(x1, y1, x2, y2, x3, y3, x4, y4, x5, y5, x6, y6)) != NONE))
111+                        then throw("this patent is already exists")
112+                        else if ((getValueUserPatentCount(userAddress) >= 5))
113+                            then throw("you cannot have more than 2 patents")
114+                            else WriteSet([DataEntry(genKeyFromCoords(x1, y1, x2, y2, x3, y3, x4, y4, x5, y5, x6, y6), userAddress), DataEntry(getKeyUserPatentCount(userAddress), (getValueUserPatentCount(userAddress) + 1))])
115+            }
116+    }
117+
118+
119+
120+@Callable(i)
121+func buyPatent (x1,y1,x2,y2,x3,y3,x4,y4,x5,y5,x6,y6) = {
122+    let pmt = extract(i.payment)
123+    if (isDefined(pmt.assetId))
124+        then throw("can use WAVES only at the moment")
125+        else {
126+            let userAddress = toBase58String(i.caller.bytes)
127+            let patentOwnerAddress = getStrByKey(genKeyFromCoords(x1, y1, x2, y2, x3, y3, x4, y4, x5, y5, x6, y6))
128+            if ((pmt.amount != PATENTPRICE))
129+                then throw("purchase amount cannot be not equal to the price")
130+                else if (!(validateCoords(x1, y1, x2, y2, x3, y3, x4, y4, x5, y5, x6, y6)))
131+                    then throw("invalid coordinates order")
132+                    else if ((patentOwnerAddress == NONE))
133+                        then throw("there is no such patent")
134+                        else if ((patentOwnerAddress == userAddress))
135+                            then throw("you cannot buy your own patent")
136+                            else WriteSet([DataEntry(genKeyFromCoords(x1, y1, x2, y2, x3, y3, x4, y4, x5, y5, x6, y6), userAddress), DataEntry(getKeyBalanceUser(patentOwnerAddress), (getValueBalanceUser(patentOwnerAddress) + pmt.amount)), DataEntry(getKeyUserPatentCount(userAddress), (getValueUserPatentCount(userAddress) + 1)), DataEntry(getKeyUserPatentCount(patentOwnerAddress), (getValueUserPatentCount(userAddress) - 1))])
137+            }
138+    }
139+
140+
141+
142+@Callable(i)
143+func withdraw () = {
144+    let userAddress = toBase58String(i.caller.bytes)
145+    let balance = getValueBalanceUser(userAddress)
146+    if ((0 >= balance))
147+        then throw("insufficient balance")
148+        else ScriptResult(WriteSet([DataEntry(getKeyBalanceUser(userAddress), 0)]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), balance, unit)]))
149+    }
150+
151+
152+
153+@Callable(i)
154+func gameReport (game,winner,loser) = {
155+    let oracleAddres = toBase58String(i.caller.bytes)
156+    if ((oracleAddres != ORACLE))
157+        then throw("only oracle can inform about games results")
158+        else if ((winner == loser))
159+            then throw("winner and loser must be different")
160+            else if ((getValueGame(game) != NONE))
161+                then throw("this game has already been played")
162+                else WriteSet([DataEntry(getKeyGame(game), (((winner + "-WIN;") + loser) + "-LOSE")), DataEntry(getKeyWinCount(winner), (getValueWinCount(winner) + 1)), DataEntry(getKeyLoseCount(loser), (getValueLoseCount(loser) + 1))])
163+    }
164+
165+
166+
167+@Callable(i)
168+func insure () = {
169+    let pmt = extract(i.payment)
170+    let insurancePrice = fraction(PRICE, 7, 100)
171+    if (isDefined(pmt.assetId))
172+        then throw("can use WAVES only at the moment")
173+        else {
174+            let userAddress = toBase58String(i.caller.bytes)
175+            if ((pmt.amount != insurancePrice))
176+                then throw("insurance payment amount cannot be not equal to the insurance price")
177+                else WriteSet([DataEntry(getKeyInsuranceCount(userAddress), (getValueInsuranceCount(userAddress) + 1))])
178+            }
179+    }
180+
181+
github/deemru/w8io/3ef1775 
30.18 ms ◑