w8 · tx · J38···Hjw

tx · J38eEYxGyjd7Zma55YynLcGDh385BtQ8zWbF1vUJ8Hjw

3N51jM3a77Hfp8LRscW1QaHFCLrDE3CqRcJ:  -0.01400000 Waves

2019.07.05 20:47 [572518] smart account 3N51jM3a77Hfp8LRscW1QaHFCLrDE3CqRcJ > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "J38eEYxGyjd7Zma55YynLcGDh385BtQ8zWbF1vUJ8Hjw",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1562348827170,
    "version": 1,
    "sender": "3N51jM3a77Hfp8LRscW1QaHFCLrDE3CqRcJ",
    "senderPublicKey": "Ad4TpZLmiH4mLF6K6jzKEH4EByoNtUQkTS5Fx1XqR4Wy",
    "proofs": [
        "XzBAes9GMNwZosLT14tyXxx2KaTAPYCVsYEfuPcvc6AUVh1rdkrzFuSermfco2PMsK31JMdiLaqPveiHfCAXR9v"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAMAAAAAAZsZXZlbDEAAAAAAAAAAPoAAAAABmxldmVsMgAAAAAAAAAA+gAAAAAGbGV2ZWwzAAAAAAAAAAD6AAAAAAhjYXNoQmFjawAAAAAAAAAA+gAAAAAGbWF4RmVlAAAAAAAATEtAAAAAAAttaW5XaXRoZHJhdwAAAAAAAA9CQAAAAAAOY2hhbmdlT3duZXJLZXkCAAAALEFEMnZienBSM1pNWGlZMVpoQmRxNGlIMXd6NXc2dFVDSFB6MXZ2TmZ5Q3FFAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgAAAAdhZGRyZXNzAAAAA2luYwQAAAAKYmFsYW5jZUtleQkAASwAAAACBQAAAAdhZGRyZXNzAgAAAAhfYmFsYW5jZQkBAAAACURhdGFFbnRyeQAAAAIFAAAACmJhbGFuY2VLZXkJAABkAAAAAgUAAAADaW5jBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAACmJhbGFuY2VLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYgUAAAAHJG1hdGNoMAUAAAABYgAAAAAAAAAAAAEAAAAWcmVjb3JkQmFsYW5jZUluY3JlbWVudAAAAAYAAAAHYWRkcmVzcwAAAAVvd25lcgAAAANpbmMAAAAFbGV2ZWwAAAAEdHhJZAAAAAl0aW1lc3RhbXAJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAVmdW5kXwUAAAAHYWRkcmVzcwIAAAABXwUAAAAEdHhJZAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAFb3duZXICAAAAAToJAAGkAAAAAQUAAAADaW5jAgAAAAE6BQAAAAVsZXZlbAIAAAABOgUAAAAJdGltZXN0YW1wAQAAAApnZXRSZWZlcmVyAAAAAQAAAAR1c2VyCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAEdXNlcgIAAAAIX3JlZmVyZXIBAAAACGNoZWNrRmVlAAAAAQAAAAFpAwkAAGYAAAACCAUAAAABaQAAAANmZWUFAAAABm1heEZlZQkAAAIAAAABAgAAABZ1bnJlYXNvbmFibGUgbGFyZ2UgZmVlBgEAAAAMZ2V0VGltZXN0YW1wAAAAAAQAAAAFYmxvY2sJAQAAAAdleHRyYWN0AAAAAQkAA+0AAAABBQAAAAZoZWlnaHQJAAGkAAAAAQgFAAAABWJsb2NrAAAACXRpbWVzdGFtcAAAAAMAAAABaQEAAAAEZnVuZAAAAAAEAAAABW93bmVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAABHR4aWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAAJdGltZXN0YW1wCQEAAAAMZ2V0VGltZXN0YW1wAAAAAAQAAAAGYW1vdW50CAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AAAABmFtb3VudAQAAAACY2YJAQAAAAhjaGVja0ZlZQAAAAEFAAAAAWkJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAFb3duZXICAAAADV9yZWZzdHJ1Y3R1cmUDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAAIcmVmTGlzdFMFAAAAByRtYXRjaDAEAAAAB3JlZkxpc3QJAAS1AAAAAgUAAAAIcmVmTGlzdFMCAAAAASwEAAAAC3JlZkxpc3RTaXplCQABkAAAAAEFAAAAB3JlZkxpc3QEAAAACWluY0xldmVsMQkAAGkAAAACCQAAaAAAAAIFAAAABmFtb3VudAUAAAAGbGV2ZWwxAAAAAAAAAAPoBAAAAAtpbmNDYXNoQmFjawkAAGkAAAACCQAAaAAAAAIFAAAABmFtb3VudAUAAAAIY2FzaEJhY2sAAAAAAAAAA+gJAARMAAAAAgkBAAAAEGJhbGFuY2VJbmNyZW1lbnQAAAACBQAAAAVvd25lcgUAAAALaW5jQ2FzaEJhY2sJAARMAAAAAgkBAAAAFnJlY29yZEJhbGFuY2VJbmNyZW1lbnQAAAAGBQAAAAVvd25lcgUAAAAFb3duZXIFAAAAC2luY0Nhc2hCYWNrAgAAAAhjYXNoYmFjawUAAAAEdHhpZAUAAAAJdGltZXN0YW1wCQAETAAAAAIJAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgkAAZEAAAACBQAAAAdyZWZMaXN0AAAAAAAAAAAABQAAAAlpbmNMZXZlbDEJAARMAAAAAgkBAAAAFnJlY29yZEJhbGFuY2VJbmNyZW1lbnQAAAAGCQABkQAAAAIFAAAAB3JlZkxpc3QAAAAAAAAAAAAFAAAABW93bmVyBQAAAAlpbmNMZXZlbDECAAAAAmwxBQAAAAR0eGlkBQAAAAl0aW1lc3RhbXADCQAAZwAAAAIFAAAAC3JlZkxpc3RTaXplAAAAAAAAAAACBAAAAAlpbmNMZXZlbDIJAABpAAAAAgkAAGgAAAACBQAAAAZhbW91bnQFAAAABmxldmVsMgAAAAAAAAAD6AkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIJAAGRAAAAAgUAAAAHcmVmTGlzdAAAAAAAAAAAAQUAAAAJaW5jTGV2ZWwyCQAETAAAAAIJAQAAABZyZWNvcmRCYWxhbmNlSW5jcmVtZW50AAAABgkAAZEAAAACBQAAAAdyZWZMaXN0AAAAAAAAAAABBQAAAAVvd25lcgUAAAAJaW5jTGV2ZWwyAgAAAAJsMgUAAAAEdHhpZAUAAAAJdGltZXN0YW1wAwkAAGcAAAACBQAAAAtyZWZMaXN0U2l6ZQAAAAAAAAAAAwQAAAAJaW5jTGV2ZWwzCQAAaQAAAAIJAABoAAAAAgUAAAAGYW1vdW50BQAAAAZsZXZlbDMAAAAAAAAAA+gJAARMAAAAAgkBAAAAEGJhbGFuY2VJbmNyZW1lbnQAAAACCQABkQAAAAIFAAAAB3JlZkxpc3QAAAAAAAAAAAIFAAAACWluY0xldmVsMwkABEwAAAACCQEAAAAWcmVjb3JkQmFsYW5jZUluY3JlbWVudAAAAAYJAAGRAAAAAgUAAAAHcmVmTGlzdAAAAAAAAAAAAgUAAAAFb3duZXIFAAAACWluY0xldmVsMwIAAAACbDMFAAAABHR4aWQFAAAACXRpbWVzdGFtcAkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIFAAAADmNoYW5nZU93bmVyS2V5CQAAZQAAAAIJAABlAAAAAgkAAGUAAAACBQAAAAZhbW91bnQFAAAACWluY0xldmVsMQUAAAAJaW5jTGV2ZWwyBQAAAAlpbmNMZXZlbDMJAARMAAAAAgkBAAAAFnJlY29yZEJhbGFuY2VJbmNyZW1lbnQAAAAGBQAAAA5jaGFuZ2VPd25lcktleQUAAAAFb3duZXIJAABlAAAAAgkAAGUAAAACCQAAZQAAAAIFAAAABmFtb3VudAUAAAAJaW5jTGV2ZWwxBQAAAAlpbmNMZXZlbDIFAAAACWluY0xldmVsMwIAAAAGY2hhbmdlBQAAAAR0eGlkBQAAAAl0aW1lc3RhbXAFAAAAA25pbAkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIFAAAADmNoYW5nZU93bmVyS2V5CQAAZQAAAAIJAABlAAAAAgUAAAAGYW1vdW50BQAAAAlpbmNMZXZlbDEFAAAACWluY0xldmVsMgkABEwAAAACCQEAAAAWcmVjb3JkQmFsYW5jZUluY3JlbWVudAAAAAYFAAAADmNoYW5nZU93bmVyS2V5BQAAAAVvd25lcgkAAGUAAAACCQAAZQAAAAIFAAAABmFtb3VudAUAAAAJaW5jTGV2ZWwxBQAAAAlpbmNMZXZlbDICAAAABmNoYW5nZQUAAAAEdHhpZAUAAAAJdGltZXN0YW1wBQAAAANuaWwJAARMAAAAAgkBAAAAEGJhbGFuY2VJbmNyZW1lbnQAAAACBQAAAA5jaGFuZ2VPd25lcktleQkAAGUAAAACBQAAAAZhbW91bnQFAAAACWluY0xldmVsMQkABEwAAAACCQEAAAAWcmVjb3JkQmFsYW5jZUluY3JlbWVudAAAAAYFAAAADmNoYW5nZU93bmVyS2V5BQAAAAVvd25lcgkAAGUAAAACBQAAAAZhbW91bnQFAAAACWluY0xldmVsMQIAAAAGY2hhbmdlBQAAAAR0eGlkBQAAAAl0aW1lc3RhbXAFAAAAA25pbAkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIFAAAADmNoYW5nZU93bmVyS2V5BQAAAAZhbW91bnQJAARMAAAAAgkBAAAAFnJlY29yZEJhbGFuY2VJbmNyZW1lbnQAAAAGBQAAAA5jaGFuZ2VPd25lcktleQUAAAAFb3duZXIFAAAABmFtb3VudAIAAAAGY2hhbmdlBQAAAAR0eGlkBQAAAAl0aW1lc3RhbXAFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIIBQAAAAFpAAAAA2ZlZQUAAAAEdW5pdAUAAAADbmlsAAAAAWkBAAAACHdpdGhkcmF3AAAAAAQAAAACY2YJAQAAAAhjaGVja0ZlZQAAAAEFAAAAAWkEAAAABW93bmVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAABHR4aWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAAKYmFsYW5jZUtleQkAASwAAAACBQAAAAVvd25lcgIAAAAIX2JhbGFuY2UEAAAABmFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAApiYWxhbmNlS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWIFAAAAByRtYXRjaDAFAAAAAWIAAAAAAAAAAAADCQAAZgAAAAIFAAAAC21pbldpdGhkcmF3BQAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACAgAAABZNaW4gd2l0aGRyYXcgYW1vdW50IGlzCQABpAAAAAEFAAAAC21pbldpdGhkcmF3CQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAKYmFsYW5jZUtleQAAAAAAAAAAAAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAJd2l0aGRyYXdfBQAAAAVvd25lcgIAAAABXwUAAAAEdHhpZAkAASwAAAACCQABLAAAAAIJAAGkAAAAAQUAAAAGYW1vdW50AgAAAAE6CQEAAAAMZ2V0VGltZXN0YW1wAAAAAAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAGQAAAACBQAAAAZhbW91bnQIBQAAAAFpAAAAA2ZlZQUAAAAEdW5pdAUAAAADbmlsAAAAAWkBAAAACHJlZ2lzdGVyAAAAAgAAAAdyZWZlcmVyAAAABHNhbHQEAAAAAmNmCQEAAAAIY2hlY2tGZWUAAAABBQAAAAFpAwkBAAAAAiE9AAAAAgkAAS8AAAACCQACWAAAAAEIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQAAAAAAAAAAAMCAAAAAzEyMwkAAAIAAAABAgAAABRwcm9vZiBvZiB3b3JrIGZhaWxlZAQAAAAFb3duZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwMJAQAAAAlpc0RlZmluZWQAAAABCQEAAAAKZ2V0UmVmZXJlcgAAAAEFAAAABW93bmVyCQAAAgAAAAECAAAAEkFscmVhZHkgcmVnaXN0ZXJlZAQAAAALcmVmZXJhbHNLZXkJAAEsAAAAAgUAAAAHcmVmZXJlcgIAAAAKX3JlZmVycmFscwQAAAAIcmVmZXJhbHMEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAALcmVmZXJhbHNLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAAHb2xkUmVmcwUAAAAHJG1hdGNoMAkAASwAAAACCQABLAAAAAIFAAAAB29sZFJlZnMCAAAAASwFAAAABW93bmVyBQAAAAVvd25lcgQAAAAMcmVmU3RydWN0dXJlCQABLAAAAAIFAAAAB3JlZmVyZXIEAAAAByRtYXRjaDAJAQAAAApnZXRSZWZlcmVyAAAAAQUAAAAHcmVmZXJlcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAhyZWZlcmVyMgUAAAAHJG1hdGNoMAkAASwAAAACCQABLAAAAAICAAAAASwFAAAACHJlZmVyZXIyBAAAAAckbWF0Y2gxCQEAAAAKZ2V0UmVmZXJlcgAAAAEFAAAACHJlZmVyZXIyAwkAAAEAAAACBQAAAAckbWF0Y2gxAgAAAAZTdHJpbmcEAAAACHJlZmVyZXIzBQAAAAckbWF0Y2gxCQABLAAAAAICAAAAASwFAAAACHJlZmVyZXIzAgAAAAACAAAAAAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAFb3duZXICAAAACF9yZWZlcmVyBQAAAAdyZWZlcmVyCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAtyZWZlcmFsc0tleQUAAAAIcmVmZXJhbHMJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAFb3duZXICAAAADV9yZWZzdHJ1Y3R1cmUFAAAADHJlZlN0cnVjdHVyZQUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcggFAAAAAWkAAAADZmVlBQAAAAR1bml0BQAAAANuaWwAAAAAPTWZpQ==",
    "chainId": 84,
    "height": 572518,
    "spentComplexity": 0
}

