tx · 4piAUSAxDixK9c1R6cVFgnGG4DxGmPAPHcoNAjrxRcRz

3PRAEZqBjrUDaDvv45HGWPb94DhD6UuZfWg:  -0.00700000 Waves

2023.09.20 13:19 [3829369] smart account 3PRAEZqBjrUDaDvv45HGWPb94DhD6UuZfWg > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4piAUSAxDixK9c1R6cVFgnGG4DxGmPAPHcoNAjrxRcRz",
    "fee": 700000,
    "feeAssetId": null,
    "timestamp": 1695205214167,
    "version": 1,
    "sender": "3PRAEZqBjrUDaDvv45HGWPb94DhD6UuZfWg",
    "senderPublicKey": "DWfBoSph5SQ9fuKvBjSecymWnfmRnBFh9FYg2QEV6bwS",
    "proofs": [
        "5BMkdkceVZFfz8EWyzG4fJvJjotJmCG9nQxAmoFYEAc2cH2JJCieDcKKk8DqfAMzQwTyTi1tgKWbCGJ3MGfiqNRH"
    ],
    "script": "base64:BgIXCAISBAoCCAESBgoECAEBBBIDCgEIEgAXABJjb25maWdBZGRyZXNzU3RvcmUCBmNvbmZpZwANY29uZmlnQWRkcmVzcwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBRJjb25maWdBZGRyZXNzU3RvcmUCH2NoaWxkOiBjb25maWcgYWRkcmVzcyBub3QgZm91bmQCFmludmFsaWQgY29uZmlnIGFkZHJlc3MABkhFSUdIVAUGaGVpZ2h0AQ5vcEFsbG93ZWRTdG9yZQECb3AJAKwCAgkArAICAgNvcF8FAm9wAghfYWxsb3dlZAANdm90aW5nUmVzdWx0cwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQ1jb25maWdBZGRyZXNzAhZjb250cmFjdF92b3RpbmdfcmVzdWx0AhlubyBjb250cmFjdF92b3RpbmdfcmVzdWx0Ah5pbnZhbGlkIGNvbnRyYWN0X3ZvdGluZ19yZXN1bHQBFXdhdmVsZXRzUGVyQmxvY2tTdG9yZQEHYWRkcmVzcwkArAICBQdhZGRyZXNzAhNfd2F2ZWxldHNfcGVyX2Jsb2NrARBzdGFydEhlaWdodFN0b3JlAQdhZGRyZXNzCQCsAgIFB2FkZHJlc3MCDV9zdGFydF9oZWlnaHQBDGNsYWltZWRTdG9yZQEHYWRkcmVzcwkArAICBQdhZGRyZXNzAhB3YXZlbGV0c19jbGFpbWVkAQ9jbGFpbWVkVVNEU3RvcmUBB2FkZHJlc3MJAKwCAgUHYWRkcmVzcwIRX3VzZHRsZXRzX2NsYWltZWQBEW1heENsYWltYWJsZVN0b3JlAQdhZGRyZXNzCQCsAgIFB2FkZHJlc3MCDl9tYXhfY2xhaW1hYmxlARZtYXhDbGFpbWFibGVJc1VTRFN0b3JlAQdhZGRyZXNzCQCsAgIFB2FkZHJlc3MCFV9tYXhfY2xhaW1hYmxlX2lzX3VzZAAIc3VtU3RvcmUCFndhdmVsZXRzX3Blcl9ibG9ja19zdW0ACG1heFN0b3JlAhZ3YXZlbGV0c19wZXJfYmxvY2tfbWF4AAdtYXhpbXVtCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMCFndhdmVsZXRzX3Blcl9ibG9ja19tYXgAsNDJWgAGb3JhY2xlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkBC3ZhbHVlT3JFbHNlAgkAoggBAgZvcmFjbGUCIzNQS2tvaktkZDZCQnpUZjFSWGJRVmZVRHJhTkZYWEhLelFGAhZpbnZhbGlkIG9yYWNsZSBhZGRyZXNzAA53YXZlUHJpY2VTdG9yZQkBC3ZhbHVlT3JFbHNlAgkAoggBAg53YXZlLXByaWNlLWtleQIXJXMlc19fcHJpY2VfX1dBVkVTLVVTRFQACXdhdmVQcmljZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFBm9yYWNsZQUOd2F2ZVByaWNlU3RvcmUCIFdBVkVTIHByaWNlIGlzIG5vdCBpbiB0aGUgT3JhY2xlAAdkaWdpdHM4AIDC1y8BCndhdmVzVG9VU0QBBXdhdmVzCQBrAwUFd2F2ZXMFCXdhdmVQcmljZQUHZGlnaXRzOAEKdXNkVG9XYXZlcwEFd2F2ZXMJAGsDBQV3YXZlcwUHZGlnaXRzOAUJd2F2ZVByaWNlAAZvbGRTdW0JAQt2YWx1ZU9yRWxzZQIJAJ8IAQUIc3VtU3RvcmUAAAEMYXZhaWxhYmxlTm93AQJ0bwQIcGVyQmxvY2sJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBFXdhdmVsZXRzUGVyQmxvY2tTdG9yZQEFAnRvAAAEBXRvdGFsAwkAAAIFCHBlckJsb2NrAAAAAAQKZmlyc3RCbG9jawkBBXZhbHVlAQkAnwgBCQEQc3RhcnRIZWlnaHRTdG9yZQEFAnRvBAZibG9ja3MJAGUCBQZIRUlHSFQFCmZpcnN0QmxvY2sJAGgCBQhwZXJCbG9jawUGYmxvY2tzBAxjbGFpbWVkV0FWRVMJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBDGNsYWltZWRTdG9yZQEFAnRvAAAECXJlc3RXYXZlcwkAZQIFBXRvdGFsBQxjbGFpbWVkV0FWRVMEDG1heENsYWltYWJsZQkAnwgBCQERbWF4Q2xhaW1hYmxlU3RvcmUBBQJ0bwMJAQlpc0RlZmluZWQBBQxtYXhDbGFpbWFibGUEEW1heENsYWltYWJsZVZhbHVlCQEFdmFsdWUBBQxtYXhDbGFpbWFibGUDCQELdmFsdWVPckVsc2UCCQCgCAEJARZtYXhDbGFpbWFibGVJc1VTRFN0b3JlAQUCdG8HBApjbGFpbWVkVVNECQELdmFsdWVPckVsc2UCCQCfCAEJAQ9jbGFpbWVkVVNEU3RvcmUBBQJ0bwkBCndhdmVzVG9VU0QBBQxjbGFpbWVkV0FWRVMEB3Jlc3RVU0QJAGUCBRFtYXhDbGFpbWFibGVWYWx1ZQUKY2xhaW1lZFVTRAQOcmVzdFVzZEluV2F2ZXMJAQp1c2RUb1dhdmVzAQUHcmVzdFVTRAkAlwMBCQDMCAIFDnJlc3RVc2RJbldhdmVzCQDMCAIFCXJlc3RXYXZlcwUDbmlsBAVncmFudAkAlwMBCQDMCAIFBXRvdGFsCQDMCAIFEW1heENsYWltYWJsZVZhbHVlBQNuaWwJAGUCBQVncmFudAUMY2xhaW1lZFdBVkVTBQlyZXN0V2F2ZXMBE3NldFNjaGVkdWxlSW50ZXJuYWwFAnRvEHdhdmVsZXRzUGVyQmxvY2sMbWF4Q2xhaW1hYmxlEWlzTWF4Q2xhaW1hYmxlVVNEA3N1bQQDYWRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQUCdG8JAKwCAgIRaW52YWxpZCBhZGRyZXNzOiAFAnRvAwkAAAIFA2FkcgUDYWRyAwkAZgIAAAUQd2F2ZWxldHNQZXJCbG9jawkAAgECH3dhdmVsZXRzUGVyQmxvY2sgc2hvdWxkIGJlID49IDADAwURaXNNYXhDbGFpbWFibGVVU0QJAGYCAJBOBRB3YXZlbGV0c1BlckJsb2NrBwkAAgECNDEwMDAwIHdhdmVsZXRzIGlzIGEgbWluaW11biB0byB1c2Ugd2l0aGluIFVTRCBsaW1pdHMDAwURaXNNYXhDbGFpbWFibGVVU0QJAGYCAMCEPQUMbWF4Q2xhaW1hYmxlBwkAAgECLlVTRCBsaW1pdHMgc2hvdWxkIHN0YXJ0cyBmcm9tIDEwMDAwMDAgdXNkdGxldHMEDXBlckJsb2NrU3RvcmUJARV3YXZlbGV0c1BlckJsb2NrU3RvcmUBBQJ0bwQLb2xkUGVyQmxvY2sJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUNcGVyQmxvY2tTdG9yZQAABAZuZXdTdW0JAGQCCQBlAgUDc3VtBQtvbGRQZXJCbG9jawUQd2F2ZWxldHNQZXJCbG9jawQMaGVpZ2h0U3RvcmUxCQEQc3RhcnRIZWlnaHRTdG9yZQEFAnRvBAdjbGFpbWVkCQEMY2xhaW1lZFN0b3JlAQUCdG8DCQBmAgUGbmV3U3VtBQdtYXhpbXVtCQACAQIQbWF4aW11bSBleGNlZWRlZAQSbWF4Q2xhaW1hYmxlU3RvcmUxCQERbWF4Q2xhaW1hYmxlU3RvcmUBBQJ0bwQXbWF4Q2xhaW1hYmxlSXNVU0RTdG9yZTEJARZtYXhDbGFpbWFibGVJc1VTRFN0b3JlAQUCdG8EEW1heENsYWltYWJsZUVudHJ5AwkAAAIFDG1heENsYWltYWJsZQAABQNuaWwDCQBmAgAABQxtYXhDbGFpbWFibGUJAMwIAgkBC0RlbGV0ZUVudHJ5AQUSbWF4Q2xhaW1hYmxlU3RvcmUxCQDMCAIJAQtEZWxldGVFbnRyeQEFF21heENsYWltYWJsZUlzVVNEU3RvcmUxBQNuaWwJAMwIAgkBDEludGVnZXJFbnRyeQIFEm1heENsYWltYWJsZVN0b3JlMQUMbWF4Q2xhaW1hYmxlCQDMCAIJAQxCb29sZWFuRW50cnkCBRdtYXhDbGFpbWFibGVJc1VTRFN0b3JlMQURaXNNYXhDbGFpbWFibGVVU0QFA25pbAQRYXZhaWxhYmxlTm93V2F2ZXMJAQxhdmFpbGFibGVOb3cBBQJ0bwkAlAoCCQDOCAIJAMwIAgkBDEludGVnZXJFbnRyeQIFDXBlckJsb2NrU3RvcmUFEHdhdmVsZXRzUGVyQmxvY2sJAMwIAgkBDEludGVnZXJFbnRyeQIFDGhlaWdodFN0b3JlMQUGSEVJR0hUCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQdjbGFpbWVkCQEBLQEFEWF2YWlsYWJsZU5vd1dhdmVzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEPY2xhaW1lZFVTRFN0b3JlAQUCdG8JAQEtAQkBCndhdmVzVG9VU0QBBRFhdmFpbGFibGVOb3dXYXZlcwkAzAgCCQEMSW50ZWdlckVudHJ5AgUIc3VtU3RvcmUFBm5ld1N1bQUDbmlsBRFtYXhDbGFpbWFibGVFbnRyeQUGbmV3U3VtCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAFpAQpzZXRTY2VkdWxlAgJ0bxB3YXZlbGV0c1BlckJsb2NrAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIGZGVuaWVkCQETc2V0U2NoZWR1bGVJbnRlcm5hbAUFAnRvBRB3YXZlbGV0c1BlckJsb2NrAAAHBQZvbGRTdW0BaQELc2V0U2NoZWR1bGUEAnRvEHdhdmVsZXRzUGVyQmxvY2sMbWF4Q2xhaW1hYmxlEWlzTWF4Q2xhaW1hYmxlVVNEAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIGZGVuaWVkCQETc2V0U2NoZWR1bGVJbnRlcm5hbAUFAnRvBRB3YXZlbGV0c1BlckJsb2NrBQxtYXhDbGFpbWFibGUFEWlzTWF4Q2xhaW1hYmxlVVNEBQZvbGRTdW0BaQEQc2V0TXVsdGlTY2hlZHVsZQEJc2NoZWR1bGVzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIGZGVuaWVkCgEEZm9sZAIDYWNjCHNjaGVkdWxlAwkAAAIFCHNjaGVkdWxlAgAJAAIBAhFpbnZhbGlkIHNjaGVkdWxlcwQFcGFydHMJALUJAgUIc2NoZWR1bGUCAT0DCQECIT0CCQCQAwEFBXBhcnRzAAIJAAIBAippbnZhbGlkIGZvcm1hdDogYWRyPXdhdmVsZXRzUGVyQmxvY2tbLG1heF0EAnRvCQCRAwIFBXBhcnRzAAAEDWJsb2NrTWF4UGFydHMJALUJAgkAkQMCBQVwYXJ0cwABAgEsBAh3YXZlbGV0cwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQC2CQEJAJEDAgUNYmxvY2tNYXhQYXJ0cwAACQCsAgICGWludmFsaWQgd2F2ZXRldHMgbnVtYmVyOiAJAJEDAgUNYmxvY2tNYXhQYXJ0cwAABAskdDA1NTgwNTk0NgMJAAACCQCQAwEFDWJsb2NrTWF4UGFydHMAAgQNbWF4QW5kVXNkUGFydAkAtQkCCQCRAwIFDWJsb2NrTWF4UGFydHMAAQIBJAkAlAoCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJALYJAQkAkQMCBQ1tYXhBbmRVc2RQYXJ0AAAJAKwCAgIUaW52YWxpZCBtYXggbnVtYmVyOiAJAJEDAgUNbWF4QW5kVXNkUGFydAAACQAAAgkAkAMBBQ1tYXhBbmRVc2RQYXJ0AAIJAJQKAgAABwQMbWF4Q2xhaW1hYmxlCAULJHQwNTU4MDU5NDYCXzEEEWlzTWF4Q2xhaW1hYmxlVVNECAULJHQwNTU4MDU5NDYCXzIECyR0MDU5NjQ1OTk2BQNhY2MEBGNtZHMIBQskdDA1OTY0NTk5NgJfMQQDc3VtCAULJHQwNTk2NDU5OTYCXzIECWFkZHJlc3NlcwgFCyR0MDU5NjQ1OTk2Al8zAwkBCWlzRGVmaW5lZAEJAM8IAgUJYWRkcmVzc2VzBQJ0bwkAAgEJAKwCAgILZHVibGljYXRlOiAFAnRvBAskdDA2MDg3NjE4MgkBE3NldFNjaGVkdWxlSW50ZXJuYWwFBQJ0bwUId2F2ZWxldHMFDG1heENsYWltYWJsZQURaXNNYXhDbGFpbWFibGVVU0QFA3N1bQQHbmV3Q21kcwgFCyR0MDYwODc2MTgyAl8xBAZuZXdTdW0IBQskdDA2MDg3NjE4MgJfMgkAlQoDCQDOCAIFBGNtZHMFB25ld0NtZHMFBm5ld1N1bQkAzggCBQlhZGRyZXNzZXMJAMwIAgUCdG8FA25pbAQLJHQwNjI0NzYzMjMKAAIkbAkAtQkCBQlzY2hlZHVsZXMCAXwKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCVCgMFA25pbAUGb2xkU3VtBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBBGZvbGQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDIwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAQEY21kcwgFCyR0MDYyNDc2MzIzAl8xBANzdW0IBQskdDA2MjQ3NjMyMwJfMgQCeF8IBQskdDA2MjQ3NjMyMwJfMwkAlAoCBQRjbWRzBQNzdW0BaQEFQ2xhaW0ABAV0b0FkcggFAWkGY2FsbGVyBAJ0bwkApQgBBQV0b0FkcgQBYQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEJARV3YXZlbGV0c1BlckJsb2NrU3RvcmUBBQJ0bwIRYWRkcmVzcyBub3QgZm91bmQDCQAAAgUBYQUBYQQGYW1vdW50CQEMYXZhaWxhYmxlTm93AQUCdG8EB3BheW1lbnQJAJcDAQkAzAgCCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkAzAgCBQZhbW91bnQFA25pbAMJAGcCAAAFB3BheW1lbnQJAAIBAhBub3RoaW5nIHRvIGNsYWltBA1jbGFpbWVkU3RvcmUxCQEMY2xhaW1lZFN0b3JlAQUCdG8EB2NsYWltZWQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUNY2xhaW1lZFN0b3JlMQAABBBjbGFpbWVkVVNEU3RvcmUxCQEPY2xhaW1lZFVTRFN0b3JlAQUCdG8ECmNsYWltZWRVU0QJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUQY2xhaW1lZFVTRFN0b3JlMQkBCndhdmVzVG9VU0QBBQdjbGFpbWVkBApwYXltZW50VVNECQEKd2F2ZXNUb1VTRAEFB3BheW1lbnQDAwkBC3ZhbHVlT3JFbHNlAgkAoAgBCQEWbWF4Q2xhaW1hYmxlSXNVU0RTdG9yZQEFAnRvBwkAZgIAHgUKcGF5bWVudFVTRAcJAAIBAhR1c2QgYW1vdW50IHRvbyBzbWFsbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQV0b0FkcgUHcGF5bWVudAUEdW5pdAkAzAgCCQEMSW50ZWdlckVudHJ5AgUNY2xhaW1lZFN0b3JlMQkAZAIFB2NsYWltZWQFB3BheW1lbnQJAMwIAgkBDEludGVnZXJFbnRyeQIFEGNsYWltZWRVU0RTdG9yZTEJAGQCBQpjbGFpbWVkVVNEBQpwYXltZW50VVNEBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkABAhieVZvdGluZwQHZW5hYmxlZAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ1jb25maWdBZGRyZXNzCQEOb3BBbGxvd2VkU3RvcmUBAhljaGlsZF9nb3Zlcm5hbmNlX2FwcGx5X3R4BgMJAQEhAQUHZW5hYmxlZAkAAgECK3R4IGFwcGxpY2F0aW9uIHRocm93IGdvdmVybmFuY2Ugbm90IGVuYWJsZWQJAGcCBQZoZWlnaHQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFDXZvdGluZ1Jlc3VsdHMJAKwCAgkArAICCQCsAgICGXByb3Bvc2FsX2FsbG93X2Jyb2FkY2FzdF8JAKUIAQUEdGhpcwIBXwkA2AQBCAUCdHgCaWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5BgUIYnlWb3RpbmeXdV2e",
    "chainId": 87,
    "height": 3829369,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: EM3pbjaJU4kPMXeUv4W4nKEtKgY2KcrLgw1u4YgDaWwi
