w8 · tx · 5kX···7fg

tx · 5kXvuNXuHnR48SPhf4ffSCSz5SDzhS1g8ehCzuPDv7fg

3N18S8xfWJYHVuGfJcpcPVh7LsnqR9hKTcc:  -0.01400000 Waves

2019.09.08 13:43 [666991] smart account 3N18S8xfWJYHVuGfJcpcPVh7LsnqR9hKTcc > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5kXvuNXuHnR48SPhf4ffSCSz5SDzhS1g8ehCzuPDv7fg",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1567939414558,
    "version": 1,
    "sender": "3N18S8xfWJYHVuGfJcpcPVh7LsnqR9hKTcc",
    "senderPublicKey": "9cETBksYN8YMHGvDB6BEqmH9HScpCMBRZwnjCviRQ9aA",
    "proofs": [
        "4xPxCZS4iRUWBrTcuhcsKSR4tGDSmhcGKihk1SpPYvKdwsgufzsnFmHwtD8xK4m8LGcN2FUKeYzy9v2tcmyEmP8e"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAVAAAAAAVQUklDRQAAAAAABfXhAAAAAAALUEFURU5UUFJJQ0UAAAAAAAvrwgAAAAAABk9SQUNMRQIAAAAjM012aXNEZkE2dk5nNGk2aUtZV1o4Yld2eVA0aW1mQmI5ZXEAAAAAA1dJTgIAAAADV0lOAAAAAARMT1NFAgAAAARMT1NFAAAAAAROT05FAgAAAARub25lAQAAAA5nZXROdW1iZXJCeUtleQAAAAEAAAADa2V5BAAAAANudW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAFAAAAA251bQEAAAALZ2V0U3RyQnlLZXkAAAABAAAAA2tleQQAAAADc3RyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBQAAAANzdHIBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgMJAABmAAAAAgUAAAACeDEFAAAAAngyBwMDCQAAAAAAAAIFAAAAAngxBQAAAAJ4MgkAAGYAAAACBQAAAAJ5MQUAAAACeTIHBwYBAAAADnZhbGlkYXRlQ29vcmRzAAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgMJAQAAAAEhAAAAAQkBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIHAwkBAAAAASEAAAABCQEAAAARdmFsaWRhdGVUd29Db29yZHMAAAAEBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwcDCQEAAAABIQAAAAEJAQAAABF2YWxpZGF0ZVR3b0Nvb3JkcwAAAAQFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BwMJAQAAAAEhAAAAAQkBAAAAEXZhbGlkYXRlVHdvQ29vcmRzAAAABAUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUHAwkBAAAAASEAAAABCQEAAAARdmFsaWRhdGVUd29Db29yZHMAAAAEBQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgcGAQAAABBnZW5LZXlGcm9tQ29vcmRzAAAADAAAAAJ4MQAAAAJ5MQAAAAJ4MgAAAAJ5MgAAAAJ4MwAAAAJ5MwAAAAJ4NAAAAAJ5NAAAAAJ4NQAAAAJ5NQAAAAJ4NgAAAAJ5NgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAB3BhdGVudDoJAAGkAAAAAQUAAAACeDECAAAAASwJAAGkAAAAAQUAAAACeTECAAAAATsJAAGkAAAAAQUAAAACeDICAAAAASwJAAGkAAAAAQUAAAACeTICAAAAATsJAAGkAAAAAQUAAAACeDMCAAAAASwJAAGkAAAAAQUAAAACeTMCAAAAATsJAAGkAAAAAQUAAAACeDQCAAAAASwJAAGkAAAAAQUAAAACeTQCAAAAATsJAAGkAAAAAQUAAAACeDUCAAAAASwJAAGkAAAAAQUAAAACeTUCAAAAATsJAAGkAAAAAQUAAAACeDYCAAAAASwJAAGkAAAAAQUAAAACeTYBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQAAAAdhY2NvdW50CQABLAAAAAIFAAAAB2FjY291bnQCAAAACF9iYWxhbmNlAQAAABNnZXRWYWx1ZUJhbGFuY2VVc2VyAAAAAQAAAAdhY2NvdW50CQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAARZ2V0S2V5QmFsYW5jZVVzZXIAAAABBQAAAAdhY2NvdW50AQAAAA5nZXRLZXlXaW5Db3VudAAAAAEAAAAEdXNlcgkAASwAAAACBQAAAAR1c2VyAgAAAAdfd2luY250AQAAABBnZXRWYWx1ZVdpbkNvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAOZ2V0S2V5V2luQ291bnQAAAABBQAAAAR1c2VyAQAAAA9nZXRLZXlMb3NlQ291bnQAAAABAAAABHVzZXIJAAEsAAAAAgUAAAAEdXNlcgIAAAAIX2xvc2VjbnQBAAAAEWdldFZhbHVlTG9zZUNvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAPZ2V0S2V5TG9zZUNvdW50AAAAAQUAAAAEdXNlcgEAAAAKZ2V0S2V5R2FtZQAAAAEAAAAEZ2FtZQkAASwAAAACAgAAAAVnYW1lXwUAAAAEZ2FtZQEAAAAMZ2V0VmFsdWVHYW1lAAAAAQAAAARnYW1lCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAKZ2V0S2V5R2FtZQAAAAEFAAAABGdhbWUBAAAAFGdldEtleUluc3VyYW5jZUNvdW50AAAAAQAAAAR1c2VyCQABLAAAAAIFAAAABHVzZXICAAAADl9pbnN1cmFuY2VfY250AQAAABZnZXRWYWx1ZUluc3VyYW5jZUNvdW50AAAAAQAAAAR1c2VyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAUZ2V0S2V5SW5zdXJhbmNlQ291bnQAAAABBQAAAAR1c2VyAAAABQAAAAFpAQAAAAZwYXRlbnQAAAAMAAAAAngxAAAAAnkxAAAAAngyAAAAAnkyAAAAAngzAAAAAnkzAAAAAng0AAAAAnk0AAAAAng1AAAAAnk1AAAAAng2AAAAAnk2BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAgY2FuIHVzZSBXQVZFUyBvbmx5IGF0IHRoZSBtb21lbnQEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDCQEAAAACIT0AAAACCAUAAAADcG10AAAABmFtb3VudAUAAAAFUFJJQ0UJAAACAAAAAQIAAAAwcHVyY2hhc2UgYW1vdW50IGNhbm5vdCBiZSBub3QgZXF1YWwgdG8gdGhlIHByaWNlAwkBAAAAASEAAAABCQEAAAAOdmFsaWRhdGVDb29yZHMAAAAMBQAAAAJ4MQUAAAACeTEFAAAAAngyBQAAAAJ5MgUAAAACeDMFAAAAAnkzBQAAAAJ4NAUAAAACeTQFAAAAAng1BQAAAAJ5NQUAAAACeDYFAAAAAnk2CQAAAgAAAAECAAAAGWludmFsaWQgY29vcmRpbmF0ZXMgb3JkZXIDCQEAAAACIT0AAAACCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAQZ2VuS2V5RnJvbUNvb3JkcwAAAAwFAAAAAngxBQAAAAJ5MQUAAAACeDIFAAAAAnkyBQAAAAJ4MwUAAAACeTMFAAAAAng0BQAAAAJ5NAUAAAACeDUFAAAAAnk1BQAAAAJ4NgUAAAACeTYFAAAABE5PTkUJAAACAAAAAQIAAAAddGhpcyBwYXRlbnQgaXMgYWxyZWFkeSBleGlzdHMJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABBnZW5LZXlGcm9tQ29vcmRzAAAADAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgUAAAALdXNlckFkZHJlc3MFAAAAA25pbAAAAAFpAQAAAAlidXlQYXRlbnQAAAAMAAAAAngxAAAAAnkxAAAAAngyAAAAAnkyAAAAAngzAAAAAnkzAAAAAng0AAAAAnk0AAAAAng1AAAAAnk1AAAAAng2AAAAAnk2BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAgY2FuIHVzZSBXQVZFUyBvbmx5IGF0IHRoZSBtb21lbnQEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAEnBhdGVudE93bmVyQWRkcmVzcwkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAEGdlbktleUZyb21Db29yZHMAAAAMBQAAAAJ4MQUAAAACeTEFAAAAAngyBQAAAAJ5MgUAAAACeDMFAAAAAnkzBQAAAAJ4NAUAAAACeTQFAAAAAng1BQAAAAJ5NQUAAAACeDYFAAAAAnk2AwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAAC1BBVEVOVFBSSUNFCQAAAgAAAAECAAAAMHB1cmNoYXNlIGFtb3VudCBjYW5ub3QgYmUgbm90IGVxdWFsIHRvIHRoZSBwcmljZQMJAQAAAAEhAAAAAQkBAAAADnZhbGlkYXRlQ29vcmRzAAAADAUAAAACeDEFAAAAAnkxBQAAAAJ4MgUAAAACeTIFAAAAAngzBQAAAAJ5MwUAAAACeDQFAAAAAnk0BQAAAAJ4NQUAAAACeTUFAAAAAng2BQAAAAJ5NgkAAAIAAAABAgAAABlpbnZhbGlkIGNvb3JkaW5hdGVzIG9yZGVyAwkAAAAAAAACBQAAABJwYXRlbnRPd25lckFkZHJlc3MFAAAABE5PTkUJAAACAAAAAQIAAAAXdGhlcmUgaXMgbm8gc3VjaCBwYXRlbnQDCQAAAAAAAAIFAAAAEnBhdGVudE93bmVyQWRkcmVzcwUAAAALdXNlckFkZHJlc3MJAAACAAAAAQIAAAAeeW91IGNhbm5vdCBidXkgeW91ciBvd24gcGF0ZW50CQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAQZ2VuS2V5RnJvbUNvb3JkcwAAAAwFAAAAAngxBQAAAAJ5MQUAAAACeDIFAAAAAnkyBQAAAAJ4MwUAAAACeTMFAAAAAng0BQAAAAJ5NAUAAAACeDUFAAAAAnk1BQAAAAJ4NgUAAAACeTYFAAAAC3VzZXJBZGRyZXNzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAARZ2V0S2V5QmFsYW5jZVVzZXIAAAABBQAAABJwYXRlbnRPd25lckFkZHJlc3MJAABkAAAAAgkBAAAAE2dldFZhbHVlQmFsYW5jZVVzZXIAAAABBQAAABJwYXRlbnRPd25lckFkZHJlc3MIBQAAAANwbXQAAAAGYW1vdW50BQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAAABAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAdiYWxhbmNlCQEAAAATZ2V0VmFsdWVCYWxhbmNlVXNlcgAAAAEFAAAAC3VzZXJBZGRyZXNzAwkAAGcAAAACAAAAAAAAAAAABQAAAAdiYWxhbmNlCQAAAgAAAAECAAAAFGluc3VmZmljaWVudCBiYWxhbmNlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEWdldEtleUJhbGFuY2VVc2VyAAAAAQUAAAALdXNlckFkZHJlc3MAAAAAAAAAAAAFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAAC3VzZXJBZGRyZXNzBQAAAAdiYWxhbmNlBQAAAAR1bml0BQAAAANuaWwAAAABaQEAAAAKZ2FtZVJlcG9ydAAAAAMAAAAEZ2FtZQAAAAZ3aW5uZXIAAAAFbG9zZXIEAAAADG9yYWNsZUFkZHJlcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAgUAAAAMb3JhY2xlQWRkcmVzBQAAAAZPUkFDTEUJAAACAAAAAQIAAAAqb25seSBvcmFjbGUgY2FuIGluZm9ybSBhYm91dCBnYW1lcyByZXN1bHRzAwkAAAAAAAACBQAAAAZ3aW5uZXIFAAAABWxvc2VyCQAAAgAAAAECAAAAIndpbm5lciBhbmQgbG9zZXIgbXVzdCBiZSBkaWZmZXJlbnQDCQEAAAACIT0AAAACCQEAAAAMZ2V0VmFsdWVHYW1lAAAAAQUAAAAEZ2FtZQUAAAAETk9ORQkAAAIAAAABAgAAACF0aGlzIGdhbWUgaGFzIGFscmVhZHkgYmVlbiBwbGF5ZWQJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAApnZXRLZXlHYW1lAAAAAQUAAAAEZ2FtZQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAGd2lubmVyAgAAAAUtV0lOOwUAAAAFbG9zZXICAAAABS1MT1NFCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAOZ2V0S2V5V2luQ291bnQAAAABBQAAAAZ3aW5uZXIJAABkAAAAAgkBAAAAEGdldFZhbHVlV2luQ291bnQAAAABBQAAAAZ3aW5uZXIAAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA9nZXRLZXlMb3NlQ291bnQAAAABBQAAAAVsb3NlcgkAAGQAAAACCQEAAAARZ2V0VmFsdWVMb3NlQ291bnQAAAABBQAAAAVsb3NlcgAAAAAAAAAAAQUAAAADbmlsAAAAAWkBAAAABmluc3VyZQAAAAAEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50BAAAAA5pbnN1cmFuY2VQcmljZQkAAGsAAAADBQAAAAVQUklDRQAAAAAAAAAABwAAAAAAAAAAZAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAgY2FuIHVzZSBXQVZFUyBvbmx5IGF0IHRoZSBtb21lbnQEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDCQEAAAACIT0AAAACCAUAAAADcG10AAAABmFtb3VudAUAAAAOaW5zdXJhbmNlUHJpY2UJAAACAAAAAQIAAABDaW5zdXJhbmNlIHBheW1lbnQgYW1vdW50IGNhbm5vdCBiZSBub3QgZXF1YWwgdG8gdGhlIGluc3VyYW5jZSBwcmljZQkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAFGdldEtleUluc3VyYW5jZUNvdW50AAAAAQUAAAALdXNlckFkZHJlc3MJAABkAAAAAgkBAAAAFmdldFZhbHVlSW5zdXJhbmNlQ291bnQAAAABBQAAAAt1c2VyQWRkcmVzcwAAAAAAAAAAAQUAAAADbmlsAAAAABn1AZY=",
    "chainId": 84,
    "height": 666991,
    "spentComplexity": 0
}

