2023.03.20 09:19 [3563560] smart account 3P3urybcgohip3uYE1hWF89gBPDKM3zLoMB > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "93hwoUNAw7Eqo3dpHHxyVYabHZrXq2Tj6mr2Gn8m5QcM",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1679293192261,
    "version": 2,
    "chainId": 87,
    "sender": "3P3urybcgohip3uYE1hWF89gBPDKM3zLoMB",
    "senderPublicKey": "8FT1roaUCGNMutLjmadT8CDJNEZ1MvfkppRyKdink7RD",
    "proofs": [
        "222NiM1JYrMDYZHchfQtBCnTHEhYkt4cYFThAK8iGUYu74mAUtVfUVh7SoVpYWBqhT4Bqgx5y5hdnTtGWd1R7RyB"
    ],
    "script": "base64:BgIZCAISBAoCCAgSAwoBCBIECgIICBIECgIIBAkADnN0YWtpbmdBZGRyZXNzCQEHQWRkcmVzcwEBGgFXPntnxIxvbmCo0s2P7nmfMU5HqK5DFP2wABFwYXJhbWV0ZXJzQWRkcmVzcwkBB0FkZHJlc3MBARoBV+7WJYtq2Ae0X0s1eNtV5rMlFw/bMdew9AAGU2NhbGU4AIDC1y8BDXRyeUdldEludGVnZXIBA2tleQQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABDXRyeUdldEJvb2xlYW4BA2tleQQHJG1hdGNoMAkAmwgCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBYgUHJG1hdGNoMAUBYgcBDHRyeUdldFN0cmluZwEDa2V5BAckbWF0Y2gwCQCdCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWIFByRtYXRjaDAFAWICAAEOY2FsY3VsYXRlU1JhdGUABA9zdGFraW5nRW1pc3Npb24EByRtYXRjaDAJAPwHBAURcGFyYW1ldGVyc0FkZHJlc3MCF2dldFN0YWtpbmdCbG9ja0VtaXNzaW9uCQDMCAIHBQNuaWwFA25pbAMJAAECBQckbWF0Y2gwAgNJbnQEAmluBQckbWF0Y2gwBQJpbgkAAgECCmJhZCBpbnZva2UDCQAAAgUPc3Rha2luZ0VtaXNzaW9uBQ9zdGFraW5nRW1pc3Npb24EDmxhc3RDaGVja1NSYXRlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQ5zdGFraW5nQWRkcmVzcwIVZ2xvYmFsX2xhc3RDaGVja1NSYXRlBAxzUGx1dG9BbW91bnQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFDnN0YWtpbmdBZGRyZXNzAg1nbG9iYWxfc1BsdXRvBA9sYXN0Q2hlY2tIZWlnaHQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFDnN0YWtpbmdBZGRyZXNzAhtnbG9iYWxfbGFzdENoZWNrU1JhdGVIZWlnaHQEBmJsb2NrcwkAZQIFBmhlaWdodAUPbGFzdENoZWNrSGVpZ2h0AwkAAAIFDHNQbHV0b0Ftb3VudAAABQZTY2FsZTgJAGQCCQERQGV4dHJOYXRpdmUoMTA1MCkCBQ5zdGFraW5nQWRkcmVzcwIVZ2xvYmFsX2xhc3RDaGVja1NSYXRlCQBrAwkAaAIFBmJsb2NrcwUGU2NhbGU4BQ9zdGFraW5nRW1pc3Npb24FDHNQbHV0b0Ftb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAHYmF0Y2hlcwkAzAgCAgExCQDMCAICATIJAMwIAgIBMwkAzAgCAgE0BQNuaWwAEGF2YWlsYWJsZU9wdGlvbnMJAMwIAgIBMQkAzAgCAgEyCQDMCAICATMFA25pbAQBaQEEdm90ZQIGb3B0aW9uCHZvdGluZ0lkBAZ2b3RlSWQFCHZvdGluZ0lkBAphZGRyZXNzU3RyCQClCAEIBQFpBmNhbGxlcgQKcmFuZG9tSGFzaAkA9wMBCAUBaQ10cmFuc2FjdGlvbklkBAViYXRjaAkApAMBCQBkAgABCQBqAgkAsQkBBQpyYW5kb21IYXNoCQCQAwEFB2JhdGNoZXMEDHZvdGVWYWx1ZVN0cgUGb3B0aW9uAwkAAAIJAM8IAgUQYXZhaWxhYmxlT3B0aW9ucwUGb3B0aW9uBQR1bml0CQACAQIaaW5jb3JyZWN0IG9wdGlvbiBpcyBjaG9zZW4DCQEBIQEJAQ10cnlHZXRCb29sZWFuAQkArAICBQZ2b3RlSWQCB19zdGF0dXMJAAIBAhR2b3RpbmcgaXMgbm90IGFjdGl2ZQMJAQIhPQIJAQx0cnlHZXRTdHJpbmcBCQCsAgIJAKwCAgUGdm90ZUlkAgFfBQphZGRyZXNzU3RyAgAJAAIBAhF5b3UgYWxyZWFkeSB2b3RlZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIFBnZvdGVJZAIBXwUMdm90ZVZhbHVlU3RyAgZfYmF0Y2gFBWJhdGNoCQCsAgIJAKwCAgkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICCQCsAgIJAKwCAgUGdm90ZUlkAgFfBQx2b3RlVmFsdWVTdHICBl9iYXRjaAUFYmF0Y2gFCmFkZHJlc3NTdHICASwJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIFBnZvdGVJZAIBXwUKYWRkcmVzc1N0cgUMdm90ZVZhbHVlU3RyBQNuaWwBaQEHcmVzdWx0cwEIdm90aW5nSWQKAQxiYXRjaEhhbmRsZXICBWFjY3VtBWJhdGNoBANpbnYJAPwHBAUEdGhpcwIMYmF0Y2hSZXN1bHRzCQDMCAIFBWJhdGNoCQDMCAIFCHZvdGluZ0lkBQNuaWwFA25pbAMJAAACBQNpbnYFA2ludgQDbmV3BAckbWF0Y2gwBQNpbnYDCQABAgUHJG1hdGNoMAIPKEludCwgSW50LCBJbnQpBAF4BQckbWF0Y2gwBQF4CQACAQkArAICAg9lcnJvciBpbiBiYXRjaCAFBWJhdGNoCQCVCgMJAGQCCAUFYWNjdW0CXzEIBQNuZXcCXzEJAGQCCAUFYWNjdW0CXzIIBQNuZXcCXzIJAGQCCAUFYWNjdW0CXzMIBQNuZXcCXzMJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EBXNSYXRlCQEOY2FsY3VsYXRlU1JhdGUABANyZXMKAAIkbAUHYmF0Y2hlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJUKAwAAAAAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMYmF0Y2hIYW5kbGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA0CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgINdm90ZXMgcmVzdWx0IAkApAMBCQBrAwgFA3JlcwJfMQUFc1JhdGUFBlNjYWxlOAICLCAJAKQDAQkAawMIBQNyZXMCXzIFBXNSYXRlBQZTY2FsZTgCAiwgCQCkAwEJAGsDCAUDcmVzAl8zBQVzUmF0ZQUGU2NhbGU4AWkBDGJhdGNoUmVzdWx0cwIFYmF0Y2gIdm90aW5nSWQKAQx2b3Rlc0hhbmRsZXICBWFjY3VtCmFkZHJlc3NTdHIJAGQCBQVhY2N1bQQHJG1hdGNoMAkAmggCBQ5zdGFraW5nQWRkcmVzcwkArAICBQphZGRyZXNzU3RyAgdfc1BsdXRvAwkAAQIFByRtYXRjaDACA0ludAQBeAUHJG1hdGNoMAUBeAAABANsaTEJALUJAgkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICBQh2b3RpbmdJZAIIXzFfYmF0Y2gFBWJhdGNoAgEsBAZ2b3RlczEKAAIkbAUDbGkxCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQx2b3Rlc0hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDkwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaBANsaTIJALUJAgkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICBQh2b3RpbmdJZAIIXzJfYmF0Y2gFBWJhdGNoAgEsBAZ2b3RlczIKAAIkbAUDbGkyCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQx2b3Rlc0hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDkwCQEFJGYxXzICCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECCQEFJGYxXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaBANsaTMJALUJAgkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICBQh2b3RpbmdJZAIIXzNfYmF0Y2gFBWJhdGNoAgEsBAZ2b3RlczMKAAIkbAUDbGkzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQx2b3Rlc0hhbmRsZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDkwCQEFJGYyXzICCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECCQEFJGYyXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAA5ADoAOwA8AD0APgA/AEAAQQBCAEMARABFAEYARwBIAEkASgBLAEwATQBOAE8AUABRAFIAUwBUAFUAVgBXAFgAWQBaCQCUCgIFA25pbAkAlQoDCQBpAgUGdm90ZXMxBQZTY2FsZTgJAGkCBQZ2b3RlczIFBlNjYWxlOAkAaQIFBnZvdGVzMwUGU2NhbGU4AWkBD3NldFZvdGluZ1N0YXR1cwIIdm90aW5nSWQGYWN0aXZlAwkBAiE9AgUEdGhpcwgFAWkGY2FsbGVyCQACAQIKYWRtaW4gb25seQkAzAgCCQEMQm9vbGVhbkVudHJ5AgkArAICBQh2b3RpbmdJZAIHX3N0YXR1cwUGYWN0aXZlBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5V6RsDw==",
    "height": 3563560,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: JmJdAJSm6EkhPFvaeQA2Qpysk1Tzim25EEMzaN97jCY