Next: 5xmAWeALcZEyvbiL63ebeKoHCgVBWBsjqk4C3LTK9anH

Diff: 
Old
New
Differences
21
21
 
func claimedStore (address) = (address + "wavelets_claimed")
22
22
 
23
23
 
24
-
func claimedUSDStore (address) = (address + "_wavelets_claimed_usd")
24
+
func claimedUSDStore (address) = (address + "_usdtlets_claimed")
25
25
 
26
26
 
27
-
func maxClaimableStore (address) = (address + "_wavelets_max_claimable")
27
+
func maxClaimableStore (address) = (address + "_max_claimable")
28
28
 
29
29
 
30
-
func maxClaimableIsUSDStore (address) = (address + "_wavelets_max_claimable_is_usd")
30
+
func maxClaimableIsUSDStore (address) = (address + "_max_claimable_is_usd")
31
31
 
32
32
 
33
33
 
let sumStore = "wavelets_per_block_sum"
58
58
 
        then 0
59
59
 
        else {
60
60
 
            let firstBlock = value(getInteger(startHeightStore(to)))
61
-
            let blocks = (height - firstBlock)
61
+
            let blocks = (HEIGHT - firstBlock)
62
62
 
            (perBlock * blocks)
63
63
 
            }
64
64
 
    let claimedWAVES = valueOrElse(getInteger(claimedStore(to)), 0)
