w8 · tx · GSr···ApH

tx · GSr54MwU9EAHAPcM1KmrL55ru6cGc5WwZVxudhBMtApH

3Msughfkwji8uccY4RAxuKWvNpnEscWyhHK:  -0.01400000 Waves

2019.06.27 20:19 [560828] smart account 3Msughfkwji8uccY4RAxuKWvNpnEscWyhHK > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GSr54MwU9EAHAPcM1KmrL55ru6cGc5WwZVxudhBMtApH",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1561655990394,
    "version": 1,
    "sender": "3Msughfkwji8uccY4RAxuKWvNpnEscWyhHK",
    "senderPublicKey": "AzyC6W7iD5HYehj2xef6xWKogmxDC6RaX9N1ST8P39bn",
    "proofs": [
        "45VHgdDKZ1F3eds1EJYEwcFLBzCRoBqfzbxiWX4e4epUCfaL9nH1j2RjNxUXfPjJC3NMvniJazvZREeKD7j8TYLZ"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAIAAAAAAZsZXZlbDEAAAAAAAAAAAUAAAAABmxldmVsMgAAAAAAAAAABQAAAAAGbGV2ZWwzAAAAAAAAAAAFAAAAAAhjYXNoQmFjawAAAAAAAAAABQAAAAAOY2hhbmdlT3duZXJLZXkCAAAALEFEMnZienBSM1pNWGlZMVpoQmRxNGlIMXd6NXc2dFVDSFB6MXZ2TmZ5Q3FFAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgAAAAdhZGRyZXNzAAAAA2luYwQAAAAKYmFsYW5jZUtleQkAASwAAAACBQAAAAdhZGRyZXNzAgAAAAhfYmFsYW5jZQkBAAAACURhdGFFbnRyeQAAAAIFAAAACmJhbGFuY2VLZXkJAABkAAAAAgUAAAADaW5jBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAACmJhbGFuY2VLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYgUAAAAHJG1hdGNoMAUAAAABYgAAAAAAAAAAAAEAAAAVaW5kZXhCYWxhbmNlSW5jcmVtZW50AAAABAAAAAdhZGRyZXNzAAAABW93bmVyAAAAA2luYwAAAAVsZXZlbAQAAAAGbG9nS2V5CQABLAAAAAIFAAAAB2FkZHJlc3MFAAAABWxldmVsBAAAAApyZWNvcmREYXRhCQABLAAAAAIFAAAABW93bmVyCQABpAAAAAEFAAAAA2luYwQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAAZsb2dLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAAEcHJldgUAAAAHJG1hdGNoMAkBAAAACURhdGFFbnRyeQAAAAIFAAAABmxvZ0tleQkAASwAAAACCQABLAAAAAIFAAAABHByZXYCAAAAASwFAAAACnJlY29yZERhdGEJAQAAAAlEYXRhRW50cnkAAAACBQAAAAZsb2dLZXkFAAAACnJlY29yZERhdGEBAAAACmdldFJlZmVyZXIAAAABAAAABHVzZXIJAAQdAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAR1c2VyAgAAAAhfcmVmZXJlcgAAAAMAAAABaQEAAAAEZnVuZAAAAAAEAAAABW93bmVyCQACWAAAAAEIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQQAAAAFYmxvY2sJAQAAAAdleHRyYWN0AAAAAQkAA+0AAAABBQAAAAZoZWlnaHQEAAAACm93bmVyQ29sb24JAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAABW93bmVyAgAAAAE6CQABpAAAAAEIBQAAAAVibG9jawAAAAl0aW1lc3RhbXACAAAAAToEAAAABmFtb3VudAgJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAAAAAZhbW91bnQJAQAAAAhXcml0ZVNldAAAAAEEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAVvd25lcgIAAAANX3JlZnN0cnVjdHVyZQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAhyZWZMaXN0UwUAAAAHJG1hdGNoMAQAAAAHcmVmTGlzdAkABLUAAAACBQAAAAhyZWZMaXN0UwIAAAABLAQAAAALcmVmTGlzdFNpemUJAAGQAAAAAQUAAAAHcmVmTGlzdAQAAAAJaW5jTGV2ZWwxCQAAaQAAAAIJAABoAAAAAgUAAAAGYW1vdW50BQAAAAZsZXZlbDEAAAAAAAAAA+gEAAAAC2luY0Nhc2hCYWNrCQAAaQAAAAIJAABoAAAAAgUAAAAGYW1vdW50BQAAAAhjYXNoQmFjawAAAAAAAAAD6AkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIFAAAABW93bmVyBQAAAAtpbmNDYXNoQmFjawkABEwAAAACCQEAAAAVaW5kZXhCYWxhbmNlSW5jcmVtZW50AAAABAUAAAAFb3duZXIFAAAACm93bmVyQ29sb24FAAAAC2luY0Nhc2hCYWNrAgAAAA1fdHhzX2Nhc2hiYWNrCQAETAAAAAIJAQAAABBiYWxhbmNlSW5jcmVtZW50AAAAAgkAAZEAAAACBQAAAAdyZWZMaXN0AAAAAAAAAAAABQAAAAlpbmNMZXZlbDEJAARMAAAAAgkBAAAAFWluZGV4QmFsYW5jZUluY3JlbWVudAAAAAQJAAGRAAAAAgUAAAAHcmVmTGlzdAAAAAAAAAAAAAUAAAAKb3duZXJDb2xvbgUAAAAJaW5jTGV2ZWwxAgAAAAdfdHhzX2wxAwkAAGcAAAACBQAAAAtyZWZMaXN0U2l6ZQAAAAAAAAAAAgQAAAAJaW5jTGV2ZWwyCQAAaQAAAAIJAABoAAAAAgUAAAAGYW1vdW50BQAAAAZsZXZlbDIAAAAAAAAAA+gJAARMAAAAAgkBAAAAEGJhbGFuY2VJbmNyZW1lbnQAAAACCQABkQAAAAIFAAAAB3JlZkxpc3QAAAAAAAAAAAEFAAAACWluY0xldmVsMgkABEwAAAACCQEAAAAVaW5kZXhCYWxhbmNlSW5jcmVtZW50AAAABAkAAZEAAAACBQAAAAdyZWZMaXN0AAAAAAAAAAABBQAAAApvd25lckNvbG9uBQAAAAlpbmNMZXZlbDICAAAAB190eHNfbDIDCQAAZwAAAAIFAAAAC3JlZkxpc3RTaXplAAAAAAAAAAADBAAAAAlpbmNMZXZlbDMJAABpAAAAAgkAAGgAAAACBQAAAAZhbW91bnQFAAAABmxldmVsMwAAAAAAAAAD6AkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIJAAGRAAAAAgUAAAAHcmVmTGlzdAAAAAAAAAAAAgUAAAAJaW5jTGV2ZWwzCQAETAAAAAIJAQAAABVpbmRleEJhbGFuY2VJbmNyZW1lbnQAAAAECQABkQAAAAIFAAAAB3JlZkxpc3QAAAAAAAAAAAIFAAAACm93bmVyQ29sb24FAAAACWluY0xldmVsMwIAAAAHX3R4c19sMwkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIFAAAADmNoYW5nZU93bmVyS2V5CQAAZQAAAAIJAABlAAAAAgkAAGUAAAACBQAAAAZhbW91bnQFAAAACWluY0xldmVsMQUAAAAJaW5jTGV2ZWwyBQAAAAlpbmNMZXZlbDMJAARMAAAAAgkBAAAAFWluZGV4QmFsYW5jZUluY3JlbWVudAAAAAQFAAAADmNoYW5nZU93bmVyS2V5BQAAAApvd25lckNvbG9uCQAAZQAAAAIJAABlAAAAAgkAAGUAAAACBQAAAAZhbW91bnQFAAAACWluY0xldmVsMQUAAAAJaW5jTGV2ZWwyBQAAAAlpbmNMZXZlbDMCAAAAC190eHNfY2hhbmdlBQAAAANuaWwJAARMAAAAAgkBAAAAEGJhbGFuY2VJbmNyZW1lbnQAAAACBQAAAA5jaGFuZ2VPd25lcktleQkAAGUAAAACCQAAZQAAAAIFAAAABmFtb3VudAUAAAAJaW5jTGV2ZWwxBQAAAAlpbmNMZXZlbDIJAARMAAAAAgkBAAAAFWluZGV4QmFsYW5jZUluY3JlbWVudAAAAAQFAAAADmNoYW5nZU93bmVyS2V5BQAAAApvd25lckNvbG9uCQAAZQAAAAIJAABlAAAAAgUAAAAGYW1vdW50BQAAAAlpbmNMZXZlbDEFAAAACWluY0xldmVsMgIAAAALX3R4c19jaGFuZ2UFAAAAA25pbAkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIFAAAADmNoYW5nZU93bmVyS2V5CQAAZQAAAAIFAAAABmFtb3VudAUAAAAJaW5jTGV2ZWwxCQAETAAAAAIJAQAAABVpbmRleEJhbGFuY2VJbmNyZW1lbnQAAAAEBQAAAA5jaGFuZ2VPd25lcktleQUAAAAKb3duZXJDb2xvbgkAAGUAAAACBQAAAAZhbW91bnQFAAAACWluY0xldmVsMQIAAAALX3R4c19jaGFuZ2UFAAAAA25pbAkABEwAAAACCQEAAAAQYmFsYW5jZUluY3JlbWVudAAAAAIFAAAADmNoYW5nZU93bmVyS2V5BQAAAAZhbW91bnQJAARMAAAAAgkBAAAAFWluZGV4QmFsYW5jZUluY3JlbWVudAAAAAQFAAAADmNoYW5nZU93bmVyS2V5BQAAAApvd25lckNvbG9uBQAAAAZhbW91bnQCAAAAC190eHNfY2hhbmdlBQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAABAAAABmFtb3VudAMJAABnAAAAAgAAAAAAAAAAAAUAAAAGYW1vdW50CQAAAgAAAAECAAAADmludmFsaWQgYW1vdW50BAAAAAVvd25lcgkAAlgAAAABCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkEAAAACm5ld0JhbGFuY2UJAABlAAAAAgQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAABW93bmVyAgAAAAhfYmFsYW5jZQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFiBQAAAAckbWF0Y2gwBQAAAAFiAAAAAAAAAAAABQAAAAZhbW91bnQDCQAAZgAAAAIAAAAAAAAAAAAFAAAACm5ld0JhbGFuY2UJAAACAAAAAQIAAAAtdHJhbnNhY3Rpb24gbGVhZHMgdG8gbmVnYXRpdmUgYWNjb3VudCBiYWxhbmNlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAVvd25lcgIAAAAIX2JhbGFuY2UFAAAACm5ld0JhbGFuY2UFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAABmFtb3VudAUAAAAEdW5pdAUAAAADbmlsAAAAAWkBAAAACHJlZ2lzdGVyAAAAAQAAAAdyZWZlcmVyBAAAAAVvd25lcgkAAlgAAAABCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkDCQEAAAAJaXNEZWZpbmVkAAAAAQkBAAAACmdldFJlZmVyZXIAAAABBQAAAAVvd25lcgkAAAIAAAABAgAAABJBbHJlYWR5IHJlZ2lzdGVyZWQEAAAAC3JlZmVyYWxzS2V5CQABLAAAAAIFAAAAB3JlZmVyZXICAAAACl9yZWZlcnJhbHMEAAAACHJlZmVyYWxzBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAC3JlZmVyYWxzS2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAB29sZFJlZnMFAAAAByRtYXRjaDAJAAEsAAAAAgkAASwAAAACBQAAAAdvbGRSZWZzAgAAAAEsBQAAAAVvd25lcgUAAAAFb3duZXIEAAAADHJlZlN0cnVjdHVyZQkAASwAAAACBQAAAAdyZWZlcmVyBAAAAAckbWF0Y2gwCQEAAAAKZ2V0UmVmZXJlcgAAAAEFAAAAB3JlZmVyZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAAIcmVmZXJlcjIFAAAAByRtYXRjaDAJAAEsAAAAAgkAASwAAAACAgAAAAEsBQAAAAhyZWZlcmVyMgQAAAAHJG1hdGNoMQkBAAAACmdldFJlZmVyZXIAAAABBQAAAAhyZWZlcmVyMgMJAAABAAAAAgUAAAAHJG1hdGNoMQIAAAAGU3RyaW5nBAAAAAhyZWZlcmVyMwUAAAAHJG1hdGNoMQkAASwAAAACAgAAAAEsBQAAAAhyZWZlcmVyMwIAAAAAAgAAAAAJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAFb3duZXICAAAACF9yZWZlcmVyBQAAAAdyZWZlcmVyCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAtyZWZlcmFsc0tleQUAAAAIcmVmZXJhbHMJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAFb3duZXICAAAADV9yZWZzdHJ1Y3R1cmUFAAAADHJlZlN0cnVjdHVyZQUAAAADbmlsAAAAAAEfoz4=",
    "chainId": 84,
    "height": 560828,
    "spentComplexity": 0
}