Next: none

Diff: 
Old
New
Differences
91
91
 
            else throw("Strict value is not equal to itself.")
92
92
 
        }
93
93
 
94
+
    let sRate = calculateSRate()
94
95
 
    let res = {
95
96
 
        let $l = batches
96
97
 
        let $s = size($l)
105
106
 
106
107
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
107
108
 
        }
108
-
    throw(((((("votes result " + toString((res._1 / Scale8))) + ", ") + toString((res._2 / Scale8))) + ", ") + toString((res._3 / Scale8))))
109
+
    throw(((((("votes result " + toString(fraction(res._1, sRate, Scale8))) + ", ") + toString(fraction(res._2, sRate, Scale8))) + ", ") + toString(fraction(res._3, sRate, Scale8))))
109
110
 
    }
110
111
 
111
112
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let stakingAddress = Address(base58'3P7dGTVZp8VLDYy3XEaUQbiqfi9cMK1Ly5q')
5
5
 
6
6
 
let parametersAddress = Address(base58'3PPhk65Ab4UDgbxYUDW7YSXkzHfWtj7WBrB')
7
7
 
8
8
 
let Scale8 = 100000000
9
9
 
10
10
 
func tryGetInteger (key) = match getInteger(this, key) {
11
11
 
    case b: Int => 
12
12
 
        b
13
13
 
    case _ => 
14
14
 
        0
15
15
 
}
16
16
 
