tx · 7gZzTyNDUeyQMhv7zc9tZNCiicaCEABS3ZDcrAzatDRF

3N8mB685DHj1jER6q33drLYFusBVtxrRame:  -0.01000000 Waves

2023.06.20 10:15 [2630648] smart account 3N8mB685DHj1jER6q33drLYFusBVtxrRame > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7gZzTyNDUeyQMhv7zc9tZNCiicaCEABS3ZDcrAzatDRF",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1687245363120,
    "version": 2,
    "chainId": 84,
    "sender": "3N8mB685DHj1jER6q33drLYFusBVtxrRame",
    "senderPublicKey": "jk6fUkpq9pS4xCNgvJPDbFjWiZVCf9zoog6Gtmb8EtD",
    "proofs": [
        "53L4AaoVkPvSrZC4YC1dttmWPEEu3Tg5zjNE5ZYyh78RLRJtR5QYVQKusrPJy4XhtzPvjQXoNcRrPWfuqzNjkV99"
    ],
    "script": "base64:BgIJCAISAwoBARIAHwEKbnVtVG9XYXZlcwEDbnVtCQBoAgUDbnVtAIDC1y8BC2lzUGF5bWVudE9rAgFpA3N1bQQRYWNjZXB0YWJsZUFzc2V0SWQBBBOr2TMEAXAJAJEDAggFAWkIcGF5bWVudHMAAAMJAGcCCAUBcAZhbW91bnQJAQpudW1Ub1dhdmVzAQUDc3VtCQAAAggFAXAHYXNzZXRJZAUEdW5pdAcBC21hcEludFRvU3RyAgVhY2N1bQRuZXh0CQDMCAIJAKQDAQUEbmV4dAUFYWNjdW0BC21hcFN0clRvSW50AgVhY2N1bQRuZXh0CQDMCAIJAQ1wYXJzZUludFZhbHVlAQUEbmV4dAUFYWNjdW0BC21hcEludFRvU3VtAgVhY2N1bQRuZXh0CQBkAgUFYWNjdW0FBG5leHQBDGxpc3RJbnRUb1N1bQEDYXJyCgACJGwFA2FycgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQELbWFwSW50VG9TdW0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgETbGlzdEludFRvTGlzdFN0cmluZwEDYXJyCgACJGwFA2FycgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQELbWFwSW50VG9TdHICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgETbGlzdFN0cmluZ1RvTGlzdEluZwEDYXJyCgACJGwFA2FycgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQELbWFwU3RyVG9JbnQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgEabGlzdFN0cmluZ0NvbXByZXNzVG9TdHJpbmcBA2FycgkAuQkCBQNhcnICAXwBHHN0cmluZ0RlY29tcHJlc3NUb0xpc3RTdHJpbmcBA3N0cgkAtQkCBQNzdHICAXwBF2xpc3RJbnRDb21wcmVzc1RvU3RyaW5nAQNhcnIJALkJAgkBE2xpc3RJbnRUb0xpc3RTdHJpbmcBBQNhcnICAXwBGXN0cmluZ0RlY29tcHJlc3NUb0xpc3RJbnQBBmFyclN0cgkBE2xpc3RTdHJpbmdUb0xpc3RJbmcBCQC1CQIFBmFyclN0cgIBfAEJZ2V0UmFuZG9tAQxjb21taXRIZWlnaHQEC3JldmVhbEJsb2NrCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAO0HAQUMY29tbWl0SGVpZ2h0AhF1bmV4Y3BlY3RlZCBlcnJvcgQDdnJmCQETdmFsdWVPckVycm9yTWVzc2FnZQIIBQtyZXZlYWxCbG9jawN2cmYCEXVuZXhjcGVjdGVkIGVycm9yBApyYW5kb21IYXNoCQD3AwEJAQV2YWx1ZQEFA3ZyZgQEaGFzaAkAsgkCBQpyYW5kb21IYXNoABAJAGoCBQRoYXNoACUBEWdldFJhbmRvbVJvdWxldHRlAQxjb21taXRIZWlnaHQECnJhbmRvbUhhc2gJAPcDAQkAywECCQEFdmFsdWUBCAkBBXZhbHVlAQkA7QcBBQxjb21taXRIZWlnaHQDdnJmCQCaAwEFDGNvbW1pdEhlaWdodAQHaGFzaEludAkAsgkCBQpyYW5kb21IYXNoABgEDHJhbmRvbU51bWJlcgkAagIFB2hhc2hJbnQAJQUMcmFuZG9tTnVtYmVyAQ9SX1dpbkNhbGN1bGF0b3IEDHJhbmRvbU51bWJlcgliZXRBbW91bnQSc2VsZWN0ZWROdW1iZXJCZXRzDGJldERpcmVjdGlvbgQLUkVEX1NFQ1RPUlMJAMwIAgAgCQDMCAIAEwkAzAgCABUJAMwIAgAZCQDMCAIAIgkAzAgCABsJAMwIAgAkCQDMCAIAHgkAzAgCABcJAMwIAgAFCQDMCAIAEAkAzAgCAAEJAMwIAgAOCQDMCAIACQkAzAgCABIJAMwIAgAHCQDMCAIADAkAzAgCAAMFA25pbAQNQkxBQ0tfU0VDVE9SUwkAzAgCAAIJAMwIAgAECQDMCAIABgkAzAgCAAgJAMwIAgAKCQDMCAIACwkAzAgCAA0JAMwIAgAPCQDMCAIAEQkAzAgCABQJAMwIAgAWCQDMCAIAGAkAzAgCABoJAMwIAgAcCQDMCAIAHQkAzAgCAB8JAMwIAgAhCQDMCAIAIwUDbmlsAwkAAAIFDGJldERpcmVjdGlvbgIDcmVkAwkBD2NvbnRhaW5zRWxlbWVudAIFC1JFRF9TRUNUT1JTBQxyYW5kb21OdW1iZXIJAGgCBQliZXRBbW91bnQAAgAAAwkAAAIFDGJldERpcmVjdGlvbgIFYmxhY2sDCQEPY29udGFpbnNFbGVtZW50AgUNQkxBQ0tfU0VDVE9SUwUMcmFuZG9tTnVtYmVyCQBoAgUJYmV0QW1vdW50AAIAAAMJAAACBQxiZXREaXJlY3Rpb24CA29kZAMDCQECIT0CCQBqAgUMcmFuZG9tTnVtYmVyAAIAAAkBAiE9AgUMcmFuZG9tTnVtYmVyAAAHCQBoAgUJYmV0QW1vdW50AAIAAAMJAAACBQxiZXREaXJlY3Rpb24CBGV2ZW4DAwkAAAIJAGoCBQxyYW5kb21OdW1iZXIAAgAACQECIT0CBQxyYW5kb21OdW1iZXIAAAcJAGgCBQliZXRBbW91bnQAAgAAAwMJAAACCQCQAwEFEnNlbGVjdGVkTnVtYmVyQmV0cwABCQAAAgUMYmV0RGlyZWN0aW9uAgNudW0HAwkAAAIJAJEDAgUSc2VsZWN0ZWROdW1iZXJCZXRzAAAFDHJhbmRvbU51bWJlcgkAaAIFCWJldEFtb3VudAAkAAADCQAAAgkAkAMBBRJzZWxlY3RlZE51bWJlckJldHMAAgMJAQ9jb250YWluc0VsZW1lbnQCBRJzZWxlY3RlZE51bWJlckJldHMFDHJhbmRvbU51bWJlcgkAaAIFCWJldEFtb3VudAASAAADCQAAAgkAkAMBBRJzZWxlY3RlZE51bWJlckJldHMAAwMJAQ9jb250YWluc0VsZW1lbnQCBRJzZWxlY3RlZE51bWJlckJldHMFDHJhbmRvbU51bWJlcgkAaAIFCWJldEFtb3VudAAMAAADCQAAAgkAkAMBBRJzZWxlY3RlZE51bWJlckJldHMABAMJAQ9jb250YWluc0VsZW1lbnQCBRJzZWxlY3RlZE51bWJlckJldHMFDHJhbmRvbU51bWJlcgkAaAIFCWJldEFtb3VudAAJAAADCQAAAgkAkAMBBRJzZWxlY3RlZE51bWJlckJldHMADAMDCQEPY29udGFpbnNFbGVtZW50AgUSc2VsZWN0ZWROdW1iZXJCZXRzBQxyYW5kb21OdW1iZXIJAQIhPQIFDHJhbmRvbU51bWJlcgAABwkAaAIFCWJldEFtb3VudAADAAADCQAAAgkAkAMBBRJzZWxlY3RlZE51bWJlckJldHMAEgMDCQEPY29udGFpbnNFbGVtZW50AgUSc2VsZWN0ZWROdW1iZXJCZXRzBQxyYW5kb21OdW1iZXIJAQIhPQIFDHJhbmRvbU51bWJlcgAABwkAaAIFCWJldEFtb3VudAACAAAAAAELUl9nZXRCZXRLZXkBAWkJAKwCAgINYmV0X1JvdWxldHRlXwkApQgBCAUBaQZjYWxsZXIBEVJfZ2V0QmV0QW1vdW50S2V5AQFpCQCsAgICE2JldEFtb3VudF9Sb3VsZXR0ZV8JAKUIAQgFAWkGY2FsbGVyARdSX2dldFNlbGVjdGVkTnVtYmVyc0tleQEBaQkArAICAhlzZWxlY3RlZE51bWJlcnNfUm91bGV0dGVfCQClCAEIBQFpBmNhbGxlcgERUl9nZXREaXJlY3Rpb25LZXkBAWkJAKwCAgITZGlyZWN0aW9uX1JvdWxldHRlXwkApQgBCAUBaQZjYWxsZXIBC1JfZ2V0TG9nS2V5AQFpCQCsAgIJAKwCAgkArAICAg1sb2dfUm91bGV0dGVfCQClCAEIBQFpBmNhbGxlcgIBXwkA2AQBCAUBaQ10cmFuc2FjdGlvbklkAQ5SX2dldFN0YXR1c0tleQEBaQkArAICAhBzdGF0dXNfUm91bGV0dGVfCQClCAEIBQFpBmNhbGxlcgEMTFdfZ2V0QmV0S2V5AQFpCQCsAgICD2JldF9MdWNreVdoZWVsXwkApQgBCAUBaQZjYWxsZXIBDExXX2dldFdvbktleQEBaQkArAICAg93b25fTHVja3lXaGVlbF8JAKUIAQgFAWkGY2FsbGVyARVMV19nZXRSYW5kb21OdW1iZXJLZXkBAWkJAKwCAgIYcmFuZG9tTnVtYmVyX0x1Y2t5V2hlZWxfCQClCAEIBQFpBmNhbGxlcgEMTFdfZ2V0TG9nS2V5AQFpCQCsAgIJAKwCAgkArAICAg9sb2dfTHVja3lXaGVlbF8JAKUIAQgFAWkGY2FsbGVyAgFfCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQBDkxXX3doYXRVc2VyV29uAQV2YWx1ZQQHJG1hdGNoMAUFdmFsdWUDCQAAAgABBQckbWF0Y2gwCQEKbnVtVG9XYXZlcwEAAgMJAAACAAMFByRtYXRjaDAJAQpudW1Ub1dhdmVzAQABAwkAAAIABwUHJG1hdGNoMAkBCm51bVRvV2F2ZXMBAAYDCQAAAgAJBQckbWF0Y2gwCQEKbnVtVG9XYXZlcwEAAQAAAQ9MV19nZXRTdGF0dXNLZXkBAWkJAKwCAgIQc3RhdHVzX1JvdWxldHRlXwkApQgBCAUBaQZjYWxsZXIBDFNNX2dldEJldEtleQEBaQkArAICAgdiZXRfU01fCQClCAEIBQFpBmNhbGxlcgESU01fZ2V0QmV0QW1vdW50S2V5AQFpCQCsAgICDWJldEFtb3VudF9TTV8JAKUIAQgFAWkGY2FsbGVyAQ9TTV9nZXRTdGF0dXNLZXkBAWkJAKwCAgIKc3RhdHVzX1NNXwkApQgBCAUBaQZjYWxsZXIBC2dldFJhbmRvbVNNAQxjb21taXRIZWlnaHQECnJhbmRvbUhhc2gJAPcDAQkAywECCQEFdmFsdWUBCAkBBXZhbHVlAQkA7QcBBQxjb21taXRIZWlnaHQDdnJmCQCaAwEFDGNvbW1pdEhlaWdodAQHaGFzaEludAkAsgkCBQpyYW5kb21IYXNoABgEDHJhbmRvbU51bWJlcgkAagIFB2hhc2hJbnQABgQLcmFuZG9tSGFzaDIJAPcDAQkAywECCQEFdmFsdWUBCAkBBXZhbHVlAQkA7QcBCQBlAgUMY29tbWl0SGVpZ2h0CQBoAgUMcmFuZG9tTnVtYmVyALgXA3ZyZgkAmgMBBQxyYW5kb21OdW1iZXIECGhhc2hJbnQyCQCyCQIFC3JhbmRvbUhhc2gyABgEDXJhbmRvbU51bWJlcjIJAGoCBQhoYXNoSW50MgAGBAtyYW5kb21IYXNoMwkA9wMBCQDLAQIJAQV2YWx1ZQEICQEFdmFsdWUBCQDtBwEJAGUCBQxjb21taXRIZWlnaHQJAGgCBQ1yYW5kb21OdW1iZXIyAMwIA3ZyZgkAmgMBBQ1yYW5kb21OdW1iZXIyBAhoYXNoSW50MwkAsgkCBQtyYW5kb21IYXNoMwAYBA1yYW5kb21OdW1iZXIzCQBqAgUIaGFzaEludDMABgkAzAgCBQxyYW5kb21OdW1iZXIJAMwIAgUNcmFuZG9tTnVtYmVyMgkAzAgCBQ1yYW5kb21OdW1iZXIzBQNuaWwCAWkBElNsb3RNYWNoaW5lX2NvbW1pdAEJYmV0QW1vdW50BAFwCQCRAwIIBQFpCHBheW1lbnRzAAADCQEBIQEJAQtpc1BheW1lbnRPawIFAWkFCWJldEFtb3VudAkAAgECHldyb25nIHBheW1lbnQgYW1vdW50IG9yIGFzc2V0IQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDFNNX2dldEJldEtleQEFAWkJAGQCBQZoZWlnaHQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBElNNX2dldEJldEFtb3VudEtleQEFAWkFCWJldEFtb3VudAkAzAgCCQELU3RyaW5nRW50cnkCCQEPU01fZ2V0U3RhdHVzS2V5AQUBaQkArAICCQCsAgIJAKwCAgIgfCBzdGF0dXM6IGNvbW1pdCB8IHJldmVhbEJsb2NrOiAJAKQDAQkAZAIFBmhlaWdodAABAg4gfCBiZXRBbW91bnQ6IAkApAMBBQliZXRBbW91bnQFA25pbAFpARJTbG90TWFjaGluZV9yZXZlYWwABAxjb21taXRIZWlnaHQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkBEUBleHRyTmF0aXZlKDEwNTUpAQkBDFNNX2dldEJldEtleQEFAWkCDUJldCBub3QgZm91bmQECWJldEFtb3VudAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQERQGV4dHJOYXRpdmUoMTA1NSkBCQESU01fZ2V0QmV0QW1vdW50S2V5AQUBaQIUQmV0IGFtb3VudCBub3QgZm91bmQDCQBmAgUMY29tbWl0SGVpZ2h0BQZoZWlnaHQJAAIBCQCsAgIJAKwCAgIFV2FpdCAJAKQDAQkAZQIFDGNvbW1pdEhlaWdodAUGaGVpZ2h0AhkgYmxvY2tzIHRvIHJldmVhbCB0aGlzIGlkBAxyYW5kb21OdW1iZXIJAQtnZXRSYW5kb21TTQEFDGNvbW1pdEhlaWdodAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkApAMBCQCRAwIFDHJhbmRvbU51bWJlcgAAAgF8CQCkAwEJAJEDAgUMcmFuZG9tTnVtYmVyAAECAXwJAKQDAQkAkQMCBQxyYW5kb21OdW1iZXIAAgCSbTma",
    "height": 2630648,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7VxfETN8KK9ajNrzbtWwFYiZyDyqNYo7rCt8dKCqX3Ri
