w8 · tx · EZ7···pLg

tx · EZ7ZwQuqipLSipS5WukT7hjpMmL83fAS8P8k3qEszpLg

3N3Aq1GcHD8bZMGyVgyvaTHrBM7EySFtJ1H:  -0.00600000 Waves

2022.06.18 20:36 [2102120] smart account 3N3Aq1GcHD8bZMGyVgyvaTHrBM7EySFtJ1H > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EZ7ZwQuqipLSipS5WukT7hjpMmL83fAS8P8k3qEszpLg",
    "fee": 600000,
    "feeAssetId": null,
    "timestamp": 1655573827074,
    "version": 2,
    "chainId": 84,
    "sender": "3N3Aq1GcHD8bZMGyVgyvaTHrBM7EySFtJ1H",
    "senderPublicKey": "69Rez9g3wdeHPiCsmjaaaK1GBhFjL79pxMPX9Fpk8S5e",
    "proofs": [
        "41zpzqW3Q1tJNsd7m6hfUshr4f4Npzhd1drzjhFmZfbdpCxpFVGio93p3tVBd6YZsMjaA8e6j3oyZ2SSzukum1Ta"
    ],
    "script": "base64:AAIFAAAAAAAAAA4IAhIFCgMIAQESAwoBCAAAABMAAAAAA1NFUAIAAAACX18AAAAABU1VTFQ2AAAAAAAAD0JAAAAAAAVNVUxUOAAAAAAABfXhAAAAAAAKQU5PVEVJRFNUUgIAAAAFV0FWRVMAAAAAB0FOT1RFSUQJAAJZAAAAAQUAAAAKQU5PVEVJRFNUUgEAAAAMZ2V0SW50T3JGYWlsAAAAAQAAAANrZXkJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkJAAEsAAAAAgkAASwAAAACAgAAAA9NYW5kYXRvcnkgdGhpcy4FAAAAA2tleQIAAAAPIGlzIG5vdCBkZWZpbmVkAQAAAAxnZXRTdHJPckVsc2UAAAACAAAAA2tleQAAAApkZWZhdWx0VmFsCQEAAAALdmFsdWVPckVsc2UAAAACCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQUAAAAKZGVmYXVsdFZhbAEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAQAAAANrZXkJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkJAAEsAAAAAgkAASwAAAACAgAAAA9NYW5kYXRvcnkgdGhpcy4FAAAAA2tleQIAAAAPIGlzIG5vdCBkZWZpbmVkAQAAABBnZXRBZGRyZXNzT3JGYWlsAAAAAQAAAANrZXkJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABCYAAAABCQEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAQUAAAADa2V5CQABLAAAAAIJAAEsAAAAAgIAAAAVRmFpbCB0byBjb252ZXJ0IHRoaXMuBQAAAANrZXkCAAAAEyB2YWx1ZSBpbnRvIEFkZHJlc3MBAAAAFXZhbGlkYXRlQWRkcmVzc09yRmFpbAAAAAEAAAAKYWRkcmVzc1N0cgQAAAAHYWRkcmVzcwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEJgAAAAEFAAAACmFkZHJlc3NTdHIJAAEsAAAAAgIAAAAdZmFpbCB0byBjb252ZXJ0IGludG8gYWRkcmVzcyAFAAAACmFkZHJlc3NTdHIDCQAAZgAAAAIAAAAAAAAAAAAICQAD7wAAAAEFAAAAB2FkZHJlc3MAAAAJYXZhaWxhYmxlCQEAAAAFdGhyb3cAAAAABQAAAAphZGRyZXNzU3RyAQAAABRrZXlOb2RlUmV3YXJkc1RvdGFscwAAAAEAAAAHYWRkcmVzcwkAASwAAAACAgAAAA4lcyVzX190b3RhbHNfXwUAAAAHYWRkcmVzcwEAAAASa2V5QW5vdGVBZGRyZXNzU3RyAAAAAAIAAAAXJXMlc19fY2ZnX19hbm90ZUFkZHJlc3MBAAAAEWtleVByb3RvY29sUGFydFg2AAAAAAIAAAAZJXMlc19fY2ZnX19wcm90b2NvbFBhcnRYNgEAAAATa2V5QmVuaWZpY2FyeVBhcnRYNgAAAAACAAAAGyVzJXNfX2NmZ19fYmVuaWZpY2FyeVBhcnRYNgEAAAAQa2V5UmV3YXJkSGlzdG9yeQAAAAIAAAALbm9kZUFkZHJlc3MAAAAEdHhJZAkABLkAAAACCQAETAAAAAICAAAABiVzJXMlcwkABEwAAAACAgAAAAdoaXN0b3J5CQAETAAAAAIJAAQlAAAAAQUAAAALbm9kZUFkZHJlc3MJAARMAAAAAgkAAlgAAAABBQAAAAR0eElkBQAAAANuaWwFAAAAA1NFUAEAAAARZGF0YVJld2FyZEhpc3RvcnkAAAADAAAAEGFub3RlQW1vdW50VG90YWwAAAAOYmVuZWZpY2lhcnlBbXQAAAALcHJvdG9jb2xBbXQJAAS5AAAAAgkABEwAAAACAgAAAA4lZCVkJWQlZCVkJWQlZAkABEwAAAACCQABpAAAAAEIBQAAAAlsYXN0QmxvY2sAAAAGaGVpZ2h0CQAETAAAAAIJAAGkAAAAAQgFAAAACWxhc3RCbG9jawAAAAl0aW1lc3RhbXAJAARMAAAAAgkAAaQAAAABBQAAABBhbm90ZUFtb3VudFRvdGFsCQAETAAAAAIJAAGkAAAAAQUAAAAOYmVuZWZpY2lhcnlBbXQJAARMAAAAAgkAAaQAAAABBQAAAAtwcm90b2NvbEFtdAUAAAADbmlsBQAAAANTRVABAAAAElJld2FyZEhpc3RvcnlFbnRyeQAAAAUAAAALbm9kZUFkZHJlc3MAAAAEdHhJZAAAAAhtaW5lZEFtdAAAAA5iZW5lZmljaWFyeUFtdAAAAAtwcm90b2NvbEFtdAkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAEGtleVJld2FyZEhpc3RvcnkAAAACBQAAAAtub2RlQWRkcmVzcwUAAAAEdHhJZAkBAAAAEWRhdGFSZXdhcmRIaXN0b3J5AAAAAwUAAAAIbWluZWRBbXQFAAAADmJlbmVmaWNpYXJ5QW10BQAAAAtwcm90b2NvbEFtdAEAAAAQZGF0YVJld2FyZFRvdGFscwAAAAMAAAAIbWluZWRBbXQAAAAOYmVuZWZpY2lhcnlBbXQAAAALcHJvdG9jb2xBbXQJAAS5AAAAAgkABEwAAAACAgAAAAolZCVkJWQlZCVkCQAETAAAAAIJAAGkAAAAAQUAAAAIbWluZWRBbXQJAARMAAAAAgkAAaQAAAABBQAAAA5iZW5lZmljaWFyeUFtdAkABEwAAAACCQABpAAAAAEFAAAAC3Byb3RvY29sQW10BQAAAANuaWwFAAAAA1NFUAEAAAARUmV3YXJkVG90YWxzRW50cnkAAAAEAAAABW1pbmVyAAAACG1pbmVkQW10AAAADmJlbmVmaWNpYXJ5QW10AAAAC3Byb3RvY29sQW10BAAAABRub2RlUmV3YXJkc1RvdGFsc0tFWQkBAAAAFGtleU5vZGVSZXdhcmRzVG90YWxzAAAAAQkABCUAAAABBQAAAAVtaW5lcgQAAAAQbm9kZVJld2FyZHNBcnJheQkABLUAAAACCQEAAAAMZ2V0U3RyT3JFbHNlAAAAAgUAAAAUbm9kZVJld2FyZHNUb3RhbHNLRVkJAQAAABBkYXRhUmV3YXJkVG90YWxzAAAAAwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUAAAADU0VQBAAAAAtuZXdNaW5lZEFtdAkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAQbm9kZVJld2FyZHNBcnJheQAAAAAAAAAAAQUAAAAIbWluZWRBbXQEAAAAEW5ld0JlbmVmaWNpYXJ5QW10CQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAABBub2RlUmV3YXJkc0FycmF5AAAAAAAAAAACBQAAAA5iZW5lZmljaWFyeUFtdAQAAAAObmV3UHJvdG9jb2xBbXQJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAEG5vZGVSZXdhcmRzQXJyYXkAAAAAAAAAAAMFAAAAC3Byb3RvY29sQW10CQEAAAALU3RyaW5nRW50cnkAAAACBQAAABRub2RlUmV3YXJkc1RvdGFsc0tFWQkBAAAAEGRhdGFSZXdhcmRUb3RhbHMAAAADBQAAAAtuZXdNaW5lZEFtdAUAAAARbmV3QmVuZWZpY2lhcnlBbXQFAAAADm5ld1Byb3RvY29sQW10AAAAAgAAAAFpAQAAAAtjb25zdHJ1Y3RvcgAAAAMAAAAPYW5vdGVBZGRyZXNzU3RyAAAADnByb3RvY29sUGFydFg2AAAAEGJlbmlmaWNhcnlQYXJ0WDYDCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABHRoaXMJAAACAAAAAQIAAAAScGVybWlzc2lvbnMgZGVuaWVkAwkAAGYAAAACAAAAAAAAAAAABQAAAA5wcm90b2NvbFBhcnRYNgkAAAIAAAABAgAAAB1wcm90b2NvbFBhcnRYNiBsZXNzIHRoZW4gemVybwMJAABmAAAAAgAAAAAAAAAAAAUAAAAQYmVuaWZpY2FyeVBhcnRYNgkAAAIAAAABAgAAAB9iZW5pZmljYXJ5UGFydFg2IGxlc3MgdGhlbiB6ZXJvAwkBAAAAAiE9AAAAAgkAAGQAAAACBQAAAA5wcm90b2NvbFBhcnRYNgUAAAAQYmVuaWZpY2FyeVBhcnRYNgUAAAAFTVVMVDYJAAACAAAAAQIAAAATcGFydHMgc3VtIG11c3QgYmUgMQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAASa2V5QW5vdGVBZGRyZXNzU3RyAAAAAAkBAAAAFXZhbGlkYXRlQWRkcmVzc09yRmFpbAAAAAEFAAAAD2Fub3RlQWRkcmVzc1N0cgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAEWtleVByb3RvY29sUGFydFg2AAAAAAUAAAAOcHJvdG9jb2xQYXJ0WDYJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAABNrZXlCZW5pZmljYXJ5UGFydFg2AAAAAAUAAAAQYmVuaWZpY2FyeVBhcnRYNgUAAAADbmlsAAAAAWkBAAAAFWRpc3RyaWJ1dGVNaW5lclJld2FyZAAAAAEAAAAUYmVuaWZpY2FyeUFkZHJlc3NTdHIDCQEAAAACIT0AAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABCQAAAgAAAAECAAAAIGV4YWN0IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkAwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyCAUAAAABaQAAAAxvcmlnaW5DYWxsZXIJAAACAAAAAQIAAAAiZGFwcCB0byBkYXBwIGNhbGxzIGFyZSBub3QgYWxsb3dlZAQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAhtaW5lZEFtdAgFAAAAA3BtdAAAAAZhbW91bnQEAAAACnBtdEFzc2V0SWQJAQAAAAt2YWx1ZU9yRWxzZQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAHQU5PVEVJRAQAAAAGZmVlQW10CAUAAAABaQAAAANmZWUEAAAACmZlZUFzc2V0SWQJAQAAAAt2YWx1ZU9yRWxzZQAAAAIIBQAAAAFpAAAACmZlZUFzc2V0SWQFAAAAB0FOT1RFSUQDCQEAAAACIT0AAAACBQAAAApwbXRBc3NldElkBQAAAAdBTk9URUlECQAAAgAAAAECAAAAIW9ubHkgV2F2ZXMgY2FuIGJlIHVzZWQgaW4gcGF5bWVudAMJAQAAAAIhPQAAAAIFAAAACmZlZUFzc2V0SWQFAAAAB0FOT1RFSUQJAAACAAAAAQIAAAAeb25seSBXYXZlcyBjYW4gYmUgdXNlZCBpbiBmZWVzAwkBAAAAAiE9AAAAAgUAAAAGZmVlQW10CQAAaQAAAAIJAABoAAAAAgAAAAAAAAAABQUAAAAFTVVMVDgAAAAAAAAAA+gJAAACAAAAAQIAAAAgZmVlIGFtb3VudCBjb3VsZG4ndCBleGNlZWQgMC4wMDUEAAAADGFub3RlQWRkcmVzcwkBAAAAEGdldEFkZHJlc3NPckZhaWwAAAABCQEAAAASa2V5QW5vdGVBZGRyZXNzU3RyAAAAAAQAAAAMbWluZXJBZGRyZXNzCAUAAAABaQAAAAZjYWxsZXIEAAAAEWJlbmlmaWNhcnlBZGRyZXNzCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAABRiZW5pZmljYXJ5QWRkcmVzc1N0cgQAAAAMcHJvdG9jb2xQYXJ0CQEAAAAMZ2V0SW50T3JGYWlsAAAAAQkBAAAAEWtleVByb3RvY29sUGFydFg2AAAAAAQAAAAOYmVuaWZpY2FyeVBhcnQJAQAAAAxnZXRJbnRPckZhaWwAAAABCQEAAAATa2V5QmVuaWZpY2FyeVBhcnRYNgAAAAAEAAAAEGF2YWlsYWJsZUJhbGFuY2UJAABlAAAAAggJAAPvAAAAAQUAAAAMbWluZXJBZGRyZXNzAAAACWF2YWlsYWJsZQUAAAAGZmVlQW10AwkBAAAAAiE9AAAAAgUAAAAQYXZhaWxhYmxlQmFsYW5jZQAAAAAAAAAAAAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAEYWxsIAkAAaQAAAABBQAAABBhdmFpbGFibGVCYWxhbmNlAgAAAEEgV2F2ZWxldHMgZnJvbSB0aGUgTm9kZSBiYWxhbmNlIG11c3QgYmUgYXR0YWNoZWQgaW50byB0aGUgcGF5bWVudAQAAAANYmVuaWZpY2FyeUFtdAkBAAAACGZyYWN0aW9uAAAABAUAAAAIbWluZWRBbXQFAAAADmJlbmlmaWNhcnlQYXJ0BQAAAAVNVUxUNgUAAAAERE9XTgQAAAALcHJvdG9jb2xBbXQJAABlAAAAAgUAAAAIbWluZWRBbXQFAAAADWJlbmlmaWNhcnlBbXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAARYmVuaWZpY2FyeUFkZHJlc3MFAAAADWJlbmlmaWNhcnlBbXQFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAMYW5vdGVBZGRyZXNzBQAAAAtwcm90b2NvbEFtdAUAAAAEdW5pdAkABEwAAAACCQEAAAASUmV3YXJkSGlzdG9yeUVudHJ5AAAABQUAAAAMbWluZXJBZGRyZXNzCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBQAAAAhtaW5lZEFtdAUAAAANYmVuaWZpY2FyeUFtdAUAAAALcHJvdG9jb2xBbXQJAARMAAAAAgkBAAAAEVJld2FyZFRvdGFsc0VudHJ5AAAABAUAAAAMbWluZXJBZGRyZXNzBQAAAAhtaW5lZEFtdAUAAAANYmVuaWZpY2FyeUFtdAUAAAALcHJvdG9jb2xBbXQFAAAAA25pbAAAAABTAScv",
    "height": 2102120,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CrwXXfUoWCYXC7pWT61hJjAtCPERRzq3nahKWGdgaArt