View: original | compacted
Prev: 6fatmETngZbm9wQqjWPJbsSUnJVv5mmxa5etyoMyhD3Y
Next: 4uzsj57QVs3MQ5VuPmaN2NDvN43kRX7j3Qjvx6uertB4

Diff: 
Old New Differences
8 8  let level3 = 5
9 9  
10 10  let cashBack = 5
11 + 
12 + let changeOwnerKey = "AD2vbzpR3ZMXiY1ZhBdq4iH1wz5w6tUCHPz1vvNfyCqE"
11 13  
12 14  func balanceIncrement (address,inc) = {
13 15      let balanceKey = (address + "_balance")
53 55  [balanceIncrement(refList[1], incLevel2), indexBalanceIncrement(refList[1], ownerColon, incLevel2, "_txs_l2"), if ((refListSize >= 3))
54 56                          then {
55 57                              let incLevel3 = ((amount * level3) / 1000)
56 - [balanceIncrement(refList[2], incLevel3), indexBalanceIncrement(refList[2], ownerColon, incLevel3, "_txs_l3")]
58 + [balanceIncrement(refList[2], incLevel3), indexBalanceIncrement(refList[2], ownerColon, incLevel3, "_txs_l3"), balanceIncrement(changeOwnerKey, (((amount - incLevel1) - incLevel2) - incLevel3)), indexBalanceIncrement(changeOwnerKey, ownerColon, (((amount - incLevel1) - incLevel2) - incLevel3), "_txs_change")]
57 59                              }
58 -                         else nil]
60 +                         else [balanceIncrement(changeOwnerKey, ((amount - incLevel1) - incLevel2)), indexBalanceIncrement(changeOwnerKey, ownerColon, ((amount - incLevel1) - incLevel2), "_txs_change")]]
59 61                      }
60 -                 else nil]
62 +                 else [balanceIncrement(changeOwnerKey, (amount - incLevel1)), indexBalanceIncrement(changeOwnerKey, ownerColon, (amount - incLevel1), "_txs_change")]]
61 63          case _ => 
62 -             nil
64 + [balanceIncrement(changeOwnerKey, amount), indexBalanceIncrement(changeOwnerKey, ownerColon, amount, "_txs_change")]
63 65      })
64 66      }
65 67  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let level1 = 5
5 5  
6 6  let level2 = 5
7 7  
8 8  let level3 = 5
9 9  
10 10  let cashBack = 5
11 + 
12 + let changeOwnerKey = "AD2vbzpR3ZMXiY1ZhBdq4iH1wz5w6tUCHPz1vvNfyCqE"
11 13  
12 14  func balanceIncrement (address,inc) = {
13 15      let balanceKey = (address + "_balance")
14 16      DataEntry(balanceKey, (inc +     match getInteger(this, balanceKey) {
15 17          case b: Int => 
16 18              b
17 19          case _ => 
18 20              0
19 21      }))
20 22      }
21 23  
22 24  
23 25  func indexBalanceIncrement (address,owner,inc,level) = {
24 26      let logKey = (address + level)
25 27      let recordData = (owner + toString(inc))
26 28      match getString(this, logKey) {
27 29          case prev: String => 
28 30              DataEntry(logKey, ((prev + ",") + recordData))
29 31          case _ => 
30 32              DataEntry(logKey, recordData)
31 33      }
32 34      }
33 35  
34 36  
35 37  func getReferer (user) = getString(this, (user + "_referer"))
36 38  
37 39  
38 40  @Callable(i)
39 41  func fund () = {
40 42      let owner = toBase58String(i.callerPublicKey)
41 43      let block = extract(blockInfoByHeight(height))
42 44      let ownerColon = (((owner + ":") + toString(block.timestamp)) + ":")
43 45      let amount = extract(i.payment).amount
44 46      WriteSet(    match getString(this, (owner + "_refstructure")) {
45 47          case refListS: String => 
46 48              let refList = split(refListS, ",")
47 49              let refListSize = size(refList)
48 50              let incLevel1 = ((amount * level1) / 1000)
49 51              let incCashBack = ((amount * cashBack) / 1000)
50 52  [balanceIncrement(owner, incCashBack), indexBalanceIncrement(owner, ownerColon, incCashBack, "_txs_cashback"), balanceIncrement(refList[0], incLevel1), indexBalanceIncrement(refList[0], ownerColon, incLevel1, "_txs_l1"), if ((refListSize >= 2))
51 53                  then {
52 54                      let incLevel2 = ((amount * level2) / 1000)
53 55  [balanceIncrement(refList[1], incLevel2), indexBalanceIncrement(refList[1], ownerColon, incLevel2, "_txs_l2"), if ((refListSize >= 3))
54 56                          then {
55 57                              let incLevel3 = ((amount * level3) / 1000)
56 - [balanceIncrement(refList[2], incLevel3), indexBalanceIncrement(refList[2], ownerColon, incLevel3, "_txs_l3")]
58 + [balanceIncrement(refList[2], incLevel3), indexBalanceIncrement(refList[2], ownerColon, incLevel3, "_txs_l3"), balanceIncrement(changeOwnerKey, (((amount - incLevel1) - incLevel2) - incLevel3)), indexBalanceIncrement(changeOwnerKey, ownerColon, (((amount - incLevel1) - incLevel2) - incLevel3), "_txs_change")]
57 59                              }
58 -                         else nil]
60 +                         else [balanceIncrement(changeOwnerKey, ((amount - incLevel1) - incLevel2)), indexBalanceIncrement(changeOwnerKey, ownerColon, ((amount - incLevel1) - incLevel2), "_txs_change")]]
59 61                      }
60 -                 else nil]
62 +                 else [balanceIncrement(changeOwnerKey, (amount - incLevel1)), indexBalanceIncrement(changeOwnerKey, ownerColon, (amount - incLevel1), "_txs_change")]]
61 63          case _ => 
62 -             nil
64 + [balanceIncrement(changeOwnerKey, amount), indexBalanceIncrement(changeOwnerKey, ownerColon, amount, "_txs_change")]
63 65      })
64 66      }
65 67  
66 68  
67 69  
68 70  @Callable(i)
69 71  func withdraw (amount) = if ((0 >= amount))
70 72      then throw("invalid amount")
71 73      else {
72 74          let owner = toBase58String(i.callerPublicKey)
73 75          let newBalance = (        match getInteger(this, (owner + "_balance")) {
74 76              case b: Int => 
75 77                  b
76 78              case _ => 
77 79                  0
78 80          } - amount)
79 81          if ((0 > newBalance))
80 82              then throw("transaction leads to negative account balance")
81 83              else ScriptResult(WriteSet([DataEntry((owner + "_balance"), newBalance)]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
82 84          }
83 85  
84 86  
85 87  
86 88  @Callable(i)
87 89  func register (referer) = {
88 90      let owner = toBase58String(i.callerPublicKey)
89 91      if (isDefined(getReferer(owner)))
90 92          then throw("Already registered")
91 93          else {
92 94              let referalsKey = (referer + "_referrals")
93 95              let referals =             match getString(this, referalsKey) {
94 96                  case oldRefs: String => 
95 97                      ((oldRefs + ",") + owner)
96 98                  case _ => 
97 99                      owner
98 100              }
99 101              let refStructure = (referer +             match getReferer(referer) {
100 102                  case referer2: String => 
101 103                      (("," + referer2) +                     match getReferer(referer2) {
102 104                          case referer3: String => 
103 105                              ("," + referer3)
104 106                          case _ => 
105 107                              ""
106 108                      })
107 109                  case _ => 
108 110                      ""
109 111              })
110 112              WriteSet([DataEntry((owner + "_referer"), referer), DataEntry(referalsKey, referals), DataEntry((owner + "_refstructure"), refStructure)])
111 113              }
112 114      }
113 115  
114 116

Old	New		Differences
8	8		let level3 = 5
9	9
10	10		let cashBack = 5
	11	+
	12	+	let changeOwnerKey = "AD2vbzpR3ZMXiY1ZhBdq4iH1wz5w6tUCHPz1vvNfyCqE"
11	13
12	14		func balanceIncrement (address,inc) = {
13	15		let balanceKey = (address + "_balance")

53	55		[balanceIncrement(refList[1], incLevel2), indexBalanceIncrement(refList[1], ownerColon, incLevel2, "_txs_l2"), if ((refListSize >= 3))
54	56		then {
55	57		let incLevel3 = ((amount * level3) / 1000)
56		-	[balanceIncrement(refList[2], incLevel3), indexBalanceIncrement(refList[2], ownerColon, incLevel3, "_txs_l3")]
	58	+	[balanceIncrement(refList[2], incLevel3), indexBalanceIncrement(refList[2], ownerColon, incLevel3, "_txs_l3"), balanceIncrement(changeOwnerKey, (((amount - incLevel1) - incLevel2) - incLevel3)), indexBalanceIncrement(changeOwnerKey, ownerColon, (((amount - incLevel1) - incLevel2) - incLevel3), "_txs_change")]
57	59		}
58		-	else ~~nil~~]
	60	+	else [balanceIncrement(changeOwnerKey, ((amount - incLevel1) - incLevel2)), indexBalanceIncrement(changeOwnerKey, ownerColon, ((amount - incLevel1) - incLevel2), "_txs_change")]]
59	61		}
60		-	else ~~nil~~]
	62	+	else [balanceIncrement(changeOwnerKey, (amount - incLevel1)), indexBalanceIncrement(changeOwnerKey, ownerColon, (amount - incLevel1), "_txs_change")]]