92
92
 
                then (10000 > waveletsPerBlock)
93
93
 
                else false)
94
94
 
                then throw("10000 wavelets is a minimun to use within USD limits")
95
-
                else {
96
-
                    let perBlockStore = waveletsPerBlockStore(to)
97
-
                    let oldPerBlock = valueOrElse(getInteger(perBlockStore), 0)
98
-
                    let newSum = ((sum - oldPerBlock) + waveletsPerBlock)
99
-
                    let heightStore1 = startHeightStore(to)
100
-
                    let claimed = claimedStore(to)
101
-
                    if ((newSum > maximum))
102
-
                        then throw("maximum exceeded")
103
-
                        else {
104
-
                            let maxClaimableStore1 = maxClaimableStore(to)
105
-
                            let maxClaimableIsUSDStore1 = maxClaimableIsUSDStore(to)
106
-
                            let maxClaimableEntry = if ((maxClaimable == 0))
107
-
                                then nil
108
-
                                else if ((0 > maxClaimable))
109
-
                                    then [DeleteEntry(maxClaimableStore1), DeleteEntry(maxClaimableIsUSDStore1)]
110
-
                                    else [IntegerEntry(maxClaimableStore1, maxClaimable), BooleanEntry(maxClaimableIsUSDStore1, isMaxClaimableUSD)]
111
-
                            $Tuple2(([IntegerEntry(perBlockStore, waveletsPerBlock), IntegerEntry(heightStore1, height), IntegerEntry(claimed, -(availableNow(to))), IntegerEntry(sumStore, newSum)] ++ maxClaimableEntry), newSum)
112
-
                            }
113
-
                    }