View: original | compacted
Prev: Vzswnt7gd2A5f1f7uwyfSoRmTwGhiLfkLkfqHH6kP2E
Next: CJBoNBF5kKKjWqhLQ2E123KMaCxZM2rei8qyxka2jjKs

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

Old	New		Differences
57	57		else true
58	58
59	59
60		-	func genKeyFromCoords (x1,y1,x2,y2,x3,y3,x4,y4,x5,y5,x6,y6) = ((((((((((((((((((((((toString(x1) + ",") + toString(y1)) + ";") + toString(x2)) + ",") + toString(y2)) + ";") + toString(x3)) + ",") + toString(y3)) + ";") + toString(x4)) + ",") + toString(y4)) + ";") + toString(x5)) + ",") + toString(y5)) + ";") + toString(x6)) + ",") + toString(y6))
	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	61
62	62
63	63		func getKeyBalanceUser (account) = (account + "_balance")

82	82
83	83
84	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))
85	91
86	92
87	93		@Callable(i)

149	155		}
150	156
151	157
	158	+
	159	+	@Callable(i)
	160	+	func insure () = {
	161	+	let pmt = extract(i.payment)
	162	+	let insurancePrice = fraction(PRICE, 7, 100)
	163	+	if (isDefined(pmt.assetId))
	164	+	then throw("can use WAVES only at the moment")
	165	+	else {
	166	+	let userAddress = toBase58String(i.caller.bytes)
	167	+	if ((pmt.amount != insurancePrice))
	168	+	then throw("insurance payment amount cannot be not equal to the insurance price")
	169	+	else WriteSet([DataEntry(getKeyInsuranceCount(userAddress), (getValueInsuranceCount(userAddress) + 1))])
	170	+	}
	171	+	}
	172	+
	173	+

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

github/deemru/w8io/3ef1775 
50.71 ms ◑