61	63		case _ =>
62		-	~~nil~~
	64	+	[balanceIncrement(changeOwnerKey, amount), indexBalanceIncrement(changeOwnerKey, ownerColon, amount, "_txs_change")]
63	65		})
64	66		}
65	67

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let level1 = 5
5	5
6	6		let level2 = 5
7	7
8	8		let level3 = 5
9	9
10	10		let cashBack = 5
	11	+
	12	+	let changeOwnerKey = "AD2vbzpR3ZMXiY1ZhBdq4iH1wz5w6tUCHPz1vvNfyCqE"
11	13
12	14		func balanceIncrement (address,inc) = {
13	15		let balanceKey = (address + "_balance")
14	16		DataEntry(balanceKey, (inc + match getInteger(this, balanceKey) {
15	17		case b: Int =>
16	18		b
17	19		case _ =>
18	20		0
19	21		}))
20	22		}
21	23
22	24
23	25		func indexBalanceIncrement (address,owner,inc,level) = {
24	26		let logKey = (address + level)
25	27		let recordData = (owner + toString(inc))
26	28		match getString(this, logKey) {
27	29		case prev: String =>
28	30		DataEntry(logKey, ((prev + ",") + recordData))
29	31		case _ =>
30	32		DataEntry(logKey, recordData)
31	33		}
32	34		}
33	35
34	36
35	37		func getReferer (user) = getString(this, (user + "_referer"))
36	38
37	39
38	40		@Callable(i)
39	41		func fund () = {
40	42		let owner = toBase58String(i.callerPublicKey)
41	43		let block = extract(blockInfoByHeight(height))
42	44		let ownerColon = (((owner + ":") + toString(block.timestamp)) + ":")
43	45		let amount = extract(i.payment).amount
44	46		WriteSet( match getString(this, (owner + "_refstructure")) {
45	47		case refListS: String =>
46	48		let refList = split(refListS, ",")
47	49		let refListSize = size(refList)
48	50		let incLevel1 = ((amount * level1) / 1000)
49	51		let incCashBack = ((amount * cashBack) / 1000)
50	52		[balanceIncrement(owner, incCashBack), indexBalanceIncrement(owner, ownerColon, incCashBack, "_txs_cashback"), balanceIncrement(refList[0], incLevel1), indexBalanceIncrement(refList[0], ownerColon, incLevel1, "_txs_l1"), if ((refListSize >= 2))
51	53		then {
52	54		let incLevel2 = ((amount * level2) / 1000)
53	55		[balanceIncrement(refList[1], incLevel2), indexBalanceIncrement(refList[1], ownerColon, incLevel2, "_txs_l2"), if ((refListSize >= 3))
54	56		then {
55	57		let incLevel3 = ((amount * level3) / 1000)
56		-	[balanceIncrement(refList[2], incLevel3), indexBalanceIncrement(refList[2], ownerColon, incLevel3, "_txs_l3")]
	58	+	[balanceIncrement(refList[2], incLevel3), indexBalanceIncrement(refList[2], ownerColon, incLevel3, "_txs_l3"), balanceIncrement(changeOwnerKey, (((amount - incLevel1) - incLevel2) - incLevel3)), indexBalanceIncrement(changeOwnerKey, ownerColon, (((amount - incLevel1) - incLevel2) - incLevel3), "_txs_change")]
57	59		}
58		-	else ~~nil~~]
	60	+	else [balanceIncrement(changeOwnerKey, ((amount - incLevel1) - incLevel2)), indexBalanceIncrement(changeOwnerKey, ownerColon, ((amount - incLevel1) - incLevel2), "_txs_change")]]
59	61		}
60		-	else ~~nil~~]
	62	+	else [balanceIncrement(changeOwnerKey, (amount - incLevel1)), indexBalanceIncrement(changeOwnerKey, ownerColon, (amount - incLevel1), "_txs_change")]]
61	63		case _ =>
62		-	~~nil~~
	64	+	[balanceIncrement(changeOwnerKey, amount), indexBalanceIncrement(changeOwnerKey, ownerColon, amount, "_txs_change")]
63	65		})
64	66		}
65	67
66	68
67	69
68	70		@Callable(i)
69	71		func withdraw (amount) = if ((0 >= amount))
70	72		then throw("invalid amount")
71	73		else {
72	74		let owner = toBase58String(i.callerPublicKey)
73	75		let newBalance = ( match getInteger(this, (owner + "_balance")) {
74	76		case b: Int =>
75	77		b
76	78		case _ =>
77	79		0
78	80		} - amount)
79	81		if ((0 > newBalance))
80	82		then throw("transaction leads to negative account balance")
81	83		else ScriptResult(WriteSet([DataEntry((owner + "_balance"), newBalance)]), TransferSet([ScriptTransfer(i.caller, amount, unit)]))
82	84		}
83	85
84	86
85	87
86	88		@Callable(i)
87	89		func register (referer) = {
88	90		let owner = toBase58String(i.callerPublicKey)
89	91		if (isDefined(getReferer(owner)))
90	92		then throw("Already registered")
91	93		else {
92	94		let referalsKey = (referer + "_referrals")
93	95		let referals = match getString(this, referalsKey) {
94	96		case oldRefs: String =>
95	97		((oldRefs + ",") + owner)
96	98		case _ =>
97	99		owner
98	100		}
99	101		let refStructure = (referer + match getReferer(referer) {
100	102		case referer2: String =>
101	103		(("," + referer2) + match getReferer(referer2) {
102	104		case referer3: String =>
103	105		("," + referer3)
104	106		case _ =>
105	107		""
106	108		})
107	109		case _ =>
108	110		""
109	111		})
110	112		WriteSet([DataEntry((owner + "_referer"), referer), DataEntry(referalsKey, referals), DataEntry((owner + "_refstructure"), refStructure)])
111	113		}
112	114		}
113	115
114	116

github/deemru/w8io/03bedc9 
35.48 ms ◑