95
+
                else if (if (isMaxClaimableUSD)
96
+
                    then (1000000 > maxClaimable)
97
+
                    else false)
98
+
                    then throw("USD limits should starts from 1000000 usdtlets")
99
+
                    else {
100
+
                        let perBlockStore = waveletsPerBlockStore(to)
101
+
                        let oldPerBlock = valueOrElse(getInteger(perBlockStore), 0)
102
+
                        let newSum = ((sum - oldPerBlock) + waveletsPerBlock)
103
+
                        let heightStore1 = startHeightStore(to)
104
+
                        let claimed = claimedStore(to)
105
+
                        if ((newSum > maximum))
106
+
                            then throw("maximum exceeded")
107
+
                            else {
108
+
                                let maxClaimableStore1 = maxClaimableStore(to)
109
+
                                let maxClaimableIsUSDStore1 = maxClaimableIsUSDStore(to)
110
+
                                let maxClaimableEntry = if ((maxClaimable == 0))
111
+
                                    then nil
112
+
                                    else if ((0 > maxClaimable))
113
+
                                        then [DeleteEntry(maxClaimableStore1), DeleteEntry(maxClaimableIsUSDStore1)]
114
+
                                        else [IntegerEntry(maxClaimableStore1, maxClaimable), BooleanEntry(maxClaimableIsUSDStore1, isMaxClaimableUSD)]
115
+
                                let availableNowWaves = availableNow(to)
116
+
                                $Tuple2(([IntegerEntry(perBlockStore, waveletsPerBlock), IntegerEntry(heightStore1, HEIGHT), IntegerEntry(claimed, -(availableNowWaves)), IntegerEntry(claimedUSDStore(to), -(wavesToUSD(availableNowWaves))), IntegerEntry(sumStore, newSum)] ++ maxClaimableEntry), newSum)
117
+
                                }
118
+
                        }