17
17
 
18
18
 
func tryGetBoolean (key) = match getBoolean(this, key) {
19
19
 
    case b: Boolean => 
20
20
 
        b
21
21
 
    case _ => 
22
22
 
        false
23
23
 
}
24
24
 
25
25
 
26
26
 
func tryGetString (key) = match getString(this, key) {
27
27
 
    case b: String => 
28
28
 
        b
29
29
 
    case _ => 
30
30
 
        ""
31
31
 
}
32
32
 
33
33
 
34
34
 
func calculateSRate () = {
35
35
 
    let stakingEmission =     match invoke(parametersAddress, "getStakingBlockEmission", [false], nil) {
36
36
 
        case in: Int => 
37
37
 
            in
38
38
 
        case _ => 
39
39
 
            throw("bad invoke")
40
40
 
    }
41
41
 
    if ((stakingEmission == stakingEmission))
42
42
 
        then {
43
43
 
            let lastCheckSRate = getIntegerValue(stakingAddress, "global_lastCheckSRate")
44
44
 
            let sPlutoAmount = getIntegerValue(stakingAddress, "global_sPluto")
45
45
 
            let lastCheckHeight = getIntegerValue(stakingAddress, "global_lastCheckSRateHeight")
46
46
 
            let blocks = (height - lastCheckHeight)
47
47
 
            if ((sPlutoAmount == 0))
48
48
 
                then Scale8
49
49
 
                else (getIntegerValue(stakingAddress, "global_lastCheckSRate") + fraction((blocks * Scale8), stakingEmission, sPlutoAmount))
50
50
 
            }
51
51
 
        else throw("Strict value is not equal to itself.")
52
52
 
    }
53
53
 
54
54
 
55
55
 
let batches = ["1", "2", "3", "4"]
56
56
 
57
57
 
let availableOptions = ["1", "2", "3"]
58
58
 
59
59
 
@Callable(i)
60
60
 
func vote (option,votingId) = {
61
61
 
    let voteId = votingId
62
62
 
    let addressStr = toString(i.caller)
63
63
 
    let randomHash = sha256(i.transactionId)
64
64
 
    let batch = toString((1 + (toInt(randomHash) % size(batches))))
65
65
 
    let voteValueStr = option
66
66
 
    if ((indexOf(availableOptions, option) == unit))
67
67
 
        then throw("incorrect option is chosen")
68
68
 
        else if (!(tryGetBoolean((voteId + "_status"))))
69
69
 
            then throw("voting is not active")
70
70
 
            else if ((tryGetString(((voteId + "_") + addressStr)) != ""))
71
71
 
                then throw("you already voted")
72
72
 
                else [StringEntry(((((voteId + "_") + voteValueStr) + "_batch") + batch), ((tryGetString(((((voteId + "_") + voteValueStr) + "_batch") + batch)) + addressStr) + ",")), StringEntry(((voteId + "_") + addressStr), voteValueStr)]
73
73
 
    }