Next: 3bRLqFnGToib6F8tX8KfoCAYHLFKGMkc4xojURgkUsrF

Diff: 
Old New Differences
105 105                              if ((availableBalance != 0))
106 106                                  then throw((("all " + toString(availableBalance)) + " Wavelets from the Node balance must be attached into the payment"))
107 107                                  else {
108 -                                     let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6)
108 +                                     let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6, DOWN)
109 109                                      let protocolAmt = (minedAmt - benificaryAmt)
110 110  [ScriptTransfer(benificaryAddress, benificaryAmt, unit), ScriptTransfer(anoteAddress, protocolAmt, unit), RewardHistoryEntry(minerAddress, i.transactionId, minedAmt, benificaryAmt, protocolAmt), RewardTotalsEntry(minerAddress, minedAmt, benificaryAmt, protocolAmt)]
111 111                                      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let SEP = "__"
5 5  
6 6  let MULT6 = 1000000
7 7  
8 8  let MULT8 = 100000000
9 9  
10 10  let ANOTEIDSTR = "WAVES"
11 11  
12 12  let ANOTEID = fromBase58String(ANOTEIDSTR)
13 13  
14 14  func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
15 15  
16 16  
17 17  func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
18 18  
19 19  
20 20  func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
21 21  
22 22  
23 23  func getAddressOrFail (key) = valueOrErrorMessage(addressFromString(getStringOrFail(key)), (("Fail to convert this." + key) + " value into Address"))
24 24  
25 25  
26 26  func validateAddressOrFail (addressStr) = {
27 27      let address = valueOrErrorMessage(addressFromString(addressStr), ("fail to convert into address " + addressStr))
28 28      if ((0 > wavesBalance(address).available))
29 29          then throw()
30 30          else addressStr
31 31      }
32 32  
33 33  
34 34  func keyNodeRewardsTotals (address) = ("%s%s__totals__" + address)
35 35  
36 36  
37 37  func keyAnoteAddressStr () = "%s%s__cfg__anoteAddress"
38 38  
39 39  
40 40  func keyProtocolPartX6 () = "%s%s__cfg__protocolPartX6"
41 41  
42 42  
43 43  func keyBenificaryPartX6 () = "%s%s__cfg__benificaryPartX6"
44 44  
45 45  
46 46  func keyRewardHistory (nodeAddress,txId) = makeString(["%s%s%s", "history", toString(nodeAddress), toBase58String(txId)], SEP)
47 47  
48 48  
49 49  func dataRewardHistory (anoteAmountTotal,beneficiaryAmt,protocolAmt) = makeString(["%d%d%d%d%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(anoteAmountTotal), toString(beneficiaryAmt), toString(protocolAmt)], SEP)
50 50  
51 51  
52 52  func RewardHistoryEntry (nodeAddress,txId,minedAmt,beneficiaryAmt,protocolAmt) = StringEntry(keyRewardHistory(nodeAddress, txId), dataRewardHistory(minedAmt, beneficiaryAmt, protocolAmt))
53 53  
54 54  
55 55  func dataRewardTotals (minedAmt,beneficiaryAmt,protocolAmt) = makeString(["%d%d%d%d%d", toString(minedAmt), toString(beneficiaryAmt), toString(protocolAmt)], SEP)
56 56  
57 57  
58 58  func RewardTotalsEntry (miner,minedAmt,beneficiaryAmt,protocolAmt) = {
59 59      let nodeRewardsTotalsKEY = keyNodeRewardsTotals(toString(miner))
60 60      let nodeRewardsArray = split(getStrOrElse(nodeRewardsTotalsKEY, dataRewardTotals(0, 0, 0)), SEP)
61 61      let newMinedAmt = (parseIntValue(nodeRewardsArray[1]) + minedAmt)
62 62      let newBeneficiaryAmt = (parseIntValue(nodeRewardsArray[2]) + beneficiaryAmt)
63 63      let newProtocolAmt = (parseIntValue(nodeRewardsArray[3]) + protocolAmt)
64 64      StringEntry(nodeRewardsTotalsKEY, dataRewardTotals(newMinedAmt, newBeneficiaryAmt, newProtocolAmt))
65 65      }
66 66  
67 67  
68 68  @Callable(i)
69 69  func constructor (anoteAddressStr,protocolPartX6,benificaryPartX6) = if ((i.caller != this))
70 70      then throw("permissions denied")
71 71      else if ((0 > protocolPartX6))
72 72          then throw("protocolPartX6 less then zero")
73 73          else if ((0 > benificaryPartX6))
74 74              then throw("benificaryPartX6 less then zero")
75 75              else if (((protocolPartX6 + benificaryPartX6) != MULT6))
76 76                  then throw("parts sum must be 1")
77 77                  else [StringEntry(keyAnoteAddressStr(), validateAddressOrFail(anoteAddressStr)), IntegerEntry(keyProtocolPartX6(), protocolPartX6), IntegerEntry(keyBenificaryPartX6(), benificaryPartX6)]
78 78  
79 79  
80 80  
81 81  @Callable(i)
82 82  func distributeMinerReward (benificaryAddressStr) = if ((size(i.payments) != 1))
83 83      then throw("exact 1 payment must be attached")
84 84      else if ((i.caller != i.originCaller))
85 85          then throw("dapp to dapp calls are not allowed")
86 86          else {
87 87              let pmt = i.payments[0]
88 88              let minedAmt = pmt.amount
89 89              let pmtAssetId = valueOrElse(pmt.assetId, ANOTEID)
90 90              let feeAmt = i.fee
91 91              let feeAssetId = valueOrElse(i.feeAssetId, ANOTEID)
92 92              if ((pmtAssetId != ANOTEID))
93 93                  then throw("only Waves can be used in payment")
94 94                  else if ((feeAssetId != ANOTEID))
95 95                      then throw("only Waves can be used in fees")
96 96                      else if ((feeAmt != ((5 * MULT8) / 1000)))
97 97                          then throw("fee amount couldn't exceed 0.005")
98 98                          else {
99 99                              let anoteAddress = getAddressOrFail(keyAnoteAddressStr())
100 100                              let minerAddress = i.caller
101 101                              let benificaryAddress = addressFromStringValue(benificaryAddressStr)
102 102                              let protocolPart = getIntOrFail(keyProtocolPartX6())
103 103                              let benificaryPart = getIntOrFail(keyBenificaryPartX6())
104 104                              let availableBalance = (wavesBalance(minerAddress).available - feeAmt)
105 105                              if ((availableBalance != 0))
106 106                                  then throw((("all " + toString(availableBalance)) + " Wavelets from the Node balance must be attached into the payment"))
107 107                                  else {
108 -                                     let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6)
108 +                                     let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6, DOWN)
109 109                                      let protocolAmt = (minedAmt - benificaryAmt)
110 110  [ScriptTransfer(benificaryAddress, benificaryAmt, unit), ScriptTransfer(anoteAddress, protocolAmt, unit), RewardHistoryEntry(minerAddress, i.transactionId, minedAmt, benificaryAmt, protocolAmt), RewardTotalsEntry(minerAddress, minedAmt, benificaryAmt, protocolAmt)]
111 111                                      }
112 112                              }
113 113              }
114 114  
115 115