114
119
 
        else throw("Strict value is not equal to itself.")
115
120
 
    }
116
121
 
143
148
 
                        let to = parts[0]
144
149
 
                        let blockMaxParts = split(parts[1], ",")
145
150
 
                        let wavelets = valueOrErrorMessage(parseInt(blockMaxParts[0]), ("invalid wavetets number: " + blockMaxParts[0]))
146
-
                        let $t053645730 = if ((size(blockMaxParts) == 2))
151
+
                        let $t055805946 = if ((size(blockMaxParts) == 2))
147
152
 
                            then {
148
153
 
                                let maxAndUsdPart = split(blockMaxParts[1], "$")
149
154
 
                                $Tuple2(valueOrErrorMessage(parseInt(maxAndUsdPart[0]), ("invalid max number: " + maxAndUsdPart[0])), (size(maxAndUsdPart) == 2))
150
155
 
                                }
151
156
 
                            else $Tuple2(0, false)
152
-
                        let maxClaimable = $t053645730._1
153
-
                        let isMaxClaimableUSD = $t053645730._2
154
-
                        let $t057485780 = acc
155
-
                        let cmds = $t057485780._1
156
-
                        let sum = $t057485780._2
157
-
                        let addresses = $t057485780._3
157
+
                        let maxClaimable = $t055805946._1
158
+
                        let isMaxClaimableUSD = $t055805946._2
159
+
                        let $t059645996 = acc
160
+
                        let cmds = $t059645996._1
161
+
                        let sum = $t059645996._2
162
+
                        let addresses = $t059645996._3
158
163
 
                        if (isDefined(indexOf(addresses, to)))
159
164
 
                            then throw(("dublicate: " + to))
160
165
 
                            else {
161
-
                                let $t058715966 = setScheduleInternal(to, wavelets, maxClaimable, isMaxClaimableUSD, sum)
162
-
                                let newCmds = $t058715966._1
163
-
                                let newSum = $t058715966._2
166
+
                                let $t060876182 = setScheduleInternal(to, wavelets, maxClaimable, isMaxClaimableUSD, sum)
167
+
                                let newCmds = $t060876182._1
168
+
                                let newSum = $t060876182._2
164
169
 
                                $Tuple3((cmds ++ newCmds), newSum, (addresses ++ [to]))
165
170
 
                                }
166
171
 
                        }
167
172
 
                }
168
173
 
169
-
        let $t060316107 = {
174
+
        let $t062476323 = {
170
175
 
            let $l = split(schedules, "|")
171
176
 
            let $s = size($l)
172
177
 
            let $acc0 = $Tuple3(nil, oldSum, nil)
180
185
 
181
186
 
            $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($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
182
187
 
            }
183
-
        let cmds = $t060316107._1
184
-
        let sum = $t060316107._2
185
-
        let x_ = $t060316107._3
188
+
        let cmds = $t062476323._1
189
+
        let sum = $t062476323._2
190
+
        let x_ = $t062476323._3
186
191
 
        $Tuple2(cmds, sum)
187
192
 
        }
188
193
 
205
210
 
                    let claimedUSDStore1 = claimedUSDStore(to)
206
211
 
                    let claimedUSD = valueOrElse(getInteger(claimedUSDStore1), wavesToUSD(claimed))
207
212
 
                    let paymentUSD = wavesToUSD(payment)
208
-
[ScriptTransfer(toAdr, payment, unit), IntegerEntry(claimedStore1, (claimed + payment)), IntegerEntry(claimedUSDStore1, (claimedUSD + paymentUSD))]
213
+
                    if (if (valueOrElse(getBoolean(maxClaimableIsUSDStore(to)), false))
214
+
                        then (30 > paymentUSD)
215
+
                        else false)
216
+
                        then throw("usd amount too small")
217
+
                        else [ScriptTransfer(toAdr, payment, unit), IntegerEntry(claimedStore1, (claimed + payment)), IntegerEntry(claimedUSDStore1, (claimedUSD + paymentUSD))]
209
218
 
                    }
