w8 · tx · 9AR···5oX

tx · 9ARKRCdVBTtFf7FnRHKMnRjsYhaQScvgxPN7H8tf95oX

3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB:  -0.01400000 Waves

2020.01.17 07:13 [857668] smart account 3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9ARKRCdVBTtFf7FnRHKMnRjsYhaQScvgxPN7H8tf95oX",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1579234393206,
    "version": 1,
    "sender": "3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB",
    "senderPublicKey": "Gd5NihbWQoWuTnSvq25TuV2BYZG4U1e9KDqZn9zBPix7",
    "proofs": [
        "4CLWbLSGiAErLgsDAG8Dz619uXSZHc2MypvBo4segKHTgTf1MxFz47E4xaJP7FKEE5qBCZMgpqkSBg8KEGSuughw"
    ],
    "script": "base64:AAIDAAAAAAAAABEIARIGCgQICAgIEgUKAwgICAAAAAIAAAAACHZlcmlmaWVyCQEAAAAHZXh0cmFjdAAAAAEJAQAAABFhZGRyZXNzRnJvbVN0cmluZwAAAAECAAAAIzNOMnM1UnRhSFBCZW5Dc3gyRUNjb0ZSYllIeDNub1poWFcxAAAAAARiYW5rAgAAACMzTjFFNnRYZGRSb1ZhUmZROWRRM3ZnNUxhVzJmc2Q4SEt1YgAAAAIAAAAGaW52b2tlAQAAABFmaWxlQ2VydGlmaWNhdGlvbgAAAAQAAAAEaGFzaAAAAAV0aXRsZQAAAAR1dWlkAAAABGRhdGEEAAAAAmlkCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAZpbnZva2UAAAANdHJhbnNhY3Rpb25JZAQAAAAKZW50cnlFeGlzdAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABGhhc2gFAAAABHV1aWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQIAAAAETk9ORQQAAAAJdXVpZEV4aXN0BAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAABHV1aWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQIAAAAETk9ORQQAAAANY2FsbGVyQWRkcmVzcwkAAlgAAAABCAgFAAAABmludm9rZQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABFhZGRyX1dISVRFTElTVEVEXwUAAAANY2FsbGVyQWRkcmVzcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAAAwkBAAAAAiE9AAAAAgUAAAAKZW50cnlFeGlzdAIAAAAETk9ORQkAAAIAAAABAgAAABhUaGlzIGVudHJ5IGFscmVhZHkgZXhpc3QDCQEAAAACIT0AAAACBQAAAAl1dWlkRXhpc3QCAAAABE5PTkUJAAACAAAAAQIAAAAXVGhpcyB1dWlkIGFscmVhZHkgZXhpc3QDCQAAZgAAAAIJAAExAAAAAQUAAAAEdXVpZAAAAAAAAAAAJAkAAAIAAAABAgAAABBVdWlkIGlzIHRvbyBsb25nAwkAAGYAAAACCQABMQAAAAEFAAAABGhhc2gAAAAAAAAAAEAJAAACAAAAAQIAAAAQSGFzaCBpcyB0b28gbG9uZwMJAABmAAAAAgkAATEAAAABBQAAAAV0aXRsZQAAAAAAAAAAQAkAAAIAAAABAgAAABFUaXRsZSBpcyB0b28gbG9uZwMJAABmAAAAAgUAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQAAAAAAAAAAAAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAEaGFzaAUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAV0aXRsZQUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAABFhZGRyX1dISVRFTElTVEVEXwUAAAANY2FsbGVyQWRkcmVzcwkAAGUAAAACBQAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhkYXRhX2ZjXwkAAlgAAAABBQAAAAJpZAIAAAABXwUAAAANY2FsbGVyQWRkcmVzcwUAAAAEZGF0YQUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAZpbnZva2UAAAAGY2FsbGVyAAAAAAAAB6EgBQAAAAR1bml0BQAAAANuaWwEAAAAB3BheW1lbnQJAQAAAAdleHRyYWN0AAAAAQgFAAAABmludm9rZQAAAAdwYXltZW50BAAAAAZhbW91bnQJAQAAAAdleHRyYWN0AAAAAQgFAAAAB3BheW1lbnQAAAAGYW1vdW50BAAAAA5wYXltZW50QXNzZXRJZAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAgV2F2ZXMgaXMgbm90IGFjY2VwdGVkIGFzIHBheW1lbnQEAAAADWFjY2VwdGVkVG9rZW4EAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAIdmVyaWZpZXIJAAEsAAAAAgIAAAARd2hpdGVfbGlzdF90b2tlbl8JAAJYAAAAAQkBAAAAB2V4dHJhY3QAAAABBQAAAA5wYXltZW50QXNzZXRJZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhCQAAAgAAAAECAAAAKFRoaXMgdG9rZW4gaXMgbm90IGFjY2VwdGVkIGF0IHRoZSBtb21lbnQEAAAADGN1cnJlbnRQcmljZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAIdmVyaWZpZXIJAAEsAAAAAgIAAAASY2VydGlmaWNhdGlvbl9mZWVfCQACWAAAAAEJAQAAAAdleHRyYWN0AAAAAQUAAAAOcGF5bWVudEFzc2V0SWQDCQEAAAACIT0AAAACBQAAAA1hY2NlcHRlZFRva2VuAgAAAAtXSElURUxJU1RFRAkAAAIAAAABAgAAAChUaGlzIHRva2VuIGlzIG5vdCBhY2NlcHRlZCBhdCB0aGUgbW9tZW50AwMJAQAAAAIhPQAAAAIFAAAABmFtb3VudAUAAAAMY3VycmVudFByaWNlCQAAZwAAAAIAAAAAAAAAAAAFAAAAFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0HCQAAAgAAAAECAAAAElRoZSBwcmljZSBpcyB3cm9uZwkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAEaGFzaAUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAV0aXRsZQUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIZGF0YV9mY18JAAJYAAAAAQUAAAACaWQCAAAAAV8FAAAADWNhbGxlckFkZHJlc3MFAAAABGRhdGEFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAABGJhbmsFAAAABmFtb3VudAgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAUAAAADbmlsAAAABmludm9rZQEAAAASZW1haWxDZXJ0aWZpY2F0aW9uAAAAAwAAAAltZXNzYWdlaWQAAAAEdXVpZAAAAARkYXRhBAAAAAJpZAkBAAAAB2V4dHJhY3QAAAABCAUAAAAGaW52b2tlAAAADXRyYW5zYWN0aW9uSWQEAAAACmVudHJ5RXhpc3QEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAltZXNzYWdlaWQFAAAABHV1aWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQIAAAAETk9ORQQAAAAJdXVpZEV4aXN0BAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAABHV1aWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQIAAAAETk9ORQQAAAANY2FsbGVyQWRkcmVzcwkAAlgAAAABCAgFAAAABmludm9rZQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0EAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABFhZGRyX1dISVRFTElTVEVEXwUAAAANY2FsbGVyQWRkcmVzcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAAAwkBAAAAAiE9AAAAAgUAAAAKZW50cnlFeGlzdAIAAAAETk9ORQkAAAIAAAABAgAAABhUaGlzIGVudHJ5IGFscmVhZHkgZXhpc3QDCQEAAAACIT0AAAACBQAAAAl1dWlkRXhpc3QCAAAABE5PTkUJAAACAAAAAQIAAAAXVGhpcyB1dWlkIGFscmVhZHkgZXhpc3QDCQAAZgAAAAIJAAExAAAAAQUAAAAEdXVpZAAAAAAAAAAAJAkAAAIAAAABAgAAABBVdWlkIGlzIHRvbyBsb25nAwkAAGYAAAACBQAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtAAAAAAAAAAAACQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAltZXNzYWdlaWQFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAARYWRkcl9XSElURUxJU1RFRF8FAAAADWNhbGxlckFkZHJlc3MJAABlAAAAAgUAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIZGF0YV9lY18JAAJYAAAAAQUAAAACaWQCAAAAAV8FAAAADWNhbGxlckFkZHJlc3MFAAAABGRhdGEFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAAGaW52b2tlAAAABmNhbGxlcgAAAAAAAAehIAUAAAAEdW5pdAUAAAADbmlsBAAAAAdwYXltZW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAZpbnZva2UAAAAHcGF5bWVudAQAAAAGYW1vdW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAQAAAAOcGF5bWVudEFzc2V0SWQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkBAAAAB2V4dHJhY3QAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQAAAgAAAAECAAAAIFdhdmVzIGlzIG5vdCBhY2NlcHRlZCBhcyBwYXltZW50BAAAAA1hY2NlcHRlZFRva2VuBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAACHZlcmlmaWVyCQABLAAAAAICAAAAEXdoaXRlX2xpc3RfdG9rZW5fCQACWAAAAAEJAQAAAAdleHRyYWN0AAAAAQUAAAAOcGF5bWVudEFzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQkAAAIAAAABAgAAAChUaGlzIHRva2VuIGlzIG5vdCBhY2NlcHRlZCBhdCB0aGUgbW9tZW50BAAAAAxjdXJyZW50UHJpY2UJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAACHZlcmlmaWVyCQABLAAAAAICAAAAEmNlcnRpZmljYXRpb25fZmVlXwkAAlgAAAABCQEAAAAHZXh0cmFjdAAAAAEFAAAADnBheW1lbnRBc3NldElkAwkBAAAAAiE9AAAAAgUAAAANYWNjZXB0ZWRUb2tlbgIAAAALV0hJVEVMSVNURUQJAAACAAAAAQIAAAAoVGhpcyB0b2tlbiBpcyBub3QgYWNjZXB0ZWQgYXQgdGhlIG1vbWVudAMDCQEAAAACIT0AAAACBQAAAAZhbW91bnQFAAAADGN1cnJlbnRQcmljZQkAAGcAAAACAAAAAAAAAAAABQAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtBwkAAAIAAAABAgAAABJUaGUgcHJpY2UgaXMgd3JvbmcJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAR1dWlkCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAACW1lc3NhZ2VpZAUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIZGF0YV9lY18JAAJYAAAAAQUAAAACaWQCAAAAAV8FAAAADWNhbGxlckFkZHJlc3MFAAAABGRhdGEFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAABGJhbmsFAAAABmFtb3VudAgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAUAAAADbmlsAAAAAN3Aock=",
    "chainId": 84,
    "height": 857668,
    "spentComplexity": 0
}

