tx · J73vTUNomKXFd5b8kjBYY65Mn4yvx4yTMiJJfqKUj5tf

3P3urybcgohip3uYE1hWF89gBPDKM3zLoMB:  -0.01000000 Waves

2023.02.27 16:37 [3533656] smart account 3P3urybcgohip3uYE1hWF89gBPDKM3zLoMB > SELF 0.00000000 Waves

{ "type": 13, "id": "J73vTUNomKXFd5b8kjBYY65Mn4yvx4yTMiJJfqKUj5tf", "fee": 1000000, "feeAssetId": null, "timestamp": 1677505074869, "version": 2, "chainId": 87, "sender": "3P3urybcgohip3uYE1hWF89gBPDKM3zLoMB", "senderPublicKey": "8FT1roaUCGNMutLjmadT8CDJNEZ1MvfkppRyKdink7RD", "proofs": [ "3mCThTL8KdzcUXr9A9gdgEY6CWHWey4SZTAyrvatYusNrc7Y3F1YzHMqDf6jcB6ND4EiSssT7vPekkUUHu9KGHrv" ], "script": "base64:BgIZCAISBAoCCAgSAwoBCBIECgIICBIECgIIBAcADnN0YWtpbmdBZGRyZXNzCQEHQWRkcmVzcwEBGgFXPntnxIxvbmCo0s2P7nmfMU5HqK5DFP2wAAZTY2FsZTgAgMLXLwENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAENdHJ5R2V0Qm9vbGVhbgEDa2V5BAckbWF0Y2gwCQCbCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFiBQckbWF0Y2gwBQFiBwEMdHJ5R2V0U3RyaW5nAQNrZXkEByRtYXRjaDAJAJ0IAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAAdiYXRjaGVzCQDMCAICATEJAMwIAgIBMgkAzAgCAgEzCQDMCAICATQFA25pbAAQYXZhaWxhYmxlT3B0aW9ucwkAzAgCAgExCQDMCAICATIJAMwIAgIBMwUDbmlsBAFpAQR2b3RlAgZvcHRpb24Idm90aW5nSWQEBnZvdGVJZAUIdm90aW5nSWQECmFkZHJlc3NTdHIJAKUIAQgFAWkGY2FsbGVyBApyYW5kb21IYXNoCQD3AwEIBQFpDXRyYW5zYWN0aW9uSWQEBWJhdGNoCQCkAwEJAGQCAAEJAGoCCQCxCQEFCnJhbmRvbUhhc2gJAJADAQUHYmF0Y2hlcwQMdm90ZVZhbHVlU3RyBQZvcHRpb24DCQAAAgkAzwgCBRBhdmFpbGFibGVPcHRpb25zBQZvcHRpb24FBHVuaXQJAAIBAhppbmNvcnJlY3Qgb3B0aW9uIGlzIGNob3NlbgMJAQEhAQkBDXRyeUdldEJvb2xlYW4BCQCsAgIFBnZvdGVJZAIHX3N0YXR1cwkAAgECFHZvdGluZyBpcyBub3QgYWN0aXZlAwkBAiE9AgkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICBQZ2b3RlSWQCAV8FCmFkZHJlc3NTdHICAAkAAgECEXlvdSBhbHJlYWR5IHZvdGVkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgUGdm90ZUlkAgFfBQx2b3RlVmFsdWVTdHICBl9iYXRjaAUFYmF0Y2gJAKwCAgkArAICCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgIJAKwCAgkArAICBQZ2b3RlSWQCAV8FDHZvdGVWYWx1ZVN0cgIGX2JhdGNoBQViYXRjaAUKYWRkcmVzc1N0cgIBLAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgUGdm90ZUlkAgFfBQphZGRyZXNzU3RyBQx2b3RlVmFsdWVTdHIFA25pbAFpAQdyZXN1bHRzAQh2b3RpbmdJZAoBDGJhdGNoSGFuZGxlcgIFYWNjdW0FYmF0Y2gEA2ludgkA/AcEBQR0aGlzAgxiYXRjaFJlc3VsdHMJAMwIAgUFYmF0Y2gJAMwIAgUIdm90aW5nSWQFA25pbAUDbmlsAwkAAAIFA2ludgUDaW52BANuZXcEByRtYXRjaDAFA2ludgMJAAECBQckbWF0Y2gwAg8oSW50LCBJbnQsIEludCkEAXgFByRtYXRjaDAFAXgJAAIBCQCsAgICD2Vycm9yIGluIGJhdGNoIAUFYmF0Y2gJAJUKAwkAZAIIBQVhY2N1bQJfMQgFA25ldwJfMQkAZAIIBQVhY2N1bQJfMggFA25ldwJfMgkAZAIIBQVhY2N1bQJfMwgFA25ldwJfMwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQDcmVzCgACJGwFB2JhdGNoZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCVCgMAAAAAAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDGJhdGNoSGFuZGxlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAECQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgICDXZvdGVzIHJlc3VsdCAJAKQDAQgFA3JlcwJfMQICLCAJAKQDAQgFA3JlcwJfMgICLCAJAKQDAQgFA3JlcwJfMwFpAQxiYXRjaFJlc3VsdHMCBWJhdGNoCHZvdGluZ0lkCgEMdm90ZXNIYW5kbGVyAgVhY2N1bQphZGRyZXNzU3RyCQBkAgUFYWNjdW0EByRtYXRjaDAJAJoIAgUOc3Rha2luZ0FkZHJlc3MJAKwCAgUKYWRkcmVzc1N0cgIHX3NQbHV0bwMJAAECBQckbWF0Y2gwAgNJbnQEAXgFByRtYXRjaDAFAXgAAAQDbGkxCQC1CQIJAKwCAgkBDHRyeUdldFN0cmluZwEJAKwCAgUIdm90aW5nSWQCCF8xX2JhdGNoBQViYXRjaAIBLAQGdm90ZXMxCgACJGwFA2xpMQoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMdm90ZXNIYW5kbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA5MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgQDbGkyCQC1CQIJAKwCAgkBDHRyeUdldFN0cmluZwEJAKwCAgUIdm90aW5nSWQCCF8yX2JhdGNoBQViYXRjaAIBLAQGdm90ZXMyCgACJGwFA2xpMgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMdm90ZXNIYW5kbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYxXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA5MAkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgQDbGkzCQC1CQIJAKwCAgkBDHRyeUdldFN0cmluZwEJAKwCAgUIdm90aW5nSWQCCF8zX2JhdGNoBQViYXRjaAIBLAQGdm90ZXMzCgACJGwFA2xpMwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMl8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMdm90ZXNIYW5kbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYyXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA5MAkBBSRmMl8yAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAAUQBSAFMAVABVAFYAVwBYAFkAWgkAlAoCBQNuaWwJAJUKAwkAaQIFBnZvdGVzMQUGU2NhbGU4CQBpAgUGdm90ZXMyBQZTY2FsZTgJAGkCBQZ2b3RlczMFBlNjYWxlOAFpAQ9zZXRWb3RpbmdTdGF0dXMCCHZvdGluZ0lkBmFjdGl2ZQMJAQIhPQIFBHRoaXMIBQFpBmNhbGxlcgkAAgECCmFkbWluIG9ubHkJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgUIdm90aW5nSWQCB19zdGF0dXMFBmFjdGl2ZQUDbmlsAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleQkeyWs=", "height": 3533656, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: BUKZwTsAi6gn9u7nVE8uZYwEwvHYRjhQWkaSqr8uaP7M Next: EjCfQXVScSy6Agk7rhbrrQeSf7bXYUuqAacSU2C8VGah Diff:
OldNewDifferences
6161 case x: (Int, Int, Int) =>
6262 x
6363 case _ =>
64- $Tuple3(0, 0, 0)
64+ throw(("error in batch " + batch))
6565 }
6666 $Tuple3((accum._1 + new._1), (accum._2 + new._2), (accum._3 + new._3))
6767 }
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let stakingAddress = Address(base58'3P7dGTVZp8VLDYy3XEaUQbiqfi9cMK1Ly5q')
55
66 let Scale8 = 100000000
77
88 func tryGetInteger (key) = match getInteger(this, key) {
99 case b: Int =>
1010 b
1111 case _ =>
1212 0
1313 }
1414
1515
1616 func tryGetBoolean (key) = match getBoolean(this, key) {
1717 case b: Boolean =>
1818 b
1919 case _ =>
2020 false
2121 }
2222
2323
2424 func tryGetString (key) = match getString(this, key) {
2525 case b: String =>
2626 b
2727 case _ =>
2828 ""
2929 }
3030
3131
3232 let batches = ["1", "2", "3", "4"]
3333
3434 let availableOptions = ["1", "2", "3"]
3535
3636 @Callable(i)
3737 func vote (option,votingId) = {
3838 let voteId = votingId
3939 let addressStr = toString(i.caller)
4040 let randomHash = sha256(i.transactionId)
4141 let batch = toString((1 + (toInt(randomHash) % size(batches))))
4242 let voteValueStr = option
4343 if ((indexOf(availableOptions, option) == unit))
4444 then throw("incorrect option is chosen")
4545 else if (!(tryGetBoolean((voteId + "_status"))))
4646 then throw("voting is not active")
4747 else if ((tryGetString(((voteId + "_") + addressStr)) != ""))
4848 then throw("you already voted")
4949 else [StringEntry(((((voteId + "_") + voteValueStr) + "_batch") + batch), ((tryGetString(((((voteId + "_") + voteValueStr) + "_batch") + batch)) + addressStr) + ",")), StringEntry(((voteId + "_") + addressStr), voteValueStr)]
5050 }
5151
5252
5353
5454 @Callable(i)
5555 func results (votingId) = {
5656 func batchHandler (accum,batch) = {
5757 let inv = invoke(this, "batchResults", [batch, votingId], nil)
5858 if ((inv == inv))
5959 then {
6060 let new = match inv {
6161 case x: (Int, Int, Int) =>
6262 x
6363 case _ =>
64- $Tuple3(0, 0, 0)
64+ throw(("error in batch " + batch))
6565 }
6666 $Tuple3((accum._1 + new._1), (accum._2 + new._2), (accum._3 + new._3))
6767 }
6868 else throw("Strict value is not equal to itself.")
6969 }
7070
7171 let res = {
7272 let $l = batches
7373 let $s = size($l)
7474 let $acc0 = $Tuple3(0, 0, 0)
7575 func $f0_1 ($a,$i) = if (($i >= $s))
7676 then $a
7777 else batchHandler($a, $l[$i])
7878
7979 func $f0_2 ($a,$i) = if (($i >= $s))
8080 then $a
8181 else throw("List size exceeds 4")
8282
8383 $f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
8484 }
8585 throw(((((("votes result " + toString(res._1)) + ", ") + toString(res._2)) + ", ") + toString(res._3)))
8686 }
8787
8888
8989
9090 @Callable(i)
9191 func batchResults (batch,votingId) = {
9292 func votesHandler (accum,addressStr) = (accum + match getInteger(stakingAddress, (addressStr + "_sPluto")) {
9393 case x: Int =>
9494 x
9595 case _ =>
9696 0
9797 })
9898
9999 let li1 = split((tryGetString((votingId + "_1_batch")) + batch), ",")
100100 let votes1 = {
101101 let $l = li1
102102 let $s = size($l)
103103 let $acc0 = 0
104104 func $f0_1 ($a,$i) = if (($i >= $s))
105105 then $a
106106 else votesHandler($a, $l[$i])
107107
108108 func $f0_2 ($a,$i) = if (($i >= $s))
109109 then $a
110110 else throw("List size exceeds 90")
111111
112112 $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($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)
113113 }
114114 let li2 = split((tryGetString((votingId + "_2_batch")) + batch), ",")
115115 let votes2 = {
116116 let $l = li2
117117 let $s = size($l)
118118 let $acc0 = 0
119119 func $f1_1 ($a,$i) = if (($i >= $s))
120120 then $a
121121 else votesHandler($a, $l[$i])
122122
123123 func $f1_2 ($a,$i) = if (($i >= $s))
124124 then $a
125125 else throw("List size exceeds 90")
126126
127127 $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($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)
128128 }
129129 let li3 = split((tryGetString((votingId + "_3_batch")) + batch), ",")
130130 let votes3 = {
131131 let $l = li3
132132 let $s = size($l)
133133 let $acc0 = 0
134134 func $f2_1 ($a,$i) = if (($i >= $s))
135135 then $a
136136 else votesHandler($a, $l[$i])
137137
138138 func $f2_2 ($a,$i) = if (($i >= $s))
139139 then $a
140140 else throw("List size exceeds 90")
141141
142142 $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_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)
143143 }
144144 $Tuple2(nil, $Tuple3((votes1 / Scale8), (votes2 / Scale8), (votes3 / Scale8)))
145145 }
146146
147147
148148
149149 @Callable(i)
150150 func setVotingStatus (votingId,active) = if ((this != i.caller))
151151 then throw("admin only")
152152 else [BooleanEntry((votingId + "_status"), active)]
153153
154154
155155 @Verifier(tx)
156156 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
157157

github/deemru/w8io/6500d08 
48.55 ms