210
219
 
            }
211
220
 
        else throw("Strict value is not equal to itself.")
212
221
 
    }
213
222
 
214
223
 
224
+
@Verifier(tx)
225
+
func verify () = {
226
+
    let byVoting = {
227
+
        let enabled = valueOrElse(getBoolean(configAddress, opAllowedStore("child_governance_apply_tx")), true)
228
+
        if (!(enabled))
229
+
            then throw("tx application throw governance not enabled")
230
+
            else (height >= getIntegerValue(votingResults, ((("proposal_allow_broadcast_" + toString(this)) + "_") + toBase58String(tx.id))))
231
+
        }
232
+
    if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
233
+
        then true
234
+
        else byVoting
235
+
    }
236
+

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let configAddressStore = "config"
5
5
 
6
6
 
let configAddress = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(this, configAddressStore), "child: config address not found")), "invalid config address")
7
7
 
8
8
 
let HEIGHT = height
9
9
 
10
10
 
func opAllowedStore (op) = (("op_" + op) + "_allowed")
11
11
 
12
12
 
13
13
 
let votingResults = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(configAddress, "contract_voting_result"), "no contract_voting_result")), "invalid contract_voting_result")
14
14
 
15
15
 
func waveletsPerBlockStore (address) = (address + "_wavelets_per_block")
16
16
 
17
17
 
18
18
 
func startHeightStore (address) = (address + "_start_height")
19
19
 
20
20
 
21
21
 
func claimedStore (address) = (address + "wavelets_claimed")
22
22
 
23
23
 
24
-
func claimedUSDStore (address) = (address + "_wavelets_claimed_usd")
24
+
func claimedUSDStore (address) = (address + "_usdtlets_claimed")
25
25
 
26
26
 
27
-
func maxClaimableStore (address) = (address + "_wavelets_max_claimable")
27
+
func maxClaimableStore (address) = (address + "_max_claimable")
28
28
 
29
29
 
30
-
func maxClaimableIsUSDStore (address) = (address + "_wavelets_max_claimable_is_usd")
30
+
func maxClaimableIsUSDStore (address) = (address + "_max_claimable_is_usd")
31
31
 
32
32
 
33
33
 
let sumStore = "wavelets_per_block_sum"
34
34
 
35
35
 
let maxStore = "wavelets_per_block_max"
36
36
 
37
37
 
let maximum = valueOrElse(getInteger(this, "wavelets_per_block_max"), 189950000)
38
38
 
39
39
 
let oracle = valueOrErrorMessage(addressFromString(valueOrElse(getString("oracle"), "3PKkojKdd6BBzTf1RXbQVfUDraNFXXHKzQF")), "invalid oracle address")
40
40
 
41
41
 
let wavePriceStore = valueOrElse(getString("wave-price-key"), "%s%s__price__WAVES-USDT")
42
42
 
43
43
 
let wavePrice = valueOrErrorMessage(getInteger(oracle, wavePriceStore), "WAVES price is not in the Oracle")
44
44
 
45
45
 
let digits8 = 100000000
46
46
 
47
47
 
func wavesToUSD (waves) = fraction(waves, wavePrice, digits8)
48
48
 
49
49
 
50
50
 
func usdToWaves (waves) = fraction(waves, digits8, wavePrice)
51
51
 
52
52
 
53
53
 
let oldSum = valueOrElse(getInteger(sumStore), 0)
54
54
 
55
55
 
func availableNow (to) = {
56
56
 
    let perBlock = valueOrElse(getInteger(waveletsPerBlockStore(to)), 0)
57
57
 
    let total = if ((perBlock == 0))
58
58
 
        then 0
59
59
 
        else {
60
60
 
            let firstBlock = value(getInteger(startHeightStore(to)))
61
-
            let blocks = (height - firstBlock)
61
+
            let blocks = (HEIGHT - firstBlock)
62
62
 
            (perBlock * blocks)
63
63
 
            }
64
64
 
    let claimedWAVES = valueOrElse(getInteger(claimedStore(to)), 0)
65
65
 
    let restWaves = (total - claimedWAVES)
66
66
 
    let maxClaimable = getInteger(maxClaimableStore(to))
67
67
 
    if (isDefined(maxClaimable))
68
68
 
        then {
69
69
 
            let maxClaimableValue = value(maxClaimable)
70
70
 
            if (valueOrElse(getBoolean(maxClaimableIsUSDStore(to)), false))
71
71
 
                then {
72
72
 
                    let claimedUSD = valueOrElse(getInteger(claimedUSDStore(to)), wavesToUSD(claimedWAVES))
73
73
 
                    let restUSD = (maxClaimableValue - claimedUSD)
74
74
 
                    let restUsdInWaves = usdToWaves(restUSD)
75
75
 
                    min([restUsdInWaves, restWaves])
76
76
 
                    }
77
77
 
                else {
78
78
 
                    let grant = min([total, maxClaimableValue])
79
79
 
                    (grant - claimedWAVES)
80
80
 
                    }
81
81
 
            }
82
82
 
        else restWaves
83
83
 
    }