View: original | compacted
Prev: H1QXaFgLQac6cJ4b8xAFTfVRZ5qABmAdgsZCstyb6jAL
Next: 6Un94hdcteHYjTYtM4MuNwwNWvJVevqBRfrDZ8jSZXCQ

Diff: 
Old New Differences
75 75      }
76 76  
77 77  
78 + 
79 + @Callable(c)
80 + func emailCertification (t,f,g) = {
81 +     let h = extract(c.transactionId)
82 +     let i = {
83 +         let j = getString(this, (t + f))
84 +         if ($isInstanceOf(j, "String"))
85 +             then {
86 +                 let k = j
87 +                 k
88 +                 }
89 +             else "NONE"
90 +         }
91 +     let l = {
92 +         let j = getString(this, f)
93 +         if ($isInstanceOf(j, "String"))
94 +             then {
95 +                 let k = j
96 +                 k
97 +                 }
98 +             else "NONE"
99 +         }
100 +     let m = toBase58String(c.caller.bytes)
101 +     let n = {
102 +         let j = getInteger(this, ("addr_WHITELISTED_" + m))
103 +         if ($isInstanceOf(j, "Int"))
104 +             then {
105 +                 let k = j
106 +                 k
107 +                 }
108 +             else 0
109 +         }
110 +     if ((i != "NONE"))
111 +         then throw("This entry already exist")
112 +         else if ((l != "NONE"))
113 +             then throw("This uuid already exist")
114 +             else if ((size(f) > 36))
115 +                 then throw("Uuid is too long")
116 +                 else if ((n > 0))
117 +                     then ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((t + f), toBase58String(h)), DataEntry(("addr_WHITELISTED_" + m), (n - 1)), DataEntry(((("data_ec_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(c.caller, 500000, unit)]))
118 +                     else {
119 +                         let o = extract(c.payment)
120 +                         let p = extract(o.amount)
121 +                         let q = if (isDefined(o.assetId))
122 +                             then extract(o.assetId)
123 +                             else throw("Waves is not accepted as payment")
124 +                         let r = {
125 +                             let j = getString(a, ("white_list_token_" + toBase58String(extract(q))))
126 +                             if ($isInstanceOf(j, "String"))
127 +                                 then {
128 +                                     let k = j
129 +                                     k
130 +                                     }
131 +                                 else throw("This token is not accepted at the moment")
132 +                             }
133 +                         let s = getIntegerValue(a, ("certification_fee_" + toBase58String(extract(q))))
134 +                         if ((r != "WHITELISTED"))
135 +                             then throw("This token is not accepted at the moment")
136 +                             else if (if ((p != s))
137 +                                 then (0 >= n)
138 +                                 else false)
139 +                                 then throw("The price is wrong")
140 +                                 else ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((t + f), toBase58String(h)), DataEntry(((("data_ec_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(addressFromStringValue(b), p, o.assetId)]))
141 +                         }
142 +     }
143 + 
144 + 
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = extract(addressFromString("3N2s5RtaHPBenCsx2ECcoFRbYHx3noZhXW1"))
5 5  
6 6  let b = "3N1E6tXddRoVaRfQ9dQ3vg5LaW2fsd8HKub"
7 7  
8 8  @Callable(c)
9 9  func fileCertification (d,e,f,g) = {
10 10      let h = extract(c.transactionId)
11 11      let i = {
12 12          let j = getString(this, (d + f))
13 13          if ($isInstanceOf(j, "String"))
14 14              then {
15 15                  let k = j
16 16                  k
17 17                  }
18 18              else "NONE"
19 19          }
20 20      let l = {
21 21          let j = getString(this, f)
22 22          if ($isInstanceOf(j, "String"))
23 23              then {
24 24                  let k = j
25 25                  k
26 26                  }
27 27              else "NONE"
28 28          }
29 29      let m = toBase58String(c.caller.bytes)
30 30      let n = {
31 31          let j = getInteger(this, ("addr_WHITELISTED_" + m))
32 32          if ($isInstanceOf(j, "Int"))
33 33              then {
34 34                  let k = j
35 35                  k
36 36                  }
37 37              else 0
38 38          }
39 39      if ((i != "NONE"))
40 40          then throw("This entry already exist")
41 41          else if ((l != "NONE"))
42 42              then throw("This uuid already exist")
43 43              else if ((size(f) > 36))
44 44                  then throw("Uuid is too long")
45 45                  else if ((size(d) > 64))
46 46                      then throw("Hash is too long")
47 47                      else if ((size(e) > 64))
48 48                          then throw("Title is too long")
49 49                          else if ((n > 0))
50 50                              then ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((d + f), toBase58String(h)), DataEntry((e + f), toBase58String(h)), DataEntry(("addr_WHITELISTED_" + m), (n - 1)), DataEntry(((("data_fc_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(c.caller, 500000, unit)]))
51 51                              else {
52 52                                  let o = extract(c.payment)
53 53                                  let p = extract(o.amount)
54 54                                  let q = if (isDefined(o.assetId))
55 55                                      then extract(o.assetId)
56 56                                      else throw("Waves is not accepted as payment")
57 57                                  let r = {
58 58                                      let j = getString(a, ("white_list_token_" + toBase58String(extract(q))))
59 59                                      if ($isInstanceOf(j, "String"))
60 60                                          then {
61 61                                              let k = j
62 62                                              k
63 63                                              }
64 64                                          else throw("This token is not accepted at the moment")
65 65                                      }
66 66                                  let s = getIntegerValue(a, ("certification_fee_" + toBase58String(extract(q))))
67 67                                  if ((r != "WHITELISTED"))
68 68                                      then throw("This token is not accepted at the moment")
69 69                                      else if (if ((p != s))
70 70                                          then (0 >= n)
71 71                                          else false)
72 72                                          then throw("The price is wrong")
73 73                                          else ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((d + f), toBase58String(h)), DataEntry((e + f), toBase58String(h)), DataEntry(((("data_fc_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(addressFromStringValue(b), p, o.assetId)]))
74 74                                  }
75 75      }
76 76  
77 77  
78 + 
79 + @Callable(c)
80 + func emailCertification (t,f,g) = {
81 +     let h = extract(c.transactionId)
82 +     let i = {
83 +         let j = getString(this, (t + f))
84 +         if ($isInstanceOf(j, "String"))
85 +             then {
86 +                 let k = j
87 +                 k
88 +                 }
89 +             else "NONE"
90 +         }
91 +     let l = {
92 +         let j = getString(this, f)
93 +         if ($isInstanceOf(j, "String"))
94 +             then {
95 +                 let k = j
96 +                 k
97 +                 }
98 +             else "NONE"
99 +         }
100 +     let m = toBase58String(c.caller.bytes)
101 +     let n = {
102 +         let j = getInteger(this, ("addr_WHITELISTED_" + m))
103 +         if ($isInstanceOf(j, "Int"))
104 +             then {
105 +                 let k = j
106 +                 k
107 +                 }
108 +             else 0
109 +         }
110 +     if ((i != "NONE"))
111 +         then throw("This entry already exist")
112 +         else if ((l != "NONE"))
113 +             then throw("This uuid already exist")
114 +             else if ((size(f) > 36))
115 +                 then throw("Uuid is too long")
116 +                 else if ((n > 0))
117 +                     then ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((t + f), toBase58String(h)), DataEntry(("addr_WHITELISTED_" + m), (n - 1)), DataEntry(((("data_ec_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(c.caller, 500000, unit)]))
118 +                     else {
119 +                         let o = extract(c.payment)
120 +                         let p = extract(o.amount)
121 +                         let q = if (isDefined(o.assetId))
122 +                             then extract(o.assetId)
123 +                             else throw("Waves is not accepted as payment")
124 +                         let r = {
125 +                             let j = getString(a, ("white_list_token_" + toBase58String(extract(q))))
126 +                             if ($isInstanceOf(j, "String"))
127 +                                 then {
128 +                                     let k = j
129 +                                     k
130 +                                     }
131 +                                 else throw("This token is not accepted at the moment")
132 +                             }
133 +                         let s = getIntegerValue(a, ("certification_fee_" + toBase58String(extract(q))))
134 +                         if ((r != "WHITELISTED"))
135 +                             then throw("This token is not accepted at the moment")
136 +                             else if (if ((p != s))
137 +                                 then (0 >= n)
138 +                                 else false)
139 +                                 then throw("The price is wrong")
140 +                                 else ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((t + f), toBase58String(h)), DataEntry(((("data_ec_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(addressFromStringValue(b), p, o.assetId)]))
141 +                         }
142 +     }
143 + 
144 +

Old	New		Differences
75	75		}
76	76
77	77
	78	+
	79	+	@Callable(c)
	80	+	func emailCertification (t,f,g) = {
	81	+	let h = extract(c.transactionId)
	82	+	let i = {
	83	+	let j = getString(this, (t + f))
	84	+	if ($isInstanceOf(j, "String"))
	85	+	then {
	86	+	let k = j
	87	+	k
	88	+	}
	89	+	else "NONE"
	90	+	}
	91	+	let l = {
	92	+	let j = getString(this, f)
	93	+	if ($isInstanceOf(j, "String"))
	94	+	then {
	95	+	let k = j
	96	+	k
	97	+	}
	98	+	else "NONE"
	99	+	}
	100	+	let m = toBase58String(c.caller.bytes)
	101	+	let n = {
	102	+	let j = getInteger(this, ("addr_WHITELISTED_" + m))
	103	+	if ($isInstanceOf(j, "Int"))
	104	+	then {
	105	+	let k = j
	106	+	k
	107	+	}
	108	+	else 0
	109	+	}
	110	+	if ((i != "NONE"))
	111	+	then throw("This entry already exist")
	112	+	else if ((l != "NONE"))
	113	+	then throw("This uuid already exist")
	114	+	else if ((size(f) > 36))
	115	+	then throw("Uuid is too long")
	116	+	else if ((n > 0))
	117	+	then ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((t + f), toBase58String(h)), DataEntry(("addr_WHITELISTED_" + m), (n - 1)), DataEntry(((("data_ec_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(c.caller, 500000, unit)]))
	118	+	else {
	119	+	let o = extract(c.payment)
	120	+	let p = extract(o.amount)
	121	+	let q = if (isDefined(o.assetId))
	122	+	then extract(o.assetId)
	123	+	else throw("Waves is not accepted as payment")
	124	+	let r = {
	125	+	let j = getString(a, ("white_list_token_" + toBase58String(extract(q))))
	126	+	if ($isInstanceOf(j, "String"))
	127	+	then {
	128	+	let k = j
	129	+	k
	130	+	}
	131	+	else throw("This token is not accepted at the moment")
	132	+	}
	133	+	let s = getIntegerValue(a, ("certification_fee_" + toBase58String(extract(q))))
	134	+	if ((r != "WHITELISTED"))
	135	+	then throw("This token is not accepted at the moment")
	136	+	else if (if ((p != s))
	137	+	then (0 >= n)
	138	+	else false)
	139	+	then throw("The price is wrong")
	140	+	else ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((t + f), toBase58String(h)), DataEntry(((("data_ec_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(addressFromStringValue(b), p, o.assetId)]))
	141	+	}
	142	+	}
	143	+
	144	+

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = extract(addressFromString("3N2s5RtaHPBenCsx2ECcoFRbYHx3noZhXW1"))
5	5
6	6		let b = "3N1E6tXddRoVaRfQ9dQ3vg5LaW2fsd8HKub"
7	7
8	8		@Callable(c)
9	9		func fileCertification (d,e,f,g) = {
10	10		let h = extract(c.transactionId)
11	11		let i = {
12	12		let j = getString(this, (d + f))
13	13		if ($isInstanceOf(j, "String"))
14	14		then {
15	15		let k = j
16	16		k
17	17		}
18	18		else "NONE"
19	19		}
20	20		let l = {
21	21		let j = getString(this, f)
22	22		if ($isInstanceOf(j, "String"))
23	23		then {
24	24		let k = j
25	25		k
26	26		}
27	27		else "NONE"
28	28		}
29	29		let m = toBase58String(c.caller.bytes)
30	30		let n = {
31	31		let j = getInteger(this, ("addr_WHITELISTED_" + m))
32	32		if ($isInstanceOf(j, "Int"))
33	33		then {
34	34		let k = j
35	35		k
36	36		}
37	37		else 0
38	38		}
39	39		if ((i != "NONE"))
40	40		then throw("This entry already exist")
41	41		else if ((l != "NONE"))
42	42		then throw("This uuid already exist")
43	43		else if ((size(f) > 36))
44	44		then throw("Uuid is too long")
45	45		else if ((size(d) > 64))
46	46		then throw("Hash is too long")
47	47		else if ((size(e) > 64))
48	48		then throw("Title is too long")
49	49		else if ((n > 0))
50	50		then ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((d + f), toBase58String(h)), DataEntry((e + f), toBase58String(h)), DataEntry(("addr_WHITELISTED_" + m), (n - 1)), DataEntry(((("data_fc_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(c.caller, 500000, unit)]))
51	51		else {
52	52		let o = extract(c.payment)
53	53		let p = extract(o.amount)
54	54		let q = if (isDefined(o.assetId))
55	55		then extract(o.assetId)
56	56		else throw("Waves is not accepted as payment")
57	57		let r = {
58	58		let j = getString(a, ("white_list_token_" + toBase58String(extract(q))))
59	59		if ($isInstanceOf(j, "String"))
60	60		then {
61	61		let k = j
62	62		k
63	63		}
64	64		else throw("This token is not accepted at the moment")
65	65		}
66	66		let s = getIntegerValue(a, ("certification_fee_" + toBase58String(extract(q))))
67	67		if ((r != "WHITELISTED"))
68	68		then throw("This token is not accepted at the moment")
69	69		else if (if ((p != s))
70	70		then (0 >= n)
71	71		else false)
72	72		then throw("The price is wrong")
73	73		else ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((d + f), toBase58String(h)), DataEntry((e + f), toBase58String(h)), DataEntry(((("data_fc_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(addressFromStringValue(b), p, o.assetId)]))
74	74		}
75	75		}
76	76
77	77
	78	+
	79	+	@Callable(c)
	80	+	func emailCertification (t,f,g) = {
	81	+	let h = extract(c.transactionId)
	82	+	let i = {
	83	+	let j = getString(this, (t + f))
	84	+	if ($isInstanceOf(j, "String"))
	85	+	then {
	86	+	let k = j
	87	+	k
	88	+	}
	89	+	else "NONE"
	90	+	}
	91	+	let l = {
	92	+	let j = getString(this, f)
	93	+	if ($isInstanceOf(j, "String"))
	94	+	then {
	95	+	let k = j
	96	+	k
	97	+	}
	98	+	else "NONE"
	99	+	}
	100	+	let m = toBase58String(c.caller.bytes)
	101	+	let n = {
	102	+	let j = getInteger(this, ("addr_WHITELISTED_" + m))
	103	+	if ($isInstanceOf(j, "Int"))
	104	+	then {
	105	+	let k = j
	106	+	k
	107	+	}
	108	+	else 0
	109	+	}
	110	+	if ((i != "NONE"))
	111	+	then throw("This entry already exist")
	112	+	else if ((l != "NONE"))
	113	+	then throw("This uuid already exist")
	114	+	else if ((size(f) > 36))
	115	+	then throw("Uuid is too long")
	116	+	else if ((n > 0))
	117	+	then ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((t + f), toBase58String(h)), DataEntry(("addr_WHITELISTED_" + m), (n - 1)), DataEntry(((("data_ec_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(c.caller, 500000, unit)]))
	118	+	else {
	119	+	let o = extract(c.payment)
	120	+	let p = extract(o.amount)
	121	+	let q = if (isDefined(o.assetId))
	122	+	then extract(o.assetId)
	123	+	else throw("Waves is not accepted as payment")
	124	+	let r = {
	125	+	let j = getString(a, ("white_list_token_" + toBase58String(extract(q))))
	126	+	if ($isInstanceOf(j, "String"))
	127	+	then {
	128	+	let k = j
	129	+	k
	130	+	}
	131	+	else throw("This token is not accepted at the moment")
	132	+	}
	133	+	let s = getIntegerValue(a, ("certification_fee_" + toBase58String(extract(q))))
	134	+	if ((r != "WHITELISTED"))
	135	+	then throw("This token is not accepted at the moment")
	136	+	else if (if ((p != s))
	137	+	then (0 >= n)
	138	+	else false)
	139	+	then throw("The price is wrong")
	140	+	else ScriptResult(WriteSet([DataEntry(f, toBase58String(h)), DataEntry((t + f), toBase58String(h)), DataEntry(((("data_ec_" + toBase58String(h)) + "_") + m), g)]), TransferSet([ScriptTransfer(addressFromStringValue(b), p, o.assetId)]))
	141	+	}
	142	+	}
	143	+
	144	+

github/deemru/w8io/169f3d6 
32.25 ms ◑