Next: 8A2eeXo63p65V9LfZHerbXJnotXYNFRS1fGE71iKhnrF

Diff: 

OldNewDifferences
216216     let randomHash = sha256((value(value(blockInfoByHeight(commitHeight)).vrf) + toBytes(commitHeight)))
217217     let hashInt = toInt(randomHash, 24)
218218     let randomNumber = (hashInt % 6)
219-    let randomHash2 = sha256((value(value(blockInfoByHeight((commitHeight - (randomNumber * 3000)))).vrf) + toBytes(commitHeight)))
219+    let randomHash2 = sha256((value(value(blockInfoByHeight((commitHeight - (randomNumber * 3000)))).vrf) + toBytes(randomNumber)))
220220     let hashInt2 = toInt(randomHash2, 24)
221221     let randomNumber2 = (hashInt2 % 6)
222-    let randomHash3 = sha256((value(value(blockInfoByHeight((commitHeight - (randomNumber2 * 1100)))).vrf) + toBytes(commitHeight)))
222+    let randomHash3 = sha256((value(value(blockInfoByHeight((commitHeight - (randomNumber2 * 1100)))).vrf) + toBytes(randomNumber2)))
223223     let hashInt3 = toInt(randomHash3, 24)
224224     let randomNumber3 = (hashInt3 % 6)
225225 [randomNumber, randomNumber2, randomNumber3]

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 func numToWaves (num) = (num * 100000000)
55 
66 
77 func isPaymentOk (i,sum) = {
88     let acceptableAssetId = base58'WAVES'
99     let p = i.payments[0]
1010     if ((p.amount >= numToWaves(sum)))
1111         then (p.assetId == unit)
1212         else false
1313     }
1414 
1515 
1616 func mapIntToStr (accum,next) = toString(next) :: accum
1717 
1818 
1919 func mapStrToInt (accum,next) = parseIntValue(next) :: accum
2020 
2121 
2222 func mapIntToSum (accum,next) = (accum + next)
2323 
2424 
2525 func listIntToSum (arr) = {
2626     let $l = arr
2727     let $s = size($l)
2828     let $acc0 = 0
2929     func $f0_1 ($a,$i) =     if (($i >= $s))
3030         then $a
3131         else mapIntToSum($a, $l[$i])
3232 
3333     func $f0_2 ($a,$i) =     if (($i >= $s))
3434         then $a
3535         else throw("List size exceeds 50")
3636 
3737     $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($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)
3838     }
3939 
4040 
4141 func listIntToListString (arr) = {
4242     let $l = arr
4343     let $s = size($l)
4444     let $acc0 = nil
4545     func $f0_1 ($a,$i) =     if (($i >= $s))
4646         then $a
4747         else mapIntToStr($a, $l[$i])
4848 
4949     func $f0_2 ($a,$i) =     if (($i >= $s))
5050         then $a
5151         else throw("List size exceeds 50")
5252 
5353     $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($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)
5454     }
5555 
5656 
5757 func listStringToListIng (arr) = {
5858     let $l = arr
5959     let $s = size($l)
6060     let $acc0 = nil
6161     func $f0_1 ($a,$i) =     if (($i >= $s))
6262         then $a
6363         else mapStrToInt($a, $l[$i])
6464 
6565     func $f0_2 ($a,$i) =     if (($i >= $s))
6666         then $a
6767         else throw("List size exceeds 50")
6868 
6969     $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($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)
7070     }
7171 
7272 
7373 func listStringCompressToString (arr) = makeString(arr, "|")
7474 
7575 
7676 func stringDecompressToListString (str) = split(str, "|")
7777 
7878 
7979 func listIntCompressToString (arr) = makeString(listIntToListString(arr), "|")
8080 
8181 
8282 func stringDecompressToListInt (arrStr) = listStringToListIng(split(arrStr, "|"))
8383 
8484 
8585 func getRandom (commitHeight) = {
8686     let revealBlock = valueOrErrorMessage(blockInfoByHeight(commitHeight), "unexcpected error")
8787     let vrf = valueOrErrorMessage(revealBlock.vrf, "unexcpected error")
8888     let randomHash = sha256(value(vrf))
8989     let hash = toInt(randomHash, 16)
9090     (hash % 37)
9191     }
9292 
9393 
9494 func getRandomRoulette (commitHeight) = {
9595     let randomHash = sha256((value(value(blockInfoByHeight(commitHeight)).vrf) + toBytes(commitHeight)))
9696     let hashInt = toInt(randomHash, 24)
9797     let randomNumber = (hashInt % 37)
9898     randomNumber
9999     }
100100 
101101 
102102 func R_WinCalculator (randomNumber,betAmount,selectedNumberBets,betDirection) = {
103103     let RED_SECTORS = [32, 19, 21, 25, 34, 27, 36, 30, 23, 5, 16, 1, 14, 9, 18, 7, 12, 3]
104104     let BLACK_SECTORS = [2, 4, 6, 8, 10, 11, 13, 15, 17, 20, 22, 24, 26, 28, 29, 31, 33, 35]
105105     if ((betDirection == "red"))
106106         then if (containsElement(RED_SECTORS, randomNumber))
107107             then (betAmount * 2)
108108             else 0
109109         else if ((betDirection == "black"))
110110             then if (containsElement(BLACK_SECTORS, randomNumber))
111111                 then (betAmount * 2)
112112                 else 0
113113             else if ((betDirection == "odd"))
114114                 then if (if (((randomNumber % 2) != 0))
115115                     then (randomNumber != 0)
116116                     else false)
117117                     then (betAmount * 2)
118118                     else 0
119119                 else if ((betDirection == "even"))
120120                     then if (if (((randomNumber % 2) == 0))
121121                         then (randomNumber != 0)
122122                         else false)
123123                         then (betAmount * 2)
124124                         else 0
125125                     else if (if ((size(selectedNumberBets) == 1))
126126                         then (betDirection == "num")
127127                         else false)
128128                         then if ((selectedNumberBets[0] == randomNumber))
129129                             then (betAmount * 36)
130130                             else 0
131131                         else if ((size(selectedNumberBets) == 2))
132132                             then if (containsElement(selectedNumberBets, randomNumber))
133133                                 then (betAmount * 18)
134134                                 else 0
135135                             else if ((size(selectedNumberBets) == 3))
136136                                 then if (containsElement(selectedNumberBets, randomNumber))
137137                                     then (betAmount * 12)
138138                                     else 0
139139                                 else if ((size(selectedNumberBets) == 4))
140140                                     then if (containsElement(selectedNumberBets, randomNumber))
141141                                         then (betAmount * 9)
142142                                         else 0
143143                                     else if ((size(selectedNumberBets) == 12))
144144                                         then if (if (containsElement(selectedNumberBets, randomNumber))
145145                                             then (randomNumber != 0)
146146                                             else false)
147147                                             then (betAmount * 3)
148148                                             else 0
149149                                         else if ((size(selectedNumberBets) == 18))
150150                                             then if (if (containsElement(selectedNumberBets, randomNumber))
151151                                                 then (randomNumber != 0)
152152                                                 else false)
153153                                                 then (betAmount * 2)
154154                                                 else 0
155155                                             else 0
156156     }
157157 
158158 
159159 func R_getBetKey (i) = ("bet_Roulette_" + toString(i.caller))
160160 
161161 
162162 func R_getBetAmountKey (i) = ("betAmount_Roulette_" + toString(i.caller))
163163 
164164 
165165 func R_getSelectedNumbersKey (i) = ("selectedNumbers_Roulette_" + toString(i.caller))
166166 
167167 
168168 func R_getDirectionKey (i) = ("direction_Roulette_" + toString(i.caller))
169169 
170170 
171171 func R_getLogKey (i) = ((("log_Roulette_" + toString(i.caller)) + "_") + toBase58String(i.transactionId))
172172 
173173 
174174 func R_getStatusKey (i) = ("status_Roulette_" + toString(i.caller))
175175 
176176 
177177 func LW_getBetKey (i) = ("bet_LuckyWheel_" + toString(i.caller))
178178 
179179 
180180 func LW_getWonKey (i) = ("won_LuckyWheel_" + toString(i.caller))
181181 
182182 
183183 func LW_getRandomNumberKey (i) = ("randomNumber_LuckyWheel_" + toString(i.caller))
184184 
185185 
186186 func LW_getLogKey (i) = ((("log_LuckyWheel_" + toString(i.caller)) + "_") + toBase58String(i.transactionId))
187187 
188188 
189189 func LW_whatUserWon (value) = match value {
190190     case _ => 
191191         if ((1 == $match0))
192192             then numToWaves(2)
193193             else if ((3 == $match0))
194194                 then numToWaves(1)
195195                 else if ((7 == $match0))
196196                     then numToWaves(6)
197197                     else if ((9 == $match0))
198198                         then numToWaves(1)
199199                         else 0
200200 }
201201 
202202 
203203 func LW_getStatusKey (i) = ("status_Roulette_" + toString(i.caller))
204204 
205205 
206206 func SM_getBetKey (i) = ("bet_SM_" + toString(i.caller))
207207 
208208 
209209 func SM_getBetAmountKey (i) = ("betAmount_SM_" + toString(i.caller))
210210 
211211 
212212 func SM_getStatusKey (i) = ("status_SM_" + toString(i.caller))
213213 
214214 
215215 func getRandomSM (commitHeight) = {
216216     let randomHash = sha256((value(value(blockInfoByHeight(commitHeight)).vrf) + toBytes(commitHeight)))
217217     let hashInt = toInt(randomHash, 24)
218218     let randomNumber = (hashInt % 6)
219-    let randomHash2 = sha256((value(value(blockInfoByHeight((commitHeight - (randomNumber * 3000)))).vrf) + toBytes(commitHeight)))
219+    let randomHash2 = sha256((value(value(blockInfoByHeight((commitHeight - (randomNumber * 3000)))).vrf) + toBytes(randomNumber)))
220220     let hashInt2 = toInt(randomHash2, 24)
221221     let randomNumber2 = (hashInt2 % 6)
222-    let randomHash3 = sha256((value(value(blockInfoByHeight((commitHeight - (randomNumber2 * 1100)))).vrf) + toBytes(commitHeight)))
222+    let randomHash3 = sha256((value(value(blockInfoByHeight((commitHeight - (randomNumber2 * 1100)))).vrf) + toBytes(randomNumber2)))
223223     let hashInt3 = toInt(randomHash3, 24)
224224     let randomNumber3 = (hashInt3 % 6)
225225 [randomNumber, randomNumber2, randomNumber3]
226226     }
227227 
228228 
229229 @Callable(i)
230230 func SlotMachine_commit (betAmount) = {
231231     let p = i.payments[0]
232232     if (!(isPaymentOk(i, betAmount)))
233233         then throw("Wrong payment amount or asset!")
234234         else [IntegerEntry(SM_getBetKey(i), (height + 1)), IntegerEntry(SM_getBetAmountKey(i), betAmount), StringEntry(SM_getStatusKey(i), ((("| status: commit | revealBlock: " + toString((height + 1))) + " | betAmount: ") + toString(betAmount)))]
235235     }
236236 
237237 
238238 
239239 @Callable(i)
240240 func SlotMachine_reveal () = {
241241     let commitHeight = valueOrErrorMessage(getIntegerValue(SM_getBetKey(i)), "Bet not found")
242242     let betAmount = valueOrErrorMessage(getIntegerValue(SM_getBetAmountKey(i)), "Bet amount not found")
243243     if ((commitHeight > height))
244244         then throw((("Wait " + toString((commitHeight - height))) + " blocks to reveal this id"))
245245         else {
246246             let randomNumber = getRandomSM(commitHeight)
247247             throw(((((toString(randomNumber[0]) + "|") + toString(randomNumber[1])) + "|") + toString(randomNumber[2])))
248248             }
249249     }
250250 
251251 
github/deemru/w8io/169f3d6 
42.77 ms ◑