84
84
 
85
85
 
86
86
 
func setScheduleInternal (to,waveletsPerBlock,maxClaimable,isMaxClaimableUSD,sum) = {
87
87
 
    let adr = valueOrErrorMessage(addressFromString(to), ("invalid address: " + to))
88
88
 
    if ((adr == adr))
89
89
 
        then if ((0 > waveletsPerBlock))
90
90
 
            then throw("waveletsPerBlock should be >= 0")
91
91
 
            else if (if (isMaxClaimableUSD)
92
92
 
                then (10000 > waveletsPerBlock)
93
93
 
                else false)
94
94
 
                then throw("10000 wavelets is a minimun to use within USD limits")
95
-
                else {
96
-
                    let perBlockStore = waveletsPerBlockStore(to)
97
-
                    let oldPerBlock = valueOrElse(getInteger(perBlockStore), 0)
98
-
                    let newSum = ((sum - oldPerBlock) + waveletsPerBlock)
99
-
                    let heightStore1 = startHeightStore(to)
100
-
                    let claimed = claimedStore(to)
101
-
                    if ((newSum > maximum))
102
-
                        then throw("maximum exceeded")
103
-
                        else {
104
-
                            let maxClaimableStore1 = maxClaimableStore(to)
105
-
                            let maxClaimableIsUSDStore1 = maxClaimableIsUSDStore(to)
106
-
                            let maxClaimableEntry = if ((maxClaimable == 0))
107
-
                                then nil
108
-
                                else if ((0 > maxClaimable))
109
-
                                    then [DeleteEntry(maxClaimableStore1), DeleteEntry(maxClaimableIsUSDStore1)]
110
-
                                    else [IntegerEntry(maxClaimableStore1, maxClaimable), BooleanEntry(maxClaimableIsUSDStore1, isMaxClaimableUSD)]
111
-
                            $Tuple2(([IntegerEntry(perBlockStore, waveletsPerBlock), IntegerEntry(heightStore1, height), IntegerEntry(claimed, -(availableNow(to))), IntegerEntry(sumStore, newSum)] ++ maxClaimableEntry), newSum)
112
-
                            }
113
-
                    }
95
+
                else if (if (isMaxClaimableUSD)
96
+
                    then (1000000 > maxClaimable)
97
+
                    else false)
98
+
                    then throw("USD limits should starts from 1000000 usdtlets")
99
+
                    else {
100
+
                        let perBlockStore = waveletsPerBlockStore(to)
101
+
                        let oldPerBlock = valueOrElse(getInteger(perBlockStore), 0)
102
+
                        let newSum = ((sum - oldPerBlock) + waveletsPerBlock)
103
+
                        let heightStore1 = startHeightStore(to)
104
+
                        let claimed = claimedStore(to)
105
+
                        if ((newSum > maximum))
106
+
                            then throw("maximum exceeded")
107
+
                            else {
108
+
                                let maxClaimableStore1 = maxClaimableStore(to)
109
+
                                let maxClaimableIsUSDStore1 = maxClaimableIsUSDStore(to)
110
+
                                let maxClaimableEntry = if ((maxClaimable == 0))
111
+
                                    then nil
112
+
                                    else if ((0 > maxClaimable))
113
+
                                        then [DeleteEntry(maxClaimableStore1), DeleteEntry(maxClaimableIsUSDStore1)]
114
+
                                        else [IntegerEntry(maxClaimableStore1, maxClaimable), BooleanEntry(maxClaimableIsUSDStore1, isMaxClaimableUSD)]
115
+
                                let availableNowWaves = availableNow(to)
116
+
                                $Tuple2(([IntegerEntry(perBlockStore, waveletsPerBlock), IntegerEntry(heightStore1, HEIGHT), IntegerEntry(claimed, -(availableNowWaves)), IntegerEntry(claimedUSDStore(to), -(wavesToUSD(availableNowWaves))), IntegerEntry(sumStore, newSum)] ++ maxClaimableEntry), newSum)
117
+
                                }
118
+
                        }
114
119
 
        else throw("Strict value is not equal to itself.")
115
120
 
    }
116
121
 
117
122
 
118
123
 
@Callable(i)
119
124
 
func setScedule (to,waveletsPerBlock) = if ((i.caller != this))
120
125
 
    then throw("denied")
121
126
 
    else setScheduleInternal(to, waveletsPerBlock, 0, false, oldSum)
122
127
 
123
128
 
124
129
 
125
130
 
@Callable(i)
126
131
 
func setSchedule (to,waveletsPerBlock,maxClaimable,isMaxClaimableUSD) = if ((i.caller != this))
127
132
 
    then throw("denied")
128
133
 
    else setScheduleInternal(to, waveletsPerBlock, maxClaimable, isMaxClaimableUSD, oldSum)
129
134
 
130
135
 
131
136
 
132
137
 
@Callable(i)
133
138
 
func setMultiSchedule (schedules) = if ((i.caller != this))
134
139
 
    then throw("denied")