74
74
 
75
75
 
76
76
 
77
77
 
@Callable(i)
78
78
 
func results (votingId) = {
79
79
 
    func batchHandler (accum,batch) =     {
80
80
 
        let inv = invoke(this, "batchResults", [batch, votingId], nil)
81
81
 
        if ((inv == inv))
82
82
 
            then {
83
83
 
                let new =                 match inv {
84
84
 
                    case x: (Int, Int, Int) => 
85
85
 
                        x
86
86
 
                    case _ => 
87
87
 
                        throw(("error in batch " + batch))
88
88
 
                }
89
89
 
                $Tuple3((accum._1 + new._1), (accum._2 + new._2), (accum._3 + new._3))
90
90
 
                }
91
91
 
            else throw("Strict value is not equal to itself.")
92
92
 
        }
93
93
 
94
+
    let sRate = calculateSRate()
94
95
 
    let res = {
95
96
 
        let $l = batches
96
97
 
        let $s = size($l)
97
98
 
        let $acc0 = $Tuple3(0, 0, 0)
98
99
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
99
100
 
            then $a
100
101
 
            else batchHandler($a, $l[$i])
101
102
 
102
103
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
103
104
 
            then $a
104
105
 
            else throw("List size exceeds 4")
105
106
 
106
107
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
107
108
 
        }
108
-
    throw(((((("votes result " + toString((res._1 / Scale8))) + ", ") + toString((res._2 / Scale8))) + ", ") + toString((res._3 / Scale8))))
109
+
    throw(((((("votes result " + toString(fraction(res._1, sRate, Scale8))) + ", ") + toString(fraction(res._2, sRate, Scale8))) + ", ") + toString(fraction(res._3, sRate, Scale8))))
109
110
 
    }
110
111
 
111
112
 
112
113
 
113
114
 
@Callable(i)
114
115
 
func batchResults (batch,votingId) = {
115
116
 
    func votesHandler (accum,addressStr) =     (accum +     match getInteger(stakingAddress, (addressStr + "_sPluto")) {
116
117
 
        case x: Int => 
117
118
 
            x
118
119
 
        case _ => 
119
120
 
            0
120
121
 
    })
121
122
 
122
123
 
    let li1 = split(tryGetString(((votingId + "_1_batch") + batch)), ",")
123
124
 
    let votes1 = {
124
125
 
        let $l = li1
125
126
 
        let $s = size($l)
126
127
 
        let $acc0 = 0
127
128
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
128
129
 
            then $a
129
130
 
            else votesHandler($a, $l[$i])
130
131
 
131
132
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
132
133
 
            then $a
133
134
 
            else throw("List size exceeds 90")
134
135
 
135
136
 
        $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)
136
137
 
        }
137
138
 
    let li2 = split(tryGetString(((votingId + "_2_batch") + batch)), ",")
138
139
 
    let votes2 = {
139
140
 
        let $l = li2
140
141
 
        let $s = size($l)
141
142
 
        let $acc0 = 0
142
143
 
        func $f1_1 ($a,$i) =         if (($i >= $s))
143
144
 
            then $a
144
145
 
            else votesHandler($a, $l[$i])
145
146
 
146
147
 
        func $f1_2 ($a,$i) =         if (($i >= $s))
147
148
 
            then $a
148
149
 
            else throw("List size exceeds 90")
149
150
 
150
151
 
        $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)
151
152
 
        }
152
153
 
    let li3 = split(tryGetString(((votingId + "_3_batch") + batch)), ",")
153
154
 
    let votes3 = {
154
155
 
        let $l = li3
155
156
 
        let $s = size($l)
156
157
 
        let $acc0 = 0
157
158
 
        func $f2_1 ($a,$i) =         if (($i >= $s))
158
159
 
            then $a
159
160
 
            else votesHandler($a, $l[$i])
160
161
 
161
162
 
        func $f2_2 ($a,$i) =         if (($i >= $s))
162
163
 
            then $a
163
164
 
            else throw("List size exceeds 90")
164
165
 
165
166
 
        $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)
166
167
 
        }
167
168
 
    $Tuple2(nil, $Tuple3((votes1 / Scale8), (votes2 / Scale8), (votes3 / Scale8)))
168
169
 
    }
169
170
 
170
171
 
171
172
 
172
173
 
@Callable(i)
173
174
 
func setVotingStatus (votingId,active) = if ((this != i.caller))
174
175
 
    then throw("admin only")
175
176
 
    else [BooleanEntry((votingId + "_status"), active)]
176
177
 
177
178
 
178
179
 
@Verifier(tx)
179
180
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
180
181
 

github/deemru/w8io/786bc32 
38.13 ms ◑