tx · 3Dg2QSCRZYnBZdv3dYHZWVhTKXkkZ24woijVhErN12hB

3PCxF4JryswYYp9mpUtE725wjTgvpBmp3M9:  -0.00600000 Waves

2024.01.02 09:57 [3979345] smart account 3PCxF4JryswYYp9mpUtE725wjTgvpBmp3M9 > SELF 0.00000000 Waves

{ "type": 13, "id": "3Dg2QSCRZYnBZdv3dYHZWVhTKXkkZ24woijVhErN12hB", "fee": 600000, "feeAssetId": null, "timestamp": 1704178694905, "version": 2, "chainId": 87, "sender": "3PCxF4JryswYYp9mpUtE725wjTgvpBmp3M9", "senderPublicKey": "ABaPDrNzForWeg3KKG9KFKPWxuihEJxK9fjZ9nDfvE26", "proofs": [ "4vR2Niag73q7MLoDeivA9c5bKWGv7vUhkH1E1YWTAmS6iwCL3H6R2fRATGSTpyfbPonngkAPUvfgjr3232Dfswsq" ], "script": "base64:BgKiAggCEgASABIAEgASACICZDgiDXRyeUdldEludGVnZXIiB2FkZHJlc3MiA2tleSIHJG1hdGNoMCIBYiIMdHJ5R2V0U3RyaW5nIgl3aGlybHBvb2wiBldYdm90ZSIFZXBvY2giDWVwb2NoUHJldmlvdXMiCWFkZHJlc3NlcyIBaSIFY291bnQiBXRvdGFsIgNwYXkiBGxpc3QiAXYiBWFjY3VtIg12b3Rlc0NvdW50SW50IgIkbCICJHMiBSRhY2MwIgUkZjBfMSICJGEiAiRpIgUkZjBfMiIKbGlzdE51bWJlciIBdCIGbnVtYmVyIhJ2b3Rlc0NvdW50SW50VG90YWwiBSRmMV8xIgUkZjFfMiIHYXNzZXRJZCIGYW1vdW50IgFmCAABYQCAwtcvAQFiAgFjAWQEAWUJAJoIAgUBYwUBZAMJAAECBQFlAgNJbnQEAWYFAWUFAWYAAAEBZwIBYwFkBAFlCQCdCAIFAWMFAWQDCQABAgUBZQIGU3RyaW5nBAFmBQFlBQFmAgAAAWgBIFnjjdzCtSO6ShTcxNCvFAnmZOYEviUGCyZO5VBtl1nHAAFpCQEHQWRkcmVzcwEBGgFXdKKsDQGFaMyVfKR9xnp4f7rNREb2maJFAAFqCQERQGV4dHJOYXRpdmUoMTA1MCkCBQFpAhAlc19fY3VycmVudEVwb2NoAAFrCQBlAgUBagABAAFsCQCzAgIJAQFnAgUEdGhpcwISQWRkcmVzcyByZWdpc3RlcmVkAAEFAW0BCHJlZ2lzdGVyAAMJAQhjb250YWlucwIJAQFnAgUEdGhpcwISQWRkcmVzcyByZWdpc3RlcmVkCQClCAEIBQFtBmNhbGxlcgkAAgECEmFscmVhZHkgcmVnaXN0ZXJlZAMJAAACCQEBYgIFBHRoaXMCEUFtb3VudCBSZWdpc3RlcmVkAGQJAAIBAhNyZWdpc3RyYXRpb24gY2xvc2VkCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhFBbW91bnQgUmVnaXN0ZXJlZAkAZAIJAQFiAgUEdGhpcwIRQW1vdW50IFJlZ2lzdGVyZWQAAQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICElJlZ2lzdGVyIGFkZHJlc3M6IAkApAMBCQBkAgkBAWICBQR0aGlzAhFBbW91bnQgUmVnaXN0ZXJlZAABCQClCAEIBQFtBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCAhJBZGRyZXNzIHJlZ2lzdGVyZWQJAKwCAgkArAICCQEBZwIFBHRoaXMCEkFkZHJlc3MgcmVnaXN0ZXJlZAkApQgBCAUBbQZjYWxsZXICASwFA25pbAFtAQ1jb3VudFRvdGFsUGF5AAMJAQIhPQIIBQFtBmNhbGxlcgUEdGhpcwkAAgECHGFjY2VzcyBvbmx5IGJ5IHByb2plY3Qgb3duZXIEAW4JAPwHBAUEdGhpcwIKY291bnRWb3RlcwUDbmlsBQNuaWwDCQAAAgUBbgUBbgQBbwkA/AcEBQR0aGlzAg9jb3VudFZvdGVzVG90YWwFA25pbAUDbmlsAwkAAAIFAW8FAW8EAXAJAPwHBAUEdGhpcwIJcGF5Vm90ZXJzBQNuaWwFA25pbAMJAAACBQFwBQFwBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BbQEKY291bnRWb3RlcwADCQECIT0CCAUBbQZjYWxsZXIFBHRoaXMJAAIBAhxhY2Nlc3Mgb25seSBieSBwcm9qZWN0IG93bmVyBAFxCQC8CQIFAWwCASwKAQFyAgFzAWMJAM4IAgUBcwkAzAgCCQEMSW50ZWdlckVudHJ5AgUBYwkBAWICBQFpCQCsAgIJAKwCAgkArAICAkclcyVzJXMlcyVkX192b3RlX18zU2p4QTJZTGRmRjlmVFJiekxtOXhGbjI3QzZNVzM0VzFZc2RKNkF4ZWZuc19fV0FWRVNfXwUBYwICX18JAKQDAQUBawUDbmlsBAF0CgABdQUBcQoAAXYJAJADAQUBdQoAAXcFA25pbAoBAXgCAXkBegMJAGcCBQF6BQF2BQF5CQEBcgIFAXkJAJEDAgUBdQUBegoBAUECAXkBegMJAGcCBQF6BQF2BQF5CQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEBQQIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgUBdwAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQJAM4IAgkAzAgCCQEMSW50ZWdlckVudHJ5AgIOZXBvY2ggcHJldmlvdXMFAWsFA25pbAUBdAFtAQ9jb3VudFZvdGVzVG90YWwAAwkBAiE9AggFAW0GY2FsbGVyBQR0aGlzCQACAQIcYWNjZXNzIG9ubHkgYnkgcHJvamVjdCBvd25lcgQBcQkAvAkCBQFsAgEsCgEBcgIBcwFjCQDNCAIFAXMJAQFiAgUBaQkArAICCQCsAgIJAKwCAgJHJXMlcyVzJXMlZF9fdm90ZV9fM1NqeEEyWUxkZkY5ZlRSYnpMbTl4Rm4yN0M2TVczNFcxWXNkSjZBeGVmbnNfX1dBVkVTX18FAWMCAl9fCQCkAwEFAWsEAUIKAAF1BQFxCgABdgkAkAMBBQF1CgABdwUDbmlsCgEBeAIBeQF6AwkAZwIFAXoFAXYFAXkJAQFyAgUBeQkAkQMCBQF1BQF6CgEBQQIBeQF6AwkAZwIFAXoFAXYFAXkJAAIBAhVMaXN0IHNpemUgZXhjZWVkcyAxMDAJAQFBAgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCBQF3AAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiAGMAZAoBAUMCAXMBRAkAZAIFAXMFAUQEAUUKAAF1BQFCCgABdgkAkAMBBQF1CgABdwAACgEBRgIBeQF6AwkAZwIFAXoFAXYFAXkJAQFDAgUBeQkAkQMCBQF1BQF6CgEBRwIBeQF6AwkAZwIFAXoFAXYFAXkJAAIBAhVMaXN0IHNpemUgZXhjZWVkcyAxMDAJAQFHAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCCQEBRgIJAQFGAgkBAUYCBQF3AAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaABsAHAAdAB4AHwAgACEAIgAjACQAJQAmACcAKAApACoAKwAsAC0ALgAvADAAMQAyADMANAA1ADYANwA4ADkAOgA7ADwAPQA+AD8AQABBAEIAQwBEAEUARgBHAEgASQBKAEsATABNAE4ATwBQAFEAUgBTAFQAVQBWAFcAWABZAFoAWwBcAF0AXgBfAGAAYQBiAGMAZAkAzAgCCQEMSW50ZWdlckVudHJ5AgIFdG90YWwFAUUFA25pbAFtAQlwYXlWb3RlcnMAAwkBAiE9AggFAW0GY2FsbGVyBQR0aGlzCQACAQIcYWNjZXNzIG9ubHkgYnkgcHJvamVjdCBvd25lcgQBSAUBaAQBSQkAaAIAAQUBYQQBcQkAvAkCBQFsAgEsCgEBSgIBcwFjAwkAAAIJAQFiAgUEdGhpcwUBYwAABQFzCQDOCAIFAXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUBYwkAawMJAQFiAgUEdGhpcwUBYwUBSQkBAWICBQR0aGlzAgV0b3RhbAUBSAUDbmlsCgABdQUBcQoAAXYJAJADAQUBdQoAAXcFA25pbAoBAXgCAXkBegMJAGcCBQF6BQF2BQF5CQEBSgIFAXkJAJEDAgUBdQUBegoBAUECAXkBegMJAGcCBQF6BQF2BQF5CQACAQIVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEBQQIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgkBAXgCCQEBeAIJAQF4AgUBdwAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaAFsAXABdAF4AXwBgAGEAYgBjAGQAQbf0sA==", "height": 3979345, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: H9DZ7hhfH7TL8kWdnWyKn9gA4xE2Y6pBqXjtLXB2A9So Next: 9hj9qH7P1XhE5aXC6e9E9dfqhVeT8dCX6QvSEG3JXr4c Diff:
OldNewDifferences
1818 ""
1919 }
2020
21-
22-let burnxtn = base58'3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns'
2321
2422 let whirlpool = base58'73tY3E6Gd5AWYmsuq8m8Kek7KnJNAYyS3GoveTbc6jCi'
2523
6664 func countVotes () = if ((i.caller != this))
6765 then throw("access only by project owner")
6866 else {
69- let list = split(addresses, ",")
67+ let list = split_4C(addresses, ",")
7068 func v (accum,address) = (accum ++ [IntegerEntry(address, tryGetInteger(WXvote, ((("%s%s%s%s%d__vote__3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns__WAVES__" + address) + "__") + toString(epochPrevious))))])
7169
7270 let votesCountInt = {
9290 func countVotesTotal () = if ((i.caller != this))
9391 then throw("access only by project owner")
9492 else {
95- let list = split(addresses, ",")
93+ let list = split_4C(addresses, ",")
9694 func v (accum,address) = (accum :+ tryGetInteger(WXvote, ((("%s%s%s%s%d__vote__3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns__WAVES__" + address) + "__") + toString(epochPrevious))))
9795
9896 let listNumber = {
136134 else {
137135 let assetId = whirlpool
138136 let amount = (1 * d8)
139- let list = split(addresses, ",")
137+ let list = split_4C(addresses, ",")
140138 func f (accum,address) = if ((tryGetInteger(this, address) == 0))
141139 then accum
142140 else (accum ++ [ScriptTransfer(addressFromStringValue(address), fraction(tryGetInteger(this, address), amount, tryGetInteger(this, "total")), assetId)])
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let d8 = 100000000
55
66 func tryGetInteger (address,key) = match getInteger(address, key) {
77 case b: Int =>
88 b
99 case _ =>
1010 0
1111 }
1212
1313
1414 func tryGetString (address,key) = match getString(address, key) {
1515 case b: String =>
1616 b
1717 case _ =>
1818 ""
1919 }
2020
21-
22-let burnxtn = base58'3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns'
2321
2422 let whirlpool = base58'73tY3E6Gd5AWYmsuq8m8Kek7KnJNAYyS3GoveTbc6jCi'
2523
2624 let WXvote = Address(base58'3PCZbz9o5YfWtK36j3tFcM8E1DUa9d7MyXS')
2725
2826 let epoch = getIntegerValue(WXvote, "%s__currentEpoch")
2927
3028 let epochPrevious = (epoch - 1)
3129
3230 let addresses = dropRight(tryGetString(this, "Address registered"), 1)
3331
3432 @Callable(i)
3533 func register () = if (contains(tryGetString(this, "Address registered"), toString(i.caller)))
3634 then throw("already registered")
3735 else if ((tryGetInteger(this, "Amount Registered") == 100))
3836 then throw("registration closed")
3937 else [IntegerEntry("Amount Registered", (tryGetInteger(this, "Amount Registered") + 1)), StringEntry(("Register address: " + toString((tryGetInteger(this, "Amount Registered") + 1))), toString(i.caller)), StringEntry("Address registered", ((tryGetString(this, "Address registered") + toString(i.caller)) + ","))]
4038
4139
4240
4341 @Callable(i)
4442 func countTotalPay () = if ((i.caller != this))
4543 then throw("access only by project owner")
4644 else {
4745 let count = invoke(this, "countVotes", nil, nil)
4846 if ((count == count))
4947 then {
5048 let total = invoke(this, "countVotesTotal", nil, nil)
5149 if ((total == total))
5250 then {
5351 let pay = invoke(this, "payVoters", nil, nil)
5452 if ((pay == pay))
5553 then nil
5654 else throw("Strict value is not equal to itself.")
5755 }
5856 else throw("Strict value is not equal to itself.")
5957 }
6058 else throw("Strict value is not equal to itself.")
6159 }
6260
6361
6462
6563 @Callable(i)
6664 func countVotes () = if ((i.caller != this))
6765 then throw("access only by project owner")
6866 else {
69- let list = split(addresses, ",")
67+ let list = split_4C(addresses, ",")
7068 func v (accum,address) = (accum ++ [IntegerEntry(address, tryGetInteger(WXvote, ((("%s%s%s%s%d__vote__3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns__WAVES__" + address) + "__") + toString(epochPrevious))))])
7169
7270 let votesCountInt = {
7371 let $l = list
7472 let $s = size($l)
7573 let $acc0 = nil
7674 func $f0_1 ($a,$i) = if (($i >= $s))
7775 then $a
7876 else v($a, $l[$i])
7977
8078 func $f0_2 ($a,$i) = if (($i >= $s))
8179 then $a
8280 else throw("List size exceeds 100")
8381
8482 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
8583 }
8684 ([IntegerEntry("epoch previous", epochPrevious)] ++ votesCountInt)
8785 }
8886
8987
9088
9189 @Callable(i)
9290 func countVotesTotal () = if ((i.caller != this))
9391 then throw("access only by project owner")
9492 else {
95- let list = split(addresses, ",")
93+ let list = split_4C(addresses, ",")
9694 func v (accum,address) = (accum :+ tryGetInteger(WXvote, ((("%s%s%s%s%d__vote__3SjxA2YLdfF9fTRbzLm9xFn27C6MW34W1YsdJ6Axefns__WAVES__" + address) + "__") + toString(epochPrevious))))
9795
9896 let listNumber = {
9997 let $l = list
10098 let $s = size($l)
10199 let $acc0 = nil
102100 func $f0_1 ($a,$i) = if (($i >= $s))
103101 then $a
104102 else v($a, $l[$i])
105103
106104 func $f0_2 ($a,$i) = if (($i >= $s))
107105 then $a
108106 else throw("List size exceeds 100")
109107
110108 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
111109 }
112110 func t (accum,number) = (accum + number)
113111
114112 let votesCountIntTotal = {
115113 let $l = listNumber
116114 let $s = size($l)
117115 let $acc0 = 0
118116 func $f1_1 ($a,$i) = if (($i >= $s))
119117 then $a
120118 else t($a, $l[$i])
121119
122120 func $f1_2 ($a,$i) = if (($i >= $s))
123121 then $a
124122 else throw("List size exceeds 100")
125123
126124 $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
127125 }
128126 [IntegerEntry("total", votesCountIntTotal)]
129127 }
130128
131129
132130
133131 @Callable(i)
134132 func payVoters () = if ((i.caller != this))
135133 then throw("access only by project owner")
136134 else {
137135 let assetId = whirlpool
138136 let amount = (1 * d8)
139- let list = split(addresses, ",")
137+ let list = split_4C(addresses, ",")
140138 func f (accum,address) = if ((tryGetInteger(this, address) == 0))
141139 then accum
142140 else (accum ++ [ScriptTransfer(addressFromStringValue(address), fraction(tryGetInteger(this, address), amount, tryGetInteger(this, "total")), assetId)])
143141
144142 let $l = list
145143 let $s = size($l)
146144 let $acc0 = nil
147145 func $f0_1 ($a,$i) = if (($i >= $s))
148146 then $a
149147 else f($a, $l[$i])
150148
151149 func $f0_2 ($a,$i) = if (($i >= $s))
152150 then $a
153151 else throw("List size exceeds 100")
154152
155153 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
156154 }
157155
158156

github/deemru/w8io/873ac7e 
47.27 ms