Old	New		Differences
105	105		if ((availableBalance != 0))
106	106		then throw((("all " + toString(availableBalance)) + " Wavelets from the Node balance must be attached into the payment"))
107	107		else {
108		-	let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6)
	108	+	let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6, DOWN)
109	109		let protocolAmt = (minedAmt - benificaryAmt)
110	110		[ScriptTransfer(benificaryAddress, benificaryAmt, unit), ScriptTransfer(anoteAddress, protocolAmt, unit), RewardHistoryEntry(minerAddress, i.transactionId, minedAmt, benificaryAmt, protocolAmt), RewardTotalsEntry(minerAddress, minedAmt, benificaryAmt, protocolAmt)]
111	111		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let SEP = "__"
5	5
6	6		let MULT6 = 1000000
7	7
8	8		let MULT8 = 100000000
9	9
10	10		let ANOTEIDSTR = "WAVES"
11	11
12	12		let ANOTEID = fromBase58String(ANOTEIDSTR)
13	13
14	14		func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
15	15
16	16
17	17		func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
18	18
19	19
20	20		func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
21	21
22	22
23	23		func getAddressOrFail (key) = valueOrErrorMessage(addressFromString(getStringOrFail(key)), (("Fail to convert this." + key) + " value into Address"))
24	24
25	25
26	26		func validateAddressOrFail (addressStr) = {
27	27		let address = valueOrErrorMessage(addressFromString(addressStr), ("fail to convert into address " + addressStr))
28	28		if ((0 > wavesBalance(address).available))
29	29		then throw()
30	30		else addressStr
31	31		}
32	32
33	33
34	34		func keyNodeRewardsTotals (address) = ("%s%s__totals__" + address)
35	35
36	36
37	37		func keyAnoteAddressStr () = "%s%s__cfg__anoteAddress"
38	38
39	39
40	40		func keyProtocolPartX6 () = "%s%s__cfg__protocolPartX6"
41	41
42	42
43	43		func keyBenificaryPartX6 () = "%s%s__cfg__benificaryPartX6"
44	44
45	45
46	46		func keyRewardHistory (nodeAddress,txId) = makeString(["%s%s%s", "history", toString(nodeAddress), toBase58String(txId)], SEP)
47	47
48	48
49	49		func dataRewardHistory (anoteAmountTotal,beneficiaryAmt,protocolAmt) = makeString(["%d%d%d%d%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(anoteAmountTotal), toString(beneficiaryAmt), toString(protocolAmt)], SEP)
50	50
51	51
52	52		func RewardHistoryEntry (nodeAddress,txId,minedAmt,beneficiaryAmt,protocolAmt) = StringEntry(keyRewardHistory(nodeAddress, txId), dataRewardHistory(minedAmt, beneficiaryAmt, protocolAmt))
53	53
54	54
55	55		func dataRewardTotals (minedAmt,beneficiaryAmt,protocolAmt) = makeString(["%d%d%d%d%d", toString(minedAmt), toString(beneficiaryAmt), toString(protocolAmt)], SEP)
56	56
57	57
58	58		func RewardTotalsEntry (miner,minedAmt,beneficiaryAmt,protocolAmt) = {
59	59		let nodeRewardsTotalsKEY = keyNodeRewardsTotals(toString(miner))
60	60		let nodeRewardsArray = split(getStrOrElse(nodeRewardsTotalsKEY, dataRewardTotals(0, 0, 0)), SEP)
61	61		let newMinedAmt = (parseIntValue(nodeRewardsArray[1]) + minedAmt)
62	62		let newBeneficiaryAmt = (parseIntValue(nodeRewardsArray[2]) + beneficiaryAmt)
63	63		let newProtocolAmt = (parseIntValue(nodeRewardsArray[3]) + protocolAmt)
64	64		StringEntry(nodeRewardsTotalsKEY, dataRewardTotals(newMinedAmt, newBeneficiaryAmt, newProtocolAmt))
65	65		}
66	66
67	67
68	68		@Callable(i)
69	69		func constructor (anoteAddressStr,protocolPartX6,benificaryPartX6) = if ((i.caller != this))
70	70		then throw("permissions denied")
71	71		else if ((0 > protocolPartX6))
72	72		then throw("protocolPartX6 less then zero")
73	73		else if ((0 > benificaryPartX6))
74	74		then throw("benificaryPartX6 less then zero")
75	75		else if (((protocolPartX6 + benificaryPartX6) != MULT6))
76	76		then throw("parts sum must be 1")
77	77		else [StringEntry(keyAnoteAddressStr(), validateAddressOrFail(anoteAddressStr)), IntegerEntry(keyProtocolPartX6(), protocolPartX6), IntegerEntry(keyBenificaryPartX6(), benificaryPartX6)]
78	78
79	79
80	80
81	81		@Callable(i)
82	82		func distributeMinerReward (benificaryAddressStr) = if ((size(i.payments) != 1))
83	83		then throw("exact 1 payment must be attached")
84	84		else if ((i.caller != i.originCaller))
85	85		then throw("dapp to dapp calls are not allowed")
86	86		else {
87	87		let pmt = i.payments[0]
88	88		let minedAmt = pmt.amount
89	89		let pmtAssetId = valueOrElse(pmt.assetId, ANOTEID)
90	90		let feeAmt = i.fee
91	91		let feeAssetId = valueOrElse(i.feeAssetId, ANOTEID)
92	92		if ((pmtAssetId != ANOTEID))
93	93		then throw("only Waves can be used in payment")
94	94		else if ((feeAssetId != ANOTEID))
95	95		then throw("only Waves can be used in fees")
96	96		else if ((feeAmt != ((5 * MULT8) / 1000)))
97	97		then throw("fee amount couldn't exceed 0.005")
98	98		else {
99	99		let anoteAddress = getAddressOrFail(keyAnoteAddressStr())
100	100		let minerAddress = i.caller
101	101		let benificaryAddress = addressFromStringValue(benificaryAddressStr)
102	102		let protocolPart = getIntOrFail(keyProtocolPartX6())
103	103		let benificaryPart = getIntOrFail(keyBenificaryPartX6())
104	104		let availableBalance = (wavesBalance(minerAddress).available - feeAmt)
105	105		if ((availableBalance != 0))
106	106		then throw((("all " + toString(availableBalance)) + " Wavelets from the Node balance must be attached into the payment"))
107	107		else {
108		-	let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6)
	108	+	let benificaryAmt = fraction(minedAmt, benificaryPart, MULT6, DOWN)
109	109		let protocolAmt = (minedAmt - benificaryAmt)
110	110		[ScriptTransfer(benificaryAddress, benificaryAmt, unit), ScriptTransfer(anoteAddress, protocolAmt, unit), RewardHistoryEntry(minerAddress, i.transactionId, minedAmt, benificaryAmt, protocolAmt), RewardTotalsEntry(minerAddress, minedAmt, benificaryAmt, protocolAmt)]
111	111		}
112	112		}
113	113		}
114	114
115	115

github/deemru/w8io/026f985 
37.84 ms ◑