w8 · tx · ExY···WVp

tx · ExYYRLYjt31HtRiRe7ApstB5yJpowHFTPPCRTLmqaWVp

3N1WYGqfoXEG9F7UvMfHqSEyphXEDuAMvDB:  -0.01400000 Waves

2019.07.05 20:04 [572475] smart account 3N1WYGqfoXEG9F7UvMfHqSEyphXEDuAMvDB > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "ExYYRLYjt31HtRiRe7ApstB5yJpowHFTPPCRTLmqaWVp",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1562346263958,
    "version": 1,
    "sender": "3N1WYGqfoXEG9F7UvMfHqSEyphXEDuAMvDB",
    "senderPublicKey": "3Vwh6XFkVS7FzMVfQLSNEUG48z7YumcE7bSNqmRo7k69",
    "proofs": [
        "3yWaj4gPVwXLaUcpzW4wvL3xH8ZjNkpxg5rywbEbZkRaHWveZyGBfoFbuWu82t5dpDxZngviBiFqud36skwAghpZ"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAMAAAAAAZsZXZlbDEAAAAAAAAAAPoAAAAABmxldmVsMgAAAAAAAAAA+gAAAAAGbGV2ZWwzAAAAAAAAAAD6AAAAAAhjYXNoQmFjawAAAAAAAAAA+gAAAAAGbWF4RmVlAAAAAAAATEtAAAAAAAttaW5XaXRoZHJhdwAAAAAAAA9CQAAAAAAOY2hhbmdlT3duZXJLZXkCAAAALEFEMnZienBSM1pNWGlZMVpoQmRxNGlIMXd6NXc2dFVDSFB6MXZ2TmZ5Q3FFAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgAAAAdhZGRyZXNzAAAAA2luYwQAAAAKYmFsYW5jZUtleQkAASwAAAACBQAAAAdhZGRyZXNzAgAAAAhfYmFsYW5jZQkBAAAACURhdGFFbnRyeQAAAAIFAAAACmJhbGFuY2VLZXkJAABkAAAAAgUAAAADaW5jBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAACmJhbGFuY2VLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYgUAAAAHJG1hdGNoMAUAAAABYgAAAAAAAAAAAAEAAAAWcmVjb3JkQmFsYW5jZUluY3JlbWVudAAAAAYAAAAHYWRkcmVzcwAAAAVvd25lcgAAAANpbmMAAAAFbGV2ZWwAAAAEdHhJZAAAAAl0aW1lc3RhbXAJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAVmdW5kXwUAAAAHYWRkcmVzcwIAAAABXwUAAAAEdHhJZAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAAB2FkZHJlc3MCAAAAAToFAAAABW93bmVyAgAAAAE6CQABpAAAAAEFAAAAA2luYwIAAAABOgUAAAAFbGV2ZWwCAAAAAToFAAAACXRpbWVzdGFtcAEAAAAKZ2V0UmVmZXJlcgAAAAEAAAAEdXNlcgkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABHVzZXICAAAACF9yZWZlcmVyAQAAAAhjaGVja0ZlZQAAAAEAAAABaQMJAABmAAAAAggFAAAAAWkAAAADZmVlBQAAAAZtYXhGZWUJAAACAAAAAQIAAAAWdW5yZWFzb25hYmxlIGxhcmdlIGZlZQYBAAAADGdldFRpbWVzdGFtcAAAAAAEAAAABWJsb2NrCQEAAAAHZXh0cmFjdAAAAAEJAAPtAAAAAQUAAAAGaGVpZ2h0CQABpAAAAAEIBQAAAAVibG9jawAAAAl0aW1lc3RhbXAAAAADAAAAAWkBAAAABGZ1bmQAAAAABAAAAAVvd25lcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAR0eGlkCQACWAAAAAEIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQEAAAACXRpbWVzdGFtcAkBAAAADGdldFRpbWVzdGFtcAAAAAAEAAAABmFtb3VudAgJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAAAAAZhbW91bnQEAAAAAmNmCQEAAAAIY2hlY2tGZWUAAAABBQAAAAFpCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABW93bmVyAgAAAA1fcmVmc3RydWN0dXJlAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAACHJlZkxpc3RTBQAAAAckbWF0Y2gwBAAAAAdyZWZMaXN0CQAEtQAAAAIFAAAACHJlZkxpc3RTAgAAAAEsBAAAAAtyZWZMaXN0U2l6ZQkAAZAAAAABBQAAAAdyZWZMaXN0BAAAAAlpbmNMZXZlbDEJAABpAAAAAgkAAGgAAAACBQAAAAZhbW91bnQFAAAABmxldmVsMQAAAAAAAAAD6AQAAAALaW5jQ2FzaEJhY2sJAABpAAAAAgkAAGgAAAACBQAAAAZhbW91bnQFAAAACGNhc2hCYWNrAAAAAAAAAAPoCQAETAAAAAIJAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgUAAAAFb3duZXIFAAAAC2luY0Nhc2hCYWNrCQAETAAAAAIJAQAAABZyZWNvcmRCYWxhbmNlSW5jcmVtZW50AAAABgUAAAAFb3duZXIFAAAABW93bmVyBQAAAAtpbmNDYXNoQmFjawIAAAANX3R4c19jYXNoYmFjawUAAAAEdHhpZAUAAAAJdGltZXN0YW1wCQAETAAAAAIJAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgkAAZEAAAACBQAAAAdyZWZMaXN0AAAAAAAAAAAABQAAAAlpbmNMZXZlbDEJAARMAAAAAgkBAAAAFnJlY29yZEJhbGFuY2VJbmNyZW1lbnQAAAAGCQABkQAAAAIFAAAAB3JlZkxpc3QAAAAAAAAAAAAFAAAABW93bmVyBQAAAAlpbmNMZXZlbDECAAAAB190eHNfbDEFAAAABHR4aWQFAAAACXRpbWVzdGFtcAMJAABnAAAAAgUAAAALcmVmTGlzdFNpemUAAAAAAAAAAAIEAAAACWluY0xldmVsMgkAAGkAAAACCQAAaAAAAAIFAAAABmFtb3VudAUAAAAGbGV2ZWwyAAAAAAAAAAPoCQAETAAAAAIJAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgkAAZEAAAACBQAAAAdyZWZMaXN0AAAAAAAAAAABBQAAAAlpbmNMZXZlbDIJAARMAAAAAgkBAAAAFnJlY29yZEJhbGFuY2VJbmNyZW1lbnQAAAAGCQABkQAAAAIFAAAAB3JlZkxpc3QAAAAAAAAAAAEFAAAABW93bmVyBQAAAAlpbmNMZXZlbDICAAAAB190eHNfbDIFAAAABHR4aWQFAAAACXRpbWVzdGFtcAMJAABnAAAAAgUAAAALcmVmTGlzdFNpemUAAAAAAAAAAAMEAAAACWluY0xldmVsMwkAAGkAAAACCQAAaAAAAAIFAAAABmFtb3VudAUAAAAGbGV2ZWwzAAAAAAAAAAPoCQAETAAAAAIJAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgkAAZEAAAACBQAAAAdyZWZMaXN0AAAAAAAAAAACBQAAAAlpbmNMZXZlbDMJAARMAAAAAgkBAAAAFnJlY29yZEJhbGFuY2VJbmNyZW1lbnQAAAAGCQABkQAAAAIFAAAAB3JlZkxpc3QAAAAAAAAAAAIFAAAABW93bmVyBQAAAAlpbmNMZXZlbDMCAAAAB190eHNfbDMFAAAABHR4aWQFAAAACXRpbWVzdGFtcAkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIFAAAADmNoYW5nZU93bmVyS2V5CQAAZQAAAAIJAABlAAAAAgkAAGUAAAACBQAAAAZhbW91bnQFAAAACWluY0xldmVsMQUAAAAJaW5jTGV2ZWwyBQAAAAlpbmNMZXZlbDMJAARMAAAAAgkBAAAAFnJlY29yZEJhbGFuY2VJbmNyZW1lbnQAAAAGBQAAAA5jaGFuZ2VPd25lcktleQUAAAAFb3duZXIJAABlAAAAAgkAAGUAAAACCQAAZQAAAAIFAAAABmFtb3VudAUAAAAJaW5jTGV2ZWwxBQAAAAlpbmNMZXZlbDIFAAAACWluY0xldmVsMwIAAAALX3R4c19jaGFuZ2UFAAAABHR4aWQFAAAACXRpbWVzdGFtcAUAAAADbmlsCQAETAAAAAIJAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgUAAAAOY2hhbmdlT3duZXJLZXkJAABlAAAAAgkAAGUAAAACBQAAAAZhbW91bnQFAAAACWluY0xldmVsMQUAAAAJaW5jTGV2ZWwyCQAETAAAAAIJAQAAABZyZWNvcmRCYWxhbmNlSW5jcmVtZW50AAAABgUAAAAOY2hhbmdlT3duZXJLZXkFAAAABW93bmVyCQAAZQAAAAIJAABlAAAAAgUAAAAGYW1vdW50BQAAAAlpbmNMZXZlbDEFAAAACWluY0xldmVsMgIAAAALX3R4c19jaGFuZ2UFAAAABHR4aWQFAAAACXRpbWVzdGFtcAUAAAADbmlsCQAETAAAAAIJAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgUAAAAOY2hhbmdlT3duZXJLZXkJAABlAAAAAgUAAAAGYW1vdW50BQAAAAlpbmNMZXZlbDEJAARMAAAAAgkBAAAAFnJlY29yZEJhbGFuY2VJbmNyZW1lbnQAAAAGBQAAAA5jaGFuZ2VPd25lcktleQUAAAAFb3duZXIJAABlAAAAAgUAAAAGYW1vdW50BQAAAAlpbmNMZXZlbDECAAAAC190eHNfY2hhbmdlBQAAAAR0eGlkBQAAAAl0aW1lc3RhbXAFAAAAA25pbAkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIFAAAADmNoYW5nZU93bmVyS2V5BQAAAAZhbW91bnQJAARMAAAAAgkBAAAAFnJlY29yZEJhbGFuY2VJbmNyZW1lbnQAAAAGBQAAAA5jaGFuZ2VPd25lcktleQUAAAAFb3duZXIFAAAABmFtb3VudAIAAAALX3R4c19jaGFuZ2UFAAAABHR4aWQFAAAACXRpbWVzdGFtcAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcggFAAAAAWkAAAADZmVlBQAAAAR1bml0BQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAAABAAAAAJjZgkBAAAACGNoZWNrRmVlAAAAAQUAAAABaQQAAAAFb3duZXIJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAKYmFsYW5jZUtleQkAASwAAAACBQAAAAVvd25lcgIAAAAIX2JhbGFuY2UEAAAABmFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAApiYWxhbmNlS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWIFAAAAByRtYXRjaDAFAAAAAWIAAAAAAAAAAAADCQAAZgAAAAIFAAAAC21pbldpdGhkcmF3BQAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACAgAAABZNaW4gd2l0aGRyYXcgYW1vdW50IGlzCQABpAAAAAEFAAAAC21pbldpdGhkcmF3BAAAAA13aXRoZHJhd1R4S2V5CQABLAAAAAIFAAAABW93bmVyAgAAAA1fd2l0aGRyYXdfdHhzBAAAAAZyZWNvcmQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAAaQAAAABBQAAAAZhbW91bnQCAAAAAToJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAIAAAABOgkBAAAADGdldFRpbWVzdGFtcAAAAAAEAAAADndpdGhkcmF3VHhMaXN0BAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAADXdpdGhkcmF3VHhLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAAHcHJldlR4cwUAAAAHJG1hdGNoMAkAASwAAAACCQABLAAAAAIFAAAAB3ByZXZUeHMCAAAAASwFAAAABnJlY29yZAUAAAAGcmVjb3JkCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAKYmFsYW5jZUtleQAAAAAAAAAAAAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAANd2l0aGRyYXdUeEtleQUAAAAOd2l0aGRyYXdUeExpc3QFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAABkAAAAAgUAAAAGYW1vdW50CAUAAAABaQAAAANmZWUFAAAABHVuaXQFAAAAA25pbAAAAAFpAQAAAAhyZWdpc3RlcgAAAAIAAAAHcmVmZXJlcgAAAARzYWx0BAAAAAJjZgkBAAAACGNoZWNrRmVlAAAAAQUAAAABaQMJAQAAAAIhPQAAAAIJAAEvAAAAAgkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkAAAAAAAAAAADAgAAAAMxMjMJAAACAAAAAQIAAAAUcHJvb2Ygb2Ygd29yayBmYWlsZWQEAAAABW93bmVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDCQEAAAAJaXNEZWZpbmVkAAAAAQkBAAAACmdldFJlZmVyZXIAAAABBQAAAAVvd25lcgkAAAIAAAABAgAAABJBbHJlYWR5IHJlZ2lzdGVyZWQEAAAAC3JlZmVyYWxzS2V5CQABLAAAAAIFAAAAB3JlZmVyZXICAAAACl9yZWZlcnJhbHMEAAAACHJlZmVyYWxzBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAC3JlZmVyYWxzS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAB29sZFJlZnMFAAAAByRtYXRjaDAJAAEsAAAAAgkAASwAAAACBQAAAAdvbGRSZWZzAgAAAAEsBQAAAAVvd25lcgUAAAAFb3duZXIEAAAADHJlZlN0cnVjdHVyZQkAASwAAAACBQAAAAdyZWZlcmVyBAAAAAckbWF0Y2gwCQEAAAAKZ2V0UmVmZXJlcgAAAAEFAAAAB3JlZmVyZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAAIcmVmZXJlcjIFAAAAByRtYXRjaDAJAAEsAAAAAgkAASwAAAACAgAAAAEsBQAAAAhyZWZlcmVyMgQAAAAHJG1hdGNoMQkBAAAACmdldFJlZmVyZXIAAAABBQAAAAhyZWZlcmVyMgMJAAABAAAAAgUAAAAHJG1hdGNoMQIAAAAGU3RyaW5nBAAAAAhyZWZlcmVyMwUAAAAHJG1hdGNoMQkAASwAAAACAgAAAAEsBQAAAAhyZWZlcmVyMwIAAAAAAgAAAAAJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAABW93bmVyAgAAAAhfcmVmZXJlcgUAAAAHcmVmZXJlcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAALcmVmZXJhbHNLZXkFAAAACHJlZmVyYWxzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAABW93bmVyAgAAAA1fcmVmc3RydWN0dXJlBQAAAAxyZWZTdHJ1Y3R1cmUFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIIBQAAAAFpAAAAA2ZlZQUAAAAEdW5pdAUAAAADbmlsAAAAADnwALc=",
    "chainId": 84,
    "height": 572475,
    "spentComplexity": 0
}