View: original | compacted
Prev: 9znZEj7UnWqXJiRLLwV4eVmWfeZgmiYP42n9VNRnY8ou
Next: none

Diff: 
Old New Differences
84 84  func withdraw () = {
85 85      let A = u(v)
86 86      let o = toBase58String(v.caller.bytes)
87 +     let y = toBase58String(v.transactionId)
87 88      let k = (o + "_balance")
88 89      let z = {
89 90          let l = getInteger(this, k)
96 97          }
97 98      if ((f > z))
98 99          then throw(("Min withdraw amount is" + toString(f)))
99 -         else {
100 -             let I = (o + "_withdraw_txs")
101 -             let J = ((((toString(z) + ":") + toBase58String(v.transactionId)) + ":") + w())
102 -             let K = {
103 -                 let l = getString(this, I)
104 -                 if ($isInstanceOf(l, "String"))
105 -                     then {
106 -                         let L = l
107 -                         ((L + ",") + J)
108 -                         }
109 -                     else J
110 -                 }
111 -             ScriptResult(WriteSet([DataEntry(k, 0), DataEntry(I, K)]), TransferSet([ScriptTransfer(v.caller, (z + v.fee), unit)]))
112 -             }
100 +         else ScriptResult(WriteSet([DataEntry(k, 0), DataEntry(((("withdraw_" + o) + "_") + y), ((toString(z) + ":") + w()))]), TransferSet([ScriptTransfer(v.caller, (z + v.fee), unit)]))
113 101      }
114 102  
115 103  
116 104  
117 105  @Callable(v)
118 - func register (M,N) = {
106 + func register (I,J) = {
119 107      let A = u(v)
120 108      if ((take(toBase58String(v.transactionId), 3) != "123"))
121 109          then throw("proof of work failed")
124 112              if (isDefined(s(o)))
125 113                  then throw("Already registered")
126 114                  else {
127 -                     let O = (M + "_referrals")
128 -                     let P = {
129 -                         let l = getString(this, O)
115 +                     let K = (I + "_referrals")
116 +                     let L = {
117 +                         let l = getString(this, K)
130 118                          if ($isInstanceOf(l, "String"))
131 119                              then {
132 -                                 let Q = l
133 -                                 ((Q + ",") + o)
120 +                                 let M = l
121 +                                 ((M + ",") + o)
134 122                                  }
135 123                              else o
136 124                          }
137 -                     let R = (M + {
138 -                         let l = s(M)
125 +                     let N = (I + {
126 +                         let l = s(I)
139 127                          if ($isInstanceOf(l, "String"))
140 128                              then {
141 -                                 let S = l
142 -                                 (("," + S) + {
143 -                                     let T = s(S)
144 -                                     if ($isInstanceOf(T, "String"))
129 +                                 let O = l
130 +                                 (("," + O) + {
131 +                                     let P = s(O)
132 +                                     if ($isInstanceOf(P, "String"))
145 133                                          then {
146 -                                             let U = T
147 -                                             ("," + U)
134 +                                             let Q = P
135 +                                             ("," + Q)
148 136                                              }
149 137                                          else ""
150 138                                      })
151 139                                  }
152 140                              else ""
153 141                          })
154 -                     ScriptResult(WriteSet([DataEntry((o + "_referer"), M), DataEntry(O, P), DataEntry((o + "_refstructure"), R)]), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
142 +                     ScriptResult(WriteSet([DataEntry((o + "_referer"), I), DataEntry(K, L), DataEntry((o + "_refstructure"), N)]), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
155 143                      }
156 144              }
157 145      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = 250
5 5  
6 6  let b = 250
7 7  
8 8  let c = 250
9 9  
10 10  let d = 250
11 11  
12 12  let e = 5000000
13 13  
14 14  let f = 1000000
15 15  
16 16  let g = "AD2vbzpR3ZMXiY1ZhBdq4iH1wz5w6tUCHPz1vvNfyCqE"
17 17  
18 18  func h (i,j) = {
19 19      let k = (i + "_balance")
20 20      DataEntry(k, (j + {
21 21          let l = getInteger(this, k)
22 22          if ($isInstanceOf(l, "Int"))
23 23              then {
24 24                  let m = l
25 25                  m
26 26                  }
27 27              else 0
28 28          }))
29 29      }
30 30  
31 31  
32 32  func n (i,o,j,p,q,r) = DataEntry(((("fund_" + i) + "_") + q), ((((((o + ":") + toString(j)) + ":") + p) + ":") + r))
33 33  
34 34  
35 35  func s (t) = getString(this, (t + "_referer"))
36 36  
37 37  
38 38  func u (v) = if ((v.fee > e))
39 39      then throw("unreasonable large fee")
40 40      else true
41 41  
42 42  
43 43  func w () = {
44 44      let x = extract(blockInfoByHeight(height))
45 45      toString(x.timestamp)
46 46      }
47 47  
48 48  
49 49  @Callable(v)
50 50  func fund () = {
51 51      let o = toBase58String(v.caller.bytes)
52 52      let y = toBase58String(v.transactionId)
53 53      let r = w()
54 54      let z = extract(v.payment).amount
55 55      let A = u(v)
56 56      ScriptResult(WriteSet({
57 57          let l = getString(this, (o + "_refstructure"))
58 58          if ($isInstanceOf(l, "String"))
59 59              then {
60 60                  let B = l
61 61                  let C = split(B, ",")
62 62                  let D = size(C)
63 63                  let E = ((z * a) / 1000)
64 64                  let F = ((z * d) / 1000)
65 65  [h(o, F), n(o, o, F, "cashback", y, r), h(C[0], E), n(C[0], o, E, "l1", y, r), if ((D >= 2))
66 66                      then {
67 67                          let G = ((z * b) / 1000)
68 68  [h(C[1], G), n(C[1], o, G, "l2", y, r), if ((D >= 3))
69 69                              then {
70 70                                  let H = ((z * c) / 1000)
71 71  [h(C[2], H), n(C[2], o, H, "l3", y, r), h(g, (((z - E) - G) - H)), n(g, o, (((z - E) - G) - H), "change", y, r)]
72 72                                  }
73 73                              else [h(g, ((z - E) - G)), n(g, o, ((z - E) - G), "change", y, r)]]
74 74                          }
75 75                      else [h(g, (z - E)), n(g, o, (z - E), "change", y, r)]]
76 76                  }
77 77              else [h(g, z), n(g, o, z, "change", y, r)]
78 78          }), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
79 79      }
80 80  
81 81  
82 82  
83 83  @Callable(v)
84 84  func withdraw () = {
85 85      let A = u(v)
86 86      let o = toBase58String(v.caller.bytes)
87 +     let y = toBase58String(v.transactionId)
87 88      let k = (o + "_balance")
88 89      let z = {
89 90          let l = getInteger(this, k)
90 91          if ($isInstanceOf(l, "Int"))
91 92              then {
92 93                  let m = l
93 94                  m
94 95                  }
95 96              else 0
96 97          }
97 98      if ((f > z))
98 99          then throw(("Min withdraw amount is" + toString(f)))
99 -         else {
100 -             let I = (o + "_withdraw_txs")
101 -             let J = ((((toString(z) + ":") + toBase58String(v.transactionId)) + ":") + w())
102 -             let K = {
103 -                 let l = getString(this, I)
104 -                 if ($isInstanceOf(l, "String"))
105 -                     then {
106 -                         let L = l
107 -                         ((L + ",") + J)
108 -                         }
109 -                     else J
110 -                 }
111 -             ScriptResult(WriteSet([DataEntry(k, 0), DataEntry(I, K)]), TransferSet([ScriptTransfer(v.caller, (z + v.fee), unit)]))
112 -             }
100 +         else ScriptResult(WriteSet([DataEntry(k, 0), DataEntry(((("withdraw_" + o) + "_") + y), ((toString(z) + ":") + w()))]), TransferSet([ScriptTransfer(v.caller, (z + v.fee), unit)]))
113 101      }
114 102  
115 103  
116 104  
117 105  @Callable(v)
118 - func register (M,N) = {
106 + func register (I,J) = {
119 107      let A = u(v)
120 108      if ((take(toBase58String(v.transactionId), 3) != "123"))
121 109          then throw("proof of work failed")
122 110          else {
123 111              let o = toBase58String(v.caller.bytes)
124 112              if (isDefined(s(o)))
125 113                  then throw("Already registered")
126 114                  else {
127 -                     let O = (M + "_referrals")
128 -                     let P = {
129 -                         let l = getString(this, O)
115 +                     let K = (I + "_referrals")
116 +                     let L = {
117 +                         let l = getString(this, K)
130 118                          if ($isInstanceOf(l, "String"))
131 119                              then {
132 -                                 let Q = l
133 -                                 ((Q + ",") + o)
120 +                                 let M = l
121 +                                 ((M + ",") + o)
134 122                                  }
135 123                              else o
136 124                          }
137 -                     let R = (M + {
138 -                         let l = s(M)
125 +                     let N = (I + {
126 +                         let l = s(I)
139 127                          if ($isInstanceOf(l, "String"))
140 128                              then {
141 -                                 let S = l
142 -                                 (("," + S) + {
143 -                                     let T = s(S)
144 -                                     if ($isInstanceOf(T, "String"))
129 +                                 let O = l
130 +                                 (("," + O) + {
131 +                                     let P = s(O)
132 +                                     if ($isInstanceOf(P, "String"))
145 133                                          then {
146 -                                             let U = T
147 -                                             ("," + U)
134 +                                             let Q = P
135 +                                             ("," + Q)
148 136                                              }
149 137                                          else ""
150 138                                      })
151 139                                  }
152 140                              else ""
153 141                          })
154 -                     ScriptResult(WriteSet([DataEntry((o + "_referer"), M), DataEntry(O, P), DataEntry((o + "_refstructure"), R)]), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
142 +                     ScriptResult(WriteSet([DataEntry((o + "_referer"), I), DataEntry(K, L), DataEntry((o + "_refstructure"), N)]), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
155 143                      }
156 144              }
157 145      }
158 146  
159 147

Old	New		Differences
84	84		func withdraw () = {
85	85		let A = u(v)
86	86		let o = toBase58String(v.caller.bytes)
	87	+	let y = toBase58String(v.transactionId)
87	88		let k = (o + "_balance")
88	89		let z = {
89	90		let l = getInteger(this, k)

96	97		}
97	98		if ((f > z))
98	99		then throw(("Min withdraw amount is" + toString(f)))
99		-	else {
100		-	let I = (o + "_withdraw_txs")
101		-	let J = ((((toString(z) + ":") + toBase58String(v.transactionId)) + ":") + w())
102		-	let K = {
103		-	let l = getString(this, I)
104		-	if ($isInstanceOf(l, "String"))
105		-	then {
106		-	let L = l
107		-	((L + ",") + J)
108		-	}
109		-	else J
110		-	}
111		-	ScriptResult(WriteSet([DataEntry(k, 0), DataEntry(I, K)]), TransferSet([ScriptTransfer(v.caller, (z + v.fee), unit)]))
112		-	}
	100	+	else ScriptResult(WriteSet([DataEntry(k, 0), DataEntry(((("withdraw_" + o) + "_") + y), ((toString(z) + ":") + w()))]), TransferSet([ScriptTransfer(v.caller, (z + v.fee), unit)]))
113	101		}
114	102
115	103
116	104
117	105		@Callable(v)
118		-	func register (M,N) = {
	106	+	func register (I,J) = {
119	107		let A = u(v)
120	108		if ((take(toBase58String(v.transactionId), 3) != "123"))
121	109		then throw("proof of work failed")

124	112		if (isDefined(s(o)))
125	113		then throw("Already registered")
126	114		else {
127		-	let O = (M + "_referrals")
128		-	let P = {
129		-	let l = getString(this, O)
	115	+	let K = (I + "_referrals")
	116	+	let L = {
	117	+	let l = getString(this, K)
130	118		if ($isInstanceOf(l, "String"))
131	119		then {
132		-	let Q = l
133		-	((Q + ",") + o)
	120	+	let M = l
	121	+	((M + ",") + o)
134	122		}
135	123		else o
136	124		}
137		-	let R = (M + {
138		-	let l = s(M)
	125	+	let N = (I + {
	126	+	let l = s(I)
139	127		if ($isInstanceOf(l, "String"))
140	128		then {
141		-	let S = l
142		-	(("," + S) + {
143		-	let T = s(S)
144		-	if ($isInstanceOf(T, "String"))
	129	+	let O = l
	130	+	(("," + O) + {
	131	+	let P = s(O)
	132	+	if ($isInstanceOf(P, "String"))
145	133		then {
146		-	let U = T
147		-	("," + U)
	134	+	let Q = P
	135	+	("," + Q)
148	136		}
149	137		else ""
150	138		})
151	139		}
152	140		else ""
153	141		})
154		-	ScriptResult(WriteSet([DataEntry((o + "_referer"), M), DataEntry(O, P), DataEntry((o + "_refstructure"), R)]), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
	142	+	ScriptResult(WriteSet([DataEntry((o + "_referer"), I), DataEntry(K, L), DataEntry((o + "_refstructure"), N)]), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
155	143		}
156	144		}
157	145		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = 250
5	5
6	6		let b = 250
7	7
8	8		let c = 250
9	9
10	10		let d = 250
11	11
12	12		let e = 5000000
13	13
14	14		let f = 1000000
15	15
16	16		let g = "AD2vbzpR3ZMXiY1ZhBdq4iH1wz5w6tUCHPz1vvNfyCqE"
17	17
18	18		func h (i,j) = {
19	19		let k = (i + "_balance")
20	20		DataEntry(k, (j + {
21	21		let l = getInteger(this, k)
22	22		if ($isInstanceOf(l, "Int"))
23	23		then {
24	24		let m = l
25	25		m
26	26		}
27	27		else 0
28	28		}))
29	29		}
30	30
31	31
32	32		func n (i,o,j,p,q,r) = DataEntry(((("fund_" + i) + "_") + q), ((((((o + ":") + toString(j)) + ":") + p) + ":") + r))
33	33
34	34
35	35		func s (t) = getString(this, (t + "_referer"))
36	36
37	37
38	38		func u (v) = if ((v.fee > e))
39	39		then throw("unreasonable large fee")
40	40		else true
41	41
42	42
43	43		func w () = {
44	44		let x = extract(blockInfoByHeight(height))
45	45		toString(x.timestamp)
46	46		}
47	47
48	48
49	49		@Callable(v)
50	50		func fund () = {
51	51		let o = toBase58String(v.caller.bytes)
52	52		let y = toBase58String(v.transactionId)
53	53		let r = w()
54	54		let z = extract(v.payment).amount
55	55		let A = u(v)
56	56		ScriptResult(WriteSet({
57	57		let l = getString(this, (o + "_refstructure"))
58	58		if ($isInstanceOf(l, "String"))
59	59		then {
60	60		let B = l
61	61		let C = split(B, ",")
62	62		let D = size(C)
63	63		let E = ((z * a) / 1000)
64	64		let F = ((z * d) / 1000)
65	65		[h(o, F), n(o, o, F, "cashback", y, r), h(C[0], E), n(C[0], o, E, "l1", y, r), if ((D >= 2))
66	66		then {
67	67		let G = ((z * b) / 1000)
68	68		[h(C[1], G), n(C[1], o, G, "l2", y, r), if ((D >= 3))
69	69		then {
70	70		let H = ((z * c) / 1000)
71	71		[h(C[2], H), n(C[2], o, H, "l3", y, r), h(g, (((z - E) - G) - H)), n(g, o, (((z - E) - G) - H), "change", y, r)]
72	72		}
73	73		else [h(g, ((z - E) - G)), n(g, o, ((z - E) - G), "change", y, r)]]
74	74		}
75	75		else [h(g, (z - E)), n(g, o, (z - E), "change", y, r)]]
76	76		}
77	77		else [h(g, z), n(g, o, z, "change", y, r)]
78	78		}), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
79	79		}
80	80
81	81
82	82
83	83		@Callable(v)
84	84		func withdraw () = {
85	85		let A = u(v)
86	86		let o = toBase58String(v.caller.bytes)
	87	+	let y = toBase58String(v.transactionId)
87	88		let k = (o + "_balance")
88	89		let z = {
89	90		let l = getInteger(this, k)
90	91		if ($isInstanceOf(l, "Int"))
91	92		then {
92	93		let m = l
93	94		m
94	95		}
95	96		else 0
96	97		}
97	98		if ((f > z))
98	99		then throw(("Min withdraw amount is" + toString(f)))
99		-	else {
100		-	let I = (o + "_withdraw_txs")
101		-	let J = ((((toString(z) + ":") + toBase58String(v.transactionId)) + ":") + w())
102		-	let K = {
103		-	let l = getString(this, I)
104		-	if ($isInstanceOf(l, "String"))
105		-	then {
106		-	let L = l
107		-	((L + ",") + J)
108		-	}
109		-	else J
110		-	}
111		-	ScriptResult(WriteSet([DataEntry(k, 0), DataEntry(I, K)]), TransferSet([ScriptTransfer(v.caller, (z + v.fee), unit)]))
112		-	}
	100	+	else ScriptResult(WriteSet([DataEntry(k, 0), DataEntry(((("withdraw_" + o) + "_") + y), ((toString(z) + ":") + w()))]), TransferSet([ScriptTransfer(v.caller, (z + v.fee), unit)]))
113	101		}
114	102
115	103
116	104
117	105		@Callable(v)
118		-	func register (M,N) = {
	106	+	func register (I,J) = {
119	107		let A = u(v)
120	108		if ((take(toBase58String(v.transactionId), 3) != "123"))
121	109		then throw("proof of work failed")
122	110		else {
123	111		let o = toBase58String(v.caller.bytes)
124	112		if (isDefined(s(o)))
125	113		then throw("Already registered")
126	114		else {
127		-	let O = (M + "_referrals")
128		-	let P = {
129		-	let l = getString(this, O)
	115	+	let K = (I + "_referrals")
	116	+	let L = {
	117	+	let l = getString(this, K)
130	118		if ($isInstanceOf(l, "String"))
131	119		then {
132		-	let Q = l
133		-	((Q + ",") + o)
	120	+	let M = l
	121	+	((M + ",") + o)
134	122		}
135	123		else o
136	124		}
137		-	let R = (M + {
138		-	let l = s(M)
	125	+	let N = (I + {
	126	+	let l = s(I)
139	127		if ($isInstanceOf(l, "String"))
140	128		then {
141		-	let S = l
142		-	(("," + S) + {
143		-	let T = s(S)
144		-	if ($isInstanceOf(T, "String"))
	129	+	let O = l
	130	+	(("," + O) + {
	131	+	let P = s(O)
	132	+	if ($isInstanceOf(P, "String"))
145	133		then {
146		-	let U = T
147		-	("," + U)
	134	+	let Q = P
	135	+	("," + Q)
148	136		}
149	137		else ""
150	138		})
151	139		}
152	140		else ""
153	141		})
154		-	ScriptResult(WriteSet([DataEntry((o + "_referer"), M), DataEntry(O, P), DataEntry((o + "_refstructure"), R)]), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
	142	+	ScriptResult(WriteSet([DataEntry((o + "_referer"), I), DataEntry(K, L), DataEntry((o + "_refstructure"), N)]), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
155	143		}
156	144		}
157	145		}
158	146
159	147

github/deemru/w8io/169f3d6 
46.23 ms ◑