135
140
 
    else {
136
141
 
        func fold (acc,schedule) =         if ((schedule == ""))
137
142
 
            then throw("invalid schedules")
138
143
 
            else {
139
144
 
                let parts = split(schedule, "=")
140
145
 
                if ((size(parts) != 2))
141
146
 
                    then throw("invalid format: adr=waveletsPerBlock[,max]")
142
147
 
                    else {
143
148
 
                        let to = parts[0]
144
149
 
                        let blockMaxParts = split(parts[1], ",")
145
150
 
                        let wavelets = valueOrErrorMessage(parseInt(blockMaxParts[0]), ("invalid wavetets number: " + blockMaxParts[0]))
146
-
                        let $t053645730 = if ((size(blockMaxParts) == 2))
151
+
                        let $t055805946 = if ((size(blockMaxParts) == 2))
147
152
 
                            then {
148
153
 
                                let maxAndUsdPart = split(blockMaxParts[1], "$")
149
154
 
                                $Tuple2(valueOrErrorMessage(parseInt(maxAndUsdPart[0]), ("invalid max number: " + maxAndUsdPart[0])), (size(maxAndUsdPart) == 2))
150
155
 
                                }
151
156
 
                            else $Tuple2(0, false)
152
-
                        let maxClaimable = $t053645730._1
153
-
                        let isMaxClaimableUSD = $t053645730._2
154
-
                        let $t057485780 = acc
155
-
                        let cmds = $t057485780._1
156
-
                        let sum = $t057485780._2
157
-
                        let addresses = $t057485780._3
157
+
                        let maxClaimable = $t055805946._1
158
+
                        let isMaxClaimableUSD = $t055805946._2
159
+
                        let $t059645996 = acc
160
+
                        let cmds = $t059645996._1
161
+
                        let sum = $t059645996._2
162
+
                        let addresses = $t059645996._3
158
163
 
                        if (isDefined(indexOf(addresses, to)))
159
164
 
                            then throw(("dublicate: " + to))
160
165
 
                            else {
161
-
                                let $t058715966 = setScheduleInternal(to, wavelets, maxClaimable, isMaxClaimableUSD, sum)
162
-
                                let newCmds = $t058715966._1
163
-
                                let newSum = $t058715966._2
166
+
                                let $t060876182 = setScheduleInternal(to, wavelets, maxClaimable, isMaxClaimableUSD, sum)
167
+
                                let newCmds = $t060876182._1
168
+
                                let newSum = $t060876182._2
164
169
 
                                $Tuple3((cmds ++ newCmds), newSum, (addresses ++ [to]))
165
170
 
                                }
166
171
 
                        }
167
172
 
                }
168
173
 
169
-
        let $t060316107 = {
174
+
        let $t062476323 = {
170
175
 
            let $l = split(schedules, "|")
171
176
 
            let $s = size($l)
172
177
 
            let $acc0 = $Tuple3(nil, oldSum, nil)
173
178
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
174
179
 
                then $a
175
180
 
                else fold($a, $l[$i])
176
181
 
177
182
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
178
183
 
                then $a
179
184
 
                else throw("List size exceeds 20")
180
185
 
181
186
 
            $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($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
182
187
 
            }
183
-
        let cmds = $t060316107._1
184
-
        let sum = $t060316107._2
185
-
        let x_ = $t060316107._3
188
+
        let cmds = $t062476323._1
189
+
        let sum = $t062476323._2
190
+
        let x_ = $t062476323._3
186
191
 
        $Tuple2(cmds, sum)
187
192
 
        }
188
193
 
189
194
 
190
195
 
191
196
 
@Callable(i)
192
197
 
func Claim () = {
193
198
 
    let toAdr = i.caller
194
199
 
    let to = toString(toAdr)
195
200
 
    let a = valueOrErrorMessage(getInteger(waveletsPerBlockStore(to)), "address not found")
196
201
 
    if ((a == a))
197
202
 
        then {
198
203
 
            let amount = availableNow(to)
199
204
 
            let payment = min([wavesBalance(this).available, amount])
200
205
 
            if ((0 >= payment))
201
206
 
                then throw("nothing to claim")
202
207
 
                else {
203
208
 
                    let claimedStore1 = claimedStore(to)
204
209
 
                    let claimed = valueOrElse(getInteger(claimedStore1), 0)
205
210
 
                    let claimedUSDStore1 = claimedUSDStore(to)
206
211
 
                    let claimedUSD = valueOrElse(getInteger(claimedUSDStore1), wavesToUSD(claimed))
207
212
 
                    let paymentUSD = wavesToUSD(payment)
208
-
[ScriptTransfer(toAdr, payment, unit), IntegerEntry(claimedStore1, (claimed + payment)), IntegerEntry(claimedUSDStore1, (claimedUSD + paymentUSD))]
213
+
                    if (if (valueOrElse(getBoolean(maxClaimableIsUSDStore(to)), false))
214
+
                        then (30 > paymentUSD)
215
+
                        else false)
216
+
                        then throw("usd amount too small")
217
+
                        else [ScriptTransfer(toAdr, payment, unit), IntegerEntry(claimedStore1, (claimed + payment)), IntegerEntry(claimedUSDStore1, (claimedUSD + paymentUSD))]
209
218
 
                    }
210
219
 
            }
211
220
 
        else throw("Strict value is not equal to itself.")
212
221
 
    }
213
222
 
214
223
 
224
+
@Verifier(tx)
225
+
func verify () = {
226
+
    let byVoting = {
227
+
        let enabled = valueOrElse(getBoolean(configAddress, opAllowedStore("child_governance_apply_tx")), true)
228
+
        if (!(enabled))
229
+
            then throw("tx application throw governance not enabled")
230
+
            else (height >= getIntegerValue(votingResults, ((("proposal_allow_broadcast_" + toString(this)) + "_") + toBase58String(tx.id))))
231
+
        }
232
+
    if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
233
+
        then true
234
+
        else byVoting
235
+
    }
236
+

github/deemru/w8io/3ef1775 
42.44 ms ◑