View: original | compacted
Prev: DRPS2GubMdKx99a7UaqyrzRstnZdCZaWWYjo4mSAyahm
Next: none

Diff: 
Old New Differences
29 29      }
30 30  
31 31  
32 - func n (i,o,j,p,q,r) = DataEntry(((("fund_" + i) + "_") + q), (((((((i + ":") + o) + ":") + toString(j)) + ":") + p) + ":"))
32 + func n (i,o,j,p,q,r) = DataEntry(((("fund_" + i) + "_") + q), ((((((((i + ":") + o) + ":") + toString(j)) + ":") + p) + ":") + r))
33 33  
34 34  
35 35  func s (t) = getString(this, (t + "_referer"))
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 - func n (i,o,j,p,q,r) = DataEntry(((("fund_" + i) + "_") + q), (((((((i + ":") + o) + ":") + toString(j)) + ":") + p) + ":"))
32 + func n (i,o,j,p,q,r) = DataEntry(((("fund_" + i) + "_") + q), ((((((((i + ":") + 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, "_txs_cashback", y, r), h(C[0], E), n(C[0], o, E, "_txs_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, "_txs_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, "_txs_l3", y, r), h(g, (((z - E) - G) - H)), n(g, o, (((z - E) - G) - H), "_txs_change", y, r)]
72 72                                  }
73 73                              else [h(g, ((z - E) - G)), n(g, o, ((z - E) - G), "_txs_change", y, r)]]
74 74                          }
75 75                      else [h(g, (z - E)), n(g, o, (z - E), "_txs_change", y, r)]]
76 76                  }
77 77              else [h(g, z), n(g, o, z, "_txs_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 87      let k = (o + "_balance")
88 88      let z = {
89 89          let l = getInteger(this, k)
90 90          if ($isInstanceOf(l, "Int"))
91 91              then {
92 92                  let m = l
93 93                  m
94 94                  }
95 95              else 0
96 96          }
97 97      if ((f > z))
98 98          then throw(("Min withdraw amount is" + toString(f)))
99 99          else {
100 100              let I = (o + "_withdraw_txs")
101 101              let J = ((((toString(z) + ":") + toBase58String(v.transactionId)) + ":") + w())
102 102              let K = {
103 103                  let l = getString(this, I)
104 104                  if ($isInstanceOf(l, "String"))
105 105                      then {
106 106                          let L = l
107 107                          ((L + ",") + J)
108 108                          }
109 109                      else J
110 110                  }
111 111              ScriptResult(WriteSet([DataEntry(k, 0), DataEntry(I, K)]), TransferSet([ScriptTransfer(v.caller, (z + v.fee), unit)]))
112 112              }
113 113      }
114 114  
115 115  
116 116  
117 117  @Callable(v)
118 118  func register (M,N) = {
119 119      let A = u(v)
120 120      if ((take(toBase58String(v.transactionId), 3) != "123"))
121 121          then throw("proof of work failed")
122 122          else {
123 123              let o = toBase58String(v.caller.bytes)
124 124              if (isDefined(s(o)))
125 125                  then throw("Already registered")
126 126                  else {
127 127                      let O = (M + "_referrals")
128 128                      let P = {
129 129                          let l = getString(this, O)
130 130                          if ($isInstanceOf(l, "String"))
131 131                              then {
132 132                                  let Q = l
133 133                                  ((Q + ",") + o)
134 134                                  }
135 135                              else o
136 136                          }
137 137                      let R = (M + {
138 138                          let l = s(M)
139 139                          if ($isInstanceOf(l, "String"))
140 140                              then {
141 141                                  let S = l
142 142                                  (("," + S) + {
143 143                                      let T = s(S)
144 144                                      if ($isInstanceOf(T, "String"))
145 145                                          then {
146 146                                              let U = T
147 147                                              ("," + U)
148 148                                              }
149 149                                          else ""
150 150                                      })
151 151                                  }
152 152                              else ""
153 153                          })
154 154                      ScriptResult(WriteSet([DataEntry((o + "_referer"), M), DataEntry(O, P), DataEntry((o + "_refstructure"), R)]), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
155 155                      }
156 156              }
157 157      }
158 158  
159 159

Old	New		Differences
29	29		}
30	30
31	31
32		-	func n (i,o,j,p,q,r) = DataEntry(((("fund_" + i) + "_") + q), (((((((i + ":") + o) + ":") + toString(j)) + ":") + p) + ":"))
	32	+	func n (i,o,j,p,q,r) = DataEntry(((("fund_" + i) + "_") + q), ((((((((i + ":") + o) + ":") + toString(j)) + ":") + p) + ":") + r))
33	33
34	34
35	35		func s (t) = getString(this, (t + "_referer"))

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		-	func n (i,o,j,p,q,r) = DataEntry(((("fund_" + i) + "_") + q), (((((((i + ":") + o) + ":") + toString(j)) + ":") + p) + ":"))
	32	+	func n (i,o,j,p,q,r) = DataEntry(((("fund_" + i) + "_") + q), ((((((((i + ":") + 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, "_txs_cashback", y, r), h(C[0], E), n(C[0], o, E, "_txs_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, "_txs_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, "_txs_l3", y, r), h(g, (((z - E) - G) - H)), n(g, o, (((z - E) - G) - H), "_txs_change", y, r)]
72	72		}
73	73		else [h(g, ((z - E) - G)), n(g, o, ((z - E) - G), "_txs_change", y, r)]]
74	74		}
75	75		else [h(g, (z - E)), n(g, o, (z - E), "_txs_change", y, r)]]
76	76		}
77	77		else [h(g, z), n(g, o, z, "_txs_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	87		let k = (o + "_balance")
88	88		let z = {
89	89		let l = getInteger(this, k)
90	90		if ($isInstanceOf(l, "Int"))
91	91		then {
92	92		let m = l
93	93		m
94	94		}
95	95		else 0
96	96		}
97	97		if ((f > z))
98	98		then throw(("Min withdraw amount is" + toString(f)))
99	99		else {
100	100		let I = (o + "_withdraw_txs")
101	101		let J = ((((toString(z) + ":") + toBase58String(v.transactionId)) + ":") + w())
102	102		let K = {
103	103		let l = getString(this, I)
104	104		if ($isInstanceOf(l, "String"))
105	105		then {
106	106		let L = l
107	107		((L + ",") + J)
108	108		}
109	109		else J
110	110		}
111	111		ScriptResult(WriteSet([DataEntry(k, 0), DataEntry(I, K)]), TransferSet([ScriptTransfer(v.caller, (z + v.fee), unit)]))
112	112		}
113	113		}
114	114
115	115
116	116
117	117		@Callable(v)
118	118		func register (M,N) = {
119	119		let A = u(v)
120	120		if ((take(toBase58String(v.transactionId), 3) != "123"))
121	121		then throw("proof of work failed")
122	122		else {
123	123		let o = toBase58String(v.caller.bytes)
124	124		if (isDefined(s(o)))
125	125		then throw("Already registered")
126	126		else {
127	127		let O = (M + "_referrals")
128	128		let P = {
129	129		let l = getString(this, O)
130	130		if ($isInstanceOf(l, "String"))
131	131		then {
132	132		let Q = l
133	133		((Q + ",") + o)
134	134		}
135	135		else o
136	136		}
137	137		let R = (M + {
138	138		let l = s(M)
139	139		if ($isInstanceOf(l, "String"))
140	140		then {
141	141		let S = l
142	142		(("," + S) + {
143	143		let T = s(S)
144	144		if ($isInstanceOf(T, "String"))
145	145		then {
146	146		let U = T
147	147		("," + U)
148	148		}
149	149		else ""
150	150		})
151	151		}
152	152		else ""
153	153		})
154	154		ScriptResult(WriteSet([DataEntry((o + "_referer"), M), DataEntry(O, P), DataEntry((o + "_refstructure"), R)]), TransferSet([ScriptTransfer(v.caller, v.fee, unit)]))
155	155		}
156	156		}
157	157		}
158	158
159	159

github/deemru/w8io/c3f4982 
28.86 ms ◑