tx · BUKZwTsAi6gn9u7nVE8uZYwEwvHYRjhQWkaSqr8uaP7M

3P3urybcgohip3uYE1hWF89gBPDKM3zLoMB:  -0.01000000 Waves

2023.02.27 16:36 [3533654] smart account 3P3urybcgohip3uYE1hWF89gBPDKM3zLoMB > SELF 0.00000000 Waves

{ "type": 13, "id": "BUKZwTsAi6gn9u7nVE8uZYwEwvHYRjhQWkaSqr8uaP7M", "fee": 1000000, "feeAssetId": null, "timestamp": 1677504988203, "version": 2, "chainId": 87, "sender": "3P3urybcgohip3uYE1hWF89gBPDKM3zLoMB", "senderPublicKey": "8FT1roaUCGNMutLjmadT8CDJNEZ1MvfkppRyKdink7RD", "proofs": [ "9nAFScUhjoUnRXMVUhgHz7pBvp9ahYPQEiUHo2chFKvGfyTEVLZjucjK6cuZpqnVCE9eZzVkj9CAmmkz2ALuxjY" ], "script": "base64:BgIZCAISBAoCCAgSAwoBCBIECgIICBIECgIIBAcADnN0YWtpbmdBZGRyZXNzCQEHQWRkcmVzcwEBGgFXPntnxIxvbmCo0s2P7nmfMU5HqK5DFP2wAAZTY2FsZTgAgMLXLwENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAENdHJ5R2V0Qm9vbGVhbgEDa2V5BAckbWF0Y2gwCQCbCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFiBQckbWF0Y2gwBQFiBwEMdHJ5R2V0U3RyaW5nAQNrZXkEByRtYXRjaDAJAJ0IAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAAdiYXRjaGVzCQDMCAICATEJAMwIAgIBMgkAzAgCAgEzCQDMCAICATQFA25pbAAQYXZhaWxhYmxlT3B0aW9ucwkAzAgCAgExCQDMCAICATIJAMwIAgIBMwUDbmlsBAFpAQR2b3RlAgZvcHRpb24Idm90aW5nSWQEBnZvdGVJZAUIdm90aW5nSWQECmFkZHJlc3NTdHIJAKUIAQgFAWkGY2FsbGVyBApyYW5kb21IYXNoCQD3AwEIBQFpDXRyYW5zYWN0aW9uSWQEBWJhdGNoCQCkAwEJAGQCAAEJAGoCCQCxCQEFCnJhbmRvbUhhc2gJAJADAQUHYmF0Y2hlcwQMdm90ZVZhbHVlU3RyBQZvcHRpb24DCQAAAgkAzwgCBRBhdmFpbGFibGVPcHRpb25zBQZvcHRpb24FBHVuaXQJAAIBAhppbmNvcnJlY3Qgb3B0aW9uIGlzIGNob3NlbgMJAQEhAQkBDXRyeUdldEJvb2xlYW4BCQCsAgIFBnZvdGVJZAIHX3N0YXR1cwkAAgECFHZvdGluZyBpcyBub3QgYWN0aXZlAwkBAiE9AgkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICBQZ2b3RlSWQCAV8FCmFkZHJlc3NTdHICAAkAAgECEXlvdSBhbHJlYWR5IHZvdGVkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgUGdm90ZUlkAgFfBQx2b3RlVmFsdWVTdHICBl9iYXRjaAUFYmF0Y2gJAKwCAgkArAICCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgIJAKwCAgkArAICBQZ2b3RlSWQCAV8FDHZvdGVWYWx1ZVN0cgIGX2JhdGNoBQViYXRjaAUKYWRkcmVzc1N0cgIBLAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgUGdm90ZUlkAgFfBQphZGRyZXNzU3RyBQx2b3RlVmFsdWVTdHIFA25pbAFpAQdyZXN1bHRzAQh2b3RpbmdJZAoBDGJhdGNoSGFuZGxlcgIFYWNjdW0FYmF0Y2gEA2ludgkA/AcEBQR0aGlzAgxiYXRjaFJlc3VsdHMJAMwIAgUFYmF0Y2gJAMwIAgUIdm90aW5nSWQFA25pbAUDbmlsAwkAAAIFA2ludgUDaW52BANuZXcEByRtYXRjaDAFA2ludgMJAAECBQckbWF0Y2gwAg8oSW50LCBJbnQsIEludCkEAXgFByRtYXRjaDAFAXgJAJUKAwAAAAAAAAkAlQoDCQBkAggFBWFjY3VtAl8xCAUDbmV3Al8xCQBkAggFBWFjY3VtAl8yCAUDbmV3Al8yCQBkAggFBWFjY3VtAl8zCAUDbmV3Al8zCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBANyZXMKAAIkbAUHYmF0Y2hlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJUKAwAAAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMYmF0Y2hIYW5kbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA0CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgINdm90ZXMgcmVzdWx0IAkApAMBCAUDcmVzAl8xAgIsIAkApAMBCAUDcmVzAl8yAgIsIAkApAMBCAUDcmVzAl8zAWkBDGJhdGNoUmVzdWx0cwIFYmF0Y2gIdm90aW5nSWQKAQx2b3Rlc0hhbmRsZXICBWFjY3VtCmFkZHJlc3NTdHIJAGQCBQVhY2N1bQQHJG1hdGNoMAkAmggCBQ5zdGFraW5nQWRkcmVzcwkArAICBQphZGRyZXNzU3RyAgdfc1BsdXRvAwkAAQIFByRtYXRjaDACA0ludAQBeAUHJG1hdGNoMAUBeAAABANsaTEJALUJAgkArAICCQEMdHJ5R2V0U3RyaW5nAQkArAICBQh2b3RpbmdJZAIIXzFfYmF0Y2gFBWJhdGNoAgEsBAZ2b3RlczEKAAIkbAUDbGkxCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQx2b3Rlc0hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDkwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaBANsaTIJALUJAgkArAICCQEMdHJ5R2V0U3RyaW5nAQkArAICBQh2b3RpbmdJZAIIXzJfYmF0Y2gFBWJhdGNoAgEsBAZ2b3RlczIKAAIkbAUDbGkyCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQx2b3Rlc0hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDkwCQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaBANsaTMJALUJAgkArAICCQEMdHJ5R2V0U3RyaW5nAQkArAICBQh2b3RpbmdJZAIIXzNfYmF0Y2gFBWJhdGNoAgEsBAZ2b3RlczMKAAIkbAUDbGkzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQx2b3Rlc0hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDkwCQEFJGYyXzICCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaCQCUCgIFA25pbAkAlQoDCQBpAgUGdm90ZXMxBQZTY2FsZTgJAGkCBQZ2b3RlczIFBlNjYWxlOAkAaQIFBnZvdGVzMwUGU2NhbGU4AWkBD3NldFZvdGluZ1N0YXR1cwIIdm90aW5nSWQGYWN0aXZlAwkBAiE9AgUEdGhpcwgFAWkGY2FsbGVyCQACAQIKYWRtaW4gb25seQkAzAgCCQEMQm9vbGVhbkVudHJ5AgkArAICBQh2b3RpbmdJZAIHX3N0YXR1cwUGYWN0aXZlBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5nZcbCw==", "height": 3533654, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 7Xbz1cie3nwjaBb1CHXFza7Jboo6arq6PkFqa38CnMGd Next: J73vTUNomKXFd5b8kjBYY65Mn4yvx4yTMiJJfqKUj5tf Diff:
OldNewDifferences
8888
8989
9090 @Callable(i)
91-func setVotingStatus (votingId,active) = if ((this != i.caller))
92- then throw("admin only")
93- else [BooleanEntry((votingId + "_status"), active)]
94-
95-
96-
97-@Callable(i)
9891 func batchResults (batch,votingId) = {
99- let voteId = votingId
10092 func votesHandler (accum,addressStr) = (accum + match getInteger(stakingAddress, (addressStr + "_sPluto")) {
10193 case x: Int =>
10294 x
10496 0
10597 })
10698
107- let li1 = split((tryGetString((voteId + "_1_batch")) + batch), ",")
99+ let li1 = split((tryGetString((votingId + "_1_batch")) + batch), ",")
108100 let votes1 = {
109101 let $l = li1
110102 let $s = size($l)
119111
120112 $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)
121113 }
122- let li2 = split((tryGetString((voteId + "_2_batch")) + batch), ",")
114+ let li2 = split((tryGetString((votingId + "_2_batch")) + batch), ",")
123115 let votes2 = {
124116 let $l = li2
125117 let $s = size($l)
134126
135127 $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)
136128 }
137- let li3 = split((tryGetString((voteId + "_3_batch")) + batch), ",")
129+ let li3 = split((tryGetString((votingId + "_3_batch")) + batch), ",")
138130 let votes3 = {
139131 let $l = li3
140132 let $s = size($l)
153145 }
154146
155147
148+
149+@Callable(i)
150+func setVotingStatus (votingId,active) = if ((this != i.caller))
151+ then throw("admin only")
152+ else [BooleanEntry((votingId + "_status"), active)]
153+
154+
156155 @Verifier(tx)
157156 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
158157
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 _ =>
6464 $Tuple3(0, 0, 0)
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)
91-func setVotingStatus (votingId,active) = if ((this != i.caller))
92- then throw("admin only")
93- else [BooleanEntry((votingId + "_status"), active)]
94-
95-
96-
97-@Callable(i)
9891 func batchResults (batch,votingId) = {
99- let voteId = votingId
10092 func votesHandler (accum,addressStr) = (accum + match getInteger(stakingAddress, (addressStr + "_sPluto")) {
10193 case x: Int =>
10294 x
10395 case _ =>
10496 0
10597 })
10698
107- let li1 = split((tryGetString((voteId + "_1_batch")) + batch), ",")
99+ let li1 = split((tryGetString((votingId + "_1_batch")) + batch), ",")
108100 let votes1 = {
109101 let $l = li1
110102 let $s = size($l)
111103 let $acc0 = 0
112104 func $f0_1 ($a,$i) = if (($i >= $s))
113105 then $a
114106 else votesHandler($a, $l[$i])
115107
116108 func $f0_2 ($a,$i) = if (($i >= $s))
117109 then $a
118110 else throw("List size exceeds 90")
119111
120112 $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)
121113 }
122- let li2 = split((tryGetString((voteId + "_2_batch")) + batch), ",")
114+ let li2 = split((tryGetString((votingId + "_2_batch")) + batch), ",")
123115 let votes2 = {
124116 let $l = li2
125117 let $s = size($l)
126118 let $acc0 = 0
127119 func $f1_1 ($a,$i) = if (($i >= $s))
128120 then $a
129121 else votesHandler($a, $l[$i])
130122
131123 func $f1_2 ($a,$i) = if (($i >= $s))
132124 then $a
133125 else throw("List size exceeds 90")
134126
135127 $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)
136128 }
137- let li3 = split((tryGetString((voteId + "_3_batch")) + batch), ",")
129+ let li3 = split((tryGetString((votingId + "_3_batch")) + batch), ",")
138130 let votes3 = {
139131 let $l = li3
140132 let $s = size($l)
141133 let $acc0 = 0
142134 func $f2_1 ($a,$i) = if (($i >= $s))
143135 then $a
144136 else votesHandler($a, $l[$i])
145137
146138 func $f2_2 ($a,$i) = if (($i >= $s))
147139 then $a
148140 else throw("List size exceeds 90")
149141
150142 $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)
151143 }
152144 $Tuple2(nil, $Tuple3((votes1 / Scale8), (votes2 / Scale8), (votes3 / Scale8)))
153145 }
154146
155147
148+
149+@Callable(i)
150+func setVotingStatus (votingId,active) = if ((this != i.caller))
151+ then throw("admin only")
152+ else [BooleanEntry((votingId + "_status"), active)]
153+
154+
156155 @Verifier(tx)
157156 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
158157

github/deemru/w8io/6500d08 
50.80 ms