w8 · tx · B56···YRB

tx · B56Q5b5tqcDrqqzdP7Uot6VdMKg3SSzzjTaNpHEm7YRB

3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq:  -0.01000000 Waves

2023.07.25 16:16 [2681423] smart account 3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "B56Q5b5tqcDrqqzdP7Uot6VdMKg3SSzzjTaNpHEm7YRB",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1690291055483,
    "version": 2,
    "chainId": 84,
    "sender": "3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq",
    "senderPublicKey": "ERewvWFUFQfR1eCnipNAv9n7SdQhof2ESP6PGVjTueLd",
    "proofs": [
        "43DDEKkcceyuhx7Zp78gWywNjkfeu7bfTiqXuUSXhmQQzLpXWyrRUwvnzMFHkTG8oxhLWRZSNTPxrcMfYj92UTW3"
    ],
    "script": "base64:BgI0CAISBAoCAQgSABIAEgASABIAEgMKAQESAwoBARIDCgEBEgQKAggBEgASBAoCCAESAwoBCA0ACXdhdmVzMUxJZAkBB0FkZHJlc3MBASCx9eRWoz/T7on2QCucPEyACTagmHhap+TFH25bD+lGhQAJd2F2ZXMzTElkCQEHQWRkcmVzcwEBIHdXDDXqNpTfTtMV3HoBAJm7TRBH1wyKq1fh63GL4LhkAAl3YXZlczVMSWQJAQdBZGRyZXNzAQEgG0ZokmU5WBTQbm1EIuXU3iDl1u675ol+F8RLM/XoZqQAA2FycgkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwABGFycjIJAMwIAgABCQDMCAIAAgUDbmlsAARhcnIzCQDMCAIAAQkAzAgCAAIJAMwIAgADBQNuaWwBA3N1bQIBYQFiCQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNOM0RuVmZmblV5WnR6Mk1SYms1VTdnaU4xMTJXZW1wTU5kAgZib3Jyb3cJAMwIAgIsMjVGRXFFalJrcUs2eUNraVQ3THo2U0FZejdnVUZDdHhmQ0NobnJWRkQ1QVQJAMwIAgDAhD0FA25pbAUDbmlsAQpnZXRCYWxhbmNlAgphc3NldElkU3RyB2FkZHJlc3MDCQAAAgUKYXNzZXRJZFN0cgIFV0FWRVMICQDvBwEFB2FkZHJlc3MJYXZhaWxhYmxlCQDwBwIFB2FkZHJlc3MJANkEAQUKYXNzZXRJZFN0cgEPZ2V0Q3VycmVudFByaWNlAQphc3NldElkU3RyAwkAAAIFCmFzc2V0SWRTdHICBVdBVkVTAAIJAAIBAgVFcnJvcgEUZ2V0V2F2ZXNDdXJyZW50UHJpY2UAAICJegEWZ2V0V2F2ZXMxTEN1cnJlbnRQcmljZQAA4MZbARZnZXRXYXZlczNMQ3VycmVudFByaWNlAACAn0kBGXRyYW5zZmVyV2F2ZXNUZXN0SW50ZXJuYWwDCmFzc2V0SWRTdHILYXNzZXRBbW91bnQHYWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFB2FkZHJlc3MCC19kZXBvc2l0ZWRfBQphc3NldElkU3RyBQthc3NldEFtb3VudAUDbmlsDQFpAQ10cmFuc2ZlcldhdmVzAgthc3NldEFtb3VudA1zZW5kZXJBZGRyZXNzAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIsb25seSBmb3IgaW50ZXJuYWwgc21hcnQgY29udHJhY3QgaW52b2NhdGlvbnMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUEdGhpcwULYXNzZXRBbW91bnQFBHVuaXQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUNc2VuZGVyQWRkcmVzcwIQX2RlcG9zaXRlZF9XQVZFUwULYXNzZXRBbW91bnQFA25pbAFpAQtpc3N1ZTN4TG9uZwAJAMwIAgkAwggFAgdXQVZFUzNMAhdXQVZFU19VU0ROX0xPTkczWCBUb2tlbgCAlOvcAwAGBgUDbmlsAWkBEXRyYW5zZmVyV2F2ZXNUZXN0AAMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEGCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQAAAkAAgECHDEgcGF5bWVudCBoYXMgdG8gYmUgYXR0YWNoZWQECmFzc2V0SWRTdHICBVdBVkVTBAthc3NldEFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQJARl0cmFuc2ZlcldhdmVzVGVzdEludGVybmFsAwUKYXNzZXRJZFN0cgULYXNzZXRBbW91bnQJAKUIAQgFAWkGY2FsbGVyAWkBC21pbnRXYXZlczNMAAMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEGCQAAAggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQAAAkAAgECHDEgcGF5bWVudCBoYXMgdG8gYmUgYXR0YWNoZWQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBBBzdGFibGVDb2luQW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQUY29udmVydGVkV2F2ZXNBbW91bnQJAGgCCQBpAgUQc3RhYmxlQ29pbkFtb3VudAkBFGdldFdhdmVzQ3VycmVudFByaWNlAACAwtcvBA91c2VyV2F2ZXNBbW91bnQJAQpnZXRCYWxhbmNlAgIFV0FWRVMIBQFpBmNhbGxlcgMJAGYCBQ91c2VyV2F2ZXNBbW91bnQFFGNvbnZlcnRlZFdhdmVzQW1vdW50BA1kZXBvc2l0UmVzdWx0CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNOM0RuVmZmblV5WnR6Mk1SYms1VTdnaU4xMTJXZW1wTU5kAgZzdXBwbHkFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEdW5pdAUUY29udmVydGVkV2F2ZXNBbW91bnQFA25pbAMJAAACBQ1kZXBvc2l0UmVzdWx0BQ1kZXBvc2l0UmVzdWx0CgEKcmVwZWF0RnVuYwIFYWNjdW0EbmV4dAQMYm9ycm93UmVzdWx0CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNOM0RuVmZmblV5WnR6Mk1SYms1VTdnaU4xMTJXZW1wTU5kAgZib3Jyb3cJAMwIAgIsMjVGRXFFalJrcUs2eUNraVQ3THo2U0FZejdnVUZDdHhmQ0NobnJWRkQ1QVQJAMwIAgUQc3RhYmxlQ29pbkFtb3VudAUDbmlsBQNuaWwDCQAAAgUMYm9ycm93UmVzdWx0BQxib3Jyb3dSZXN1bHQJAGQCBQVhY2N1bQUEbmV4dAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQFYXJyYXkJAMwIAgUQc3RhYmxlQ29pbkFtb3VudAkAzAgCBRBzdGFibGVDb2luQW1vdW50CQDMCAIFEHN0YWJsZUNvaW5BbW91bnQFA25pbAQDcmVzCgACJGwFBWFycmF5CgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpyZXBlYXRGdW5jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyAzCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADBBNyZXR1cm5lZFRva2VuQW1vdW50CQBoAgkAaQIFA3JlcwkBFmdldFdhdmVzM0xDdXJyZW50UHJpY2UAAMCEPQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAgpfZ2F2ZV9VU0ROBRBzdGFibGVDb2luQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2FkZHJlc3MCEF9kZXBvc2l0ZWRfV0FWRVMFFGNvbnZlcnRlZFdhdmVzQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgUHYWRkcmVzcwIKX2JvcnJvd2VkXwIsMjVGRXFFalJrcUs2eUNraVQ3THo2U0FZejdnVUZDdHhmQ0NobnJWRkQ1QVQFA3JlcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAhFfcmVjZWl2ZWRfV0FWRVMzTAUTcmV0dXJuZWRUb2tlbkFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFE3JldHVybmVkVG9rZW5BbW91bnQBIHdXDDXqNpTfTtMV3HoBAJm7TRBH1wyKq1fh63GL4LhkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhxOb3QgZW5vdWdoIFdBVkVTIHRvIGRlcG9zaXQhAWkBEG1pbnRXYXZlczNMX3Rlc3QAAwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQYJAAACCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAAACQACAQIcMSBwYXltZW50IGhhcyB0byBiZSBhdHRhY2hlZAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEEHN0YWJsZUNvaW5BbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2FkZHJlc3MCCl9nYXZlX1VTRE4FEHN0YWJsZUNvaW5BbW91bnQFA25pbAFpAQlsb25nM3hfdjIAAwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQYJAAACCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAAACQACAQIcMSBwYXltZW50IGhhcyB0byBiZSBhdHRhY2hlZAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIECmFzc2V0SWRTdHICBVdBVkVTBAt3YXZlc0Ftb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEEmN1cnJlbnRXYXZlc0Ftb3VudAkBCmdldEJhbGFuY2UCBQphc3NldElkU3RyCAUBaQZjYWxsZXIDCQBmAgUSY3VycmVudFdhdmVzQW1vdW50BQt3YXZlc0Ftb3VudAQNZGVwb3NpdFJlc3VsdAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBHVuaXQFC3dhdmVzQW1vdW50BQNuaWwDCQAAAgUNZGVwb3NpdFJlc3VsdAUNZGVwb3NpdFJlc3VsdAoBCnJlcGVhdEZ1bmMCBWFjY3VtBG5leHQEDGJvcnJvd1Jlc3VsdAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAIGYm9ycm93CQDMCAICLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUCQDMCAIJAGkCCQBoAgULd2F2ZXNBbW91bnQJAQ9nZXRDdXJyZW50UHJpY2UBAgVXQVZFUwBkBQNuaWwFA25pbAMJAAACBQxib3Jyb3dSZXN1bHQFDGJvcnJvd1Jlc3VsdAkAZAIFBWFjY3VtBQRuZXh0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAVhcnJheQkAzAgCBQt3YXZlc0Ftb3VudAkAzAgCBQt3YXZlc0Ftb3VudAUDbmlsBANyZXMKAAIkbAUFYXJyYXkKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnJlcGVhdEZ1bmMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDMJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIQX2RlcG9zaXRlZF9XQVZFUwULd2F2ZXNBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICBQdhZGRyZXNzAgpfYm9ycm93ZWRfAiwyNUZFcUVqUmtxSzZ5Q2tpVDdMejZTQVl6N2dVRkN0eGZDQ2huclZGRDVBVAkAaAIFC3dhdmVzQW1vdW50CQEPZ2V0Q3VycmVudFByaWNlAQIFV0FWRVMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQBpAgkAaAIFA3JlcwkBD2dldEN1cnJlbnRQcmljZQECBVdBVkVTAGQBIA/yHBKs5MQ8muxGGqslqLDsugcrRsxtiHLwteKSSQG0BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhxOb3QgZW5vdWdoIFdBVkVTIHRvIGRlcG9zaXQhAWkBBmxvbmcyeAELYXNzZXRBbW91bnQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBA1jdXJyZW50QW1vdW50CQEKZ2V0QmFsYW5jZQICBVdBVkVTCAUBaQZjYWxsZXIDCQBmAgUNY3VycmVudEFtb3VudAULYXNzZXRBbW91bnQKAQpyZXBlYXRGdW5jAgVhY2N1bQRuZXh0BA50cmFuc2ZlclJlc3VsdAkA/AcEBQR0aGlzAg10cmFuc2ZlcldhdmVzCQDMCAIFC2Fzc2V0QW1vdW50CQDMCAIIBQFpBmNhbGxlcgUDbmlsBQNuaWwDCQAAAgUOdHJhbnNmZXJSZXN1bHQFDnRyYW5zZmVyUmVzdWx0BAxzdXBwbHlSZXN1bHQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM04zRG5WZmZuVXladHoyTVJiazVVN2dpTjExMldlbXBNTmQCBnN1cHBseQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQR1bml0BQthc3NldEFtb3VudAUDbmlsAwkAAAIFDHN1cHBseVJlc3VsdAUMc3VwcGx5UmVzdWx0BAxib3Jyb3dSZXN1bHQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM04zRG5WZmZuVXladHoyTVJiazVVN2dpTjExMldlbXBNTmQCBmJvcnJvdwkAzAgCAiwyNUZFcUVqUmtxSzZ5Q2tpVDdMejZTQVl6N2dVRkN0eGZDQ2huclZGRDVBVAkAzAgCCQBpAgkAaAIFC2Fzc2V0QW1vdW50CQEPZ2V0Q3VycmVudFByaWNlAQIFV0FWRVMAZAUDbmlsBQNuaWwDCQAAAgUMYm9ycm93UmVzdWx0BQxib3Jyb3dSZXN1bHQJAGQCBQVhY2N1bQUEbmV4dAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQFYXJyYXkJAMwIAgULYXNzZXRBbW91bnQJAMwIAgULYXNzZXRBbW91bnQFA25pbAQDcmVzCgACJGwFBWFycmF5CgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpyZXBlYXRGdW5jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyAyCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFB2FkZHJlc3MCCl9ib3Jyb3dlZF8CLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUCQBoAgULYXNzZXRBbW91bnQJAQ9nZXRDdXJyZW50UHJpY2UBAgVXQVZFUwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGkCCQBoAgUDcmVzCQEPZ2V0Q3VycmVudFByaWNlAQIFV0FWRVMAZAEgD/IcEqzkxDya7EYaqyWosOy6BytGzG2IcvC14pJJAbQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUEdGhpcwUDcmVzBQR1bml0BQNuaWwJAAIBAgZFcnJvciEBaQEGYm9ycm93AQthc3NldEFtb3VudAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEA3JlcwkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAIGYm9ycm93CQDMCAICLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUCQDMCAIFC2Fzc2V0QW1vdW50BQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFC2Fzc2V0QW1vdW50ASAP8hwSrOTEPJrsRhqrJaiw7LoHK0bMbYhy8LXikkkBtAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFB2FkZHJlc3MCCl9ib3Jyb3dlZF8CLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUBQthc3NldEFtb3VudAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBB2JvcnJvdzIBC2Fzc2V0QW1vdW50BAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgoBCnJlcGVhdEZ1bmMCBWFjY3VtBG5leHQEBnJlc3VsdAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAIGYm9ycm93CQDMCAICLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUCQDMCAIFC2Fzc2V0QW1vdW50BQNuaWwFA25pbAMJAAACBQZyZXN1bHQFBnJlc3VsdAkAZAIFBWFjY3VtBQRuZXh0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAVhcnJheQkAzAgCBQthc3NldEFtb3VudAkAzAgCBQthc3NldEFtb3VudAUDbmlsBANyZXMKAAIkbAUFYXJyYXkKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCnJlcGVhdEZ1bmMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgUHYWRkcmVzcwIKX2JvcnJvd2VkXwIsMjVGRXFFalJrcUs2eUNraVQ3THo2U0FZejdnVUZDdHhmQ0NobnJWRkQ1QVQFC2Fzc2V0QW1vdW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUDcmVzASAP8hwSrOTEPJrsRhqrJaiw7LoHK0bMbYhy8LXikkkBtAUDbmlsAWkBB2JvcnJvdzUCCmFzc2V0SWRTdHILYXNzZXRBbW91bnQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBANyZXMKAAIkbAUDYXJyCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQNzdW0CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAwkAAAIFA3JlcwUDcmVzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgUHYWRkcmVzcwIKX2JvcnJvd2VkXwUKYXNzZXRJZFN0cgULYXNzZXRBbW91bnQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQdkZXBvc2l0AAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEA3JlcwkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFBHVuaXQAwIQ9BQNuaWwDCQAAAgUDcmVzBQNyZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIMc3VwcGx5X3dhdmVzAMCEPQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCHdpdGhkcmF3Agphc3NldElkU3RyC2Fzc2V0QW1vdW50BAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQDcmVzCQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNOM0RuVmZmblV5WnR6Mk1SYms1VTdnaU4xMTJXZW1wTU5kAgh3aXRoZHJhdwkAzAgCBQphc3NldElkU3RyCQDMCAIFC2Fzc2V0QW1vdW50BQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFB2FkZHJlc3MCCl93aXRoZHJld18FCmFzc2V0SWRTdHIFC2Fzc2V0QW1vdW50BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEMY2hlY2tCYWxhbmNlAQphc3NldElkU3RyBAdhZGRyZXNzCAUBaQZjYWxsZXIDCQAAAgUKYXNzZXRJZFN0cgIFV0FWRVMJAMwIAgkBDEludGVnZXJFbnRyeQICDVdhdmVzIEJhbGFuY2UICQDvBwEFB2FkZHJlc3MJYXZhaWxhYmxlBQNuaWwJAMwIAgkBDEludGVnZXJFbnRyeQICDUFzc2V0IEJhbGFuY2UJAPAHAgUHYWRkcmVzcwkA2QQBBQphc3NldElkU3RyBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5B2yGJg==",
    "height": 2681423,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: D6T6BUbhTJDB7fpAc7MiMCJmbVN7t7KV7hcV422PhwaP
Next: CvqUcJby4q1zC3e7GywVYLVShWLTzHubErfYDEQnim7i

Diff: 
Old New Differences
100 100  
101 101                              $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
102 102                              }
103 -                         let returnedTokenAmount = (res / getWaves3LCurrentPrice())
103 +                         let returnedTokenAmount = ((res / getWaves3LCurrentPrice()) * 1000000)
104 104  [IntegerEntry((address + "_gave_USDN"), stableCoinAmount), IntegerEntry((address + "_deposited_WAVES"), convertedWavesAmount), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), res), IntegerEntry((address + "_received_WAVES3L"), returnedTokenAmount), ScriptTransfer(i.caller, returnedTokenAmount, base58'92rW5ucGkH84YeXLnLs8dMN1P7RAFocmR8zfBqUy4gPM')]
105 105                          }
106 106                      else throw("Strict value is not equal to itself.")
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let waves1LId = Address(base58'CygdaJKZfxRrHyYMwkNdz9ZgSD5FpJLtk5s5B4q1DKV6')
5 5  
6 6  let waves3LId = Address(base58'92rW5ucGkH84YeXLnLs8dMN1P7RAFocmR8zfBqUy4gPM')
7 7  
8 8  let waves5LId = Address(base58'2qUH6Nh6cgC8dxj8fwH3bTJi261PNr5nMQKRbBXBuwmM')
9 9  
10 10  let arr = [1, 2, 3, 4, 5]
11 11  
12 12  let arr2 = [1, 2]
13 13  
14 14  let arr3 = [1, 2, 3]
15 15  
16 16  func sum (a,b) = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", 1000000], nil)
17 17  
18 18  
19 19  func getBalance (assetIdStr,address) = if ((assetIdStr == "WAVES"))
20 20      then wavesBalance(address).available
21 21      else assetBalance(address, fromBase58String(assetIdStr))
22 22  
23 23  
24 24  func getCurrentPrice (assetIdStr) = if ((assetIdStr == "WAVES"))
25 25      then 2
26 26      else throw("Error")
27 27  
28 28  
29 29  func getWavesCurrentPrice () = 2000000
30 30  
31 31  
32 32  func getWaves1LCurrentPrice () = 1500000
33 33  
34 34  
35 35  func getWaves3LCurrentPrice () = 1200000
36 36  
37 37  
38 38  func transferWavesTestInternal (assetIdStr,assetAmount,address) = [IntegerEntry(((address + "_deposited_") + assetIdStr), assetAmount)]
39 39  
40 40  
41 41  @Callable(i)
42 42  func transferWaves (assetAmount,senderAddress) = if ((i.caller != this))
43 43      then throw("only for internal smart contract invocations")
44 44      else [ScriptTransfer(this, assetAmount, unit), IntegerEntry((senderAddress + "_deposited_WAVES"), assetAmount)]
45 45  
46 46  
47 47  
48 48  @Callable(i)
49 49  func issue3xLong () = [Issue("WAVES3L", "WAVES_USDN_LONG3X Token", 1000000000, 6, true)]
50 50  
51 51  
52 52  
53 53  @Callable(i)
54 54  func transferWavesTest () = if (if ((size(i.payments) != 1))
55 55      then true
56 56      else (i.payments[0].amount == 0))
57 57      then throw("1 payment has to be attached")
58 58      else {
59 59          let assetIdStr = "WAVES"
60 60          let assetAmount = i.payments[0].amount
61 61          transferWavesTestInternal(assetIdStr, assetAmount, toString(i.caller))
62 62          }
63 63  
64 64  
65 65  
66 66  @Callable(i)
67 67  func mintWaves3L () = if (if ((size(i.payments) != 1))
68 68      then true
69 69      else (i.payments[0].amount == 0))
70 70      then throw("1 payment has to be attached")
71 71      else {
72 72          let address = toString(i.caller)
73 73          let stableCoinAmount = i.payments[0].amount
74 74          let convertedWavesAmount = ((stableCoinAmount / getWavesCurrentPrice()) * 100000000)
75 75          let userWavesAmount = getBalance("WAVES", i.caller)
76 76          if ((userWavesAmount > convertedWavesAmount))
77 77              then {
78 78                  let depositResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, convertedWavesAmount)])
79 79                  if ((depositResult == depositResult))
80 80                      then {
81 81                          func repeatFunc (accum,next) =                         {
82 82                              let borrowResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", stableCoinAmount], nil)
83 83                              if ((borrowResult == borrowResult))
84 84                                  then (accum + next)
85 85                                  else throw("Strict value is not equal to itself.")
86 86                              }
87 87  
88 88                          let array = [stableCoinAmount, stableCoinAmount, stableCoinAmount]
89 89                          let res = {
90 90                              let $l = array
91 91                              let $s = size($l)
92 92                              let $acc0 = 0
93 93                              func $f0_1 ($a,$i) =                             if (($i >= $s))
94 94                                  then $a
95 95                                  else repeatFunc($a, $l[$i])
96 96  
97 97                              func $f0_2 ($a,$i) =                             if (($i >= $s))
98 98                                  then $a
99 99                                  else throw("List size exceeds 3")
100 100  
101 101                              $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
102 102                              }
103 -                         let returnedTokenAmount = (res / getWaves3LCurrentPrice())
103 +                         let returnedTokenAmount = ((res / getWaves3LCurrentPrice()) * 1000000)
104 104  [IntegerEntry((address + "_gave_USDN"), stableCoinAmount), IntegerEntry((address + "_deposited_WAVES"), convertedWavesAmount), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), res), IntegerEntry((address + "_received_WAVES3L"), returnedTokenAmount), ScriptTransfer(i.caller, returnedTokenAmount, base58'92rW5ucGkH84YeXLnLs8dMN1P7RAFocmR8zfBqUy4gPM')]
105 105                          }
106 106                      else throw("Strict value is not equal to itself.")
107 107                  }
108 108              else throw("Not enough WAVES to deposit!")
109 109          }
110 110  
111 111  
112 112  
113 113  @Callable(i)
114 114  func mintWaves3L_test () = if (if ((size(i.payments) != 1))
115 115      then true
116 116      else (i.payments[0].amount == 0))
117 117      then throw("1 payment has to be attached")
118 118      else {
119 119          let address = toString(i.caller)
120 120          let stableCoinAmount = i.payments[0].amount
121 121  [IntegerEntry((address + "_gave_USDN"), stableCoinAmount)]
122 122          }
123 123  
124 124  
125 125  
126 126  @Callable(i)
127 127  func long3x_v2 () = if (if ((size(i.payments) != 1))
128 128      then true
129 129      else (i.payments[0].amount == 0))
130 130      then throw("1 payment has to be attached")
131 131      else {
132 132          let address = toString(i.caller)
133 133          let assetIdStr = "WAVES"
134 134          let wavesAmount = i.payments[0].amount
135 135          let currentWavesAmount = getBalance(assetIdStr, i.caller)
136 136          if ((currentWavesAmount > wavesAmount))
137 137              then {
138 138                  let depositResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, wavesAmount)])
139 139                  if ((depositResult == depositResult))
140 140                      then {
141 141                          func repeatFunc (accum,next) =                         {
142 142                              let borrowResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", ((wavesAmount * getCurrentPrice("WAVES")) / 100)], nil)
143 143                              if ((borrowResult == borrowResult))
144 144                                  then (accum + next)
145 145                                  else throw("Strict value is not equal to itself.")
146 146                              }
147 147  
148 148                          let array = [wavesAmount, wavesAmount]
149 149                          let res = {
150 150                              let $l = array
151 151                              let $s = size($l)
152 152                              let $acc0 = 0
153 153                              func $f0_1 ($a,$i) =                             if (($i >= $s))
154 154                                  then $a
155 155                                  else repeatFunc($a, $l[$i])
156 156  
157 157                              func $f0_2 ($a,$i) =                             if (($i >= $s))
158 158                                  then $a
159 159                                  else throw("List size exceeds 3")
160 160  
161 161                              $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
162 162                              }
163 163  [IntegerEntry((address + "_deposited_WAVES"), wavesAmount), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), (wavesAmount * getCurrentPrice("WAVES"))), ScriptTransfer(i.caller, ((res * getCurrentPrice("WAVES")) / 100), base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT')]
164 164                          }
165 165                      else throw("Strict value is not equal to itself.")
166 166                  }
167 167              else throw("Not enough WAVES to deposit!")
168 168          }
169 169  
170 170  
171 171  
172 172  @Callable(i)
173 173  func long2x (assetAmount) = {
174 174      let address = toString(i.caller)
175 175      let currentAmount = getBalance("WAVES", i.caller)
176 176      if ((currentAmount > assetAmount))
177 177          then {
178 178              func repeatFunc (accum,next) =             {
179 179                  let transferResult = invoke(this, "transferWaves", [assetAmount, i.caller], nil)
180 180                  if ((transferResult == transferResult))
181 181                      then {
182 182                          let supplyResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, assetAmount)])
183 183                          if ((supplyResult == supplyResult))
184 184                              then {
185 185                                  let borrowResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", ((assetAmount * getCurrentPrice("WAVES")) / 100)], nil)
186 186                                  if ((borrowResult == borrowResult))
187 187                                      then (accum + next)
188 188                                      else throw("Strict value is not equal to itself.")
189 189                                  }
190 190                              else throw("Strict value is not equal to itself.")
191 191                          }
192 192                      else throw("Strict value is not equal to itself.")
193 193                  }
194 194  
195 195              let array = [assetAmount, assetAmount]
196 196              let res = {
197 197                  let $l = array
198 198                  let $s = size($l)
199 199                  let $acc0 = 0
200 200                  func $f0_1 ($a,$i) =                 if (($i >= $s))
201 201                      then $a
202 202                      else repeatFunc($a, $l[$i])
203 203  
204 204                  func $f0_2 ($a,$i) =                 if (($i >= $s))
205 205                      then $a
206 206                      else throw("List size exceeds 2")
207 207  
208 208                  $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
209 209                  }
210 210  [IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), (assetAmount * getCurrentPrice("WAVES"))), ScriptTransfer(i.caller, ((res * getCurrentPrice("WAVES")) / 100), base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'), ScriptTransfer(this, res, unit)]
211 211              }
212 212          else throw("Error!")
213 213      }
214 214  
215 215  
216 216  
217 217  @Callable(i)
218 218  func borrow (assetAmount) = {
219 219      let address = toString(i.caller)
220 220      let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
221 221      if ((res == res))
222 222          then [ScriptTransfer(i.caller, assetAmount, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount)]
223 223          else throw("Strict value is not equal to itself.")
224 224      }
225 225  
226 226  
227 227  
228 228  @Callable(i)
229 229  func borrow2 (assetAmount) = {
230 230      let address = toString(i.caller)
231 231      func repeatFunc (accum,next) =     {
232 232          let result = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
233 233          if ((result == result))
234 234              then (accum + next)
235 235              else throw("Strict value is not equal to itself.")
236 236          }
237 237  
238 238      let array = [assetAmount, assetAmount]
239 239      let res = {
240 240          let $l = array
241 241          let $s = size($l)
242 242          let $acc0 = 0
243 243          func $f0_1 ($a,$i) =         if (($i >= $s))
244 244              then $a
245 245              else repeatFunc($a, $l[$i])
246 246  
247 247          func $f0_2 ($a,$i) =         if (($i >= $s))
248 248              then $a
249 249              else throw("List size exceeds 2")
250 250  
251 251          $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
252 252          }
253 253  [IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), ScriptTransfer(i.caller, res, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT')]
254 254      }
255 255  
256 256  
257 257  
258 258  @Callable(i)
259 259  func borrow5 (assetIdStr,assetAmount) = {
260 260      let address = toString(i.caller)
261 261      let res = {
262 262          let $l = arr
263 263          let $s = size($l)
264 264          let $acc0 = 0
265 265          func $f0_1 ($a,$i) =         if (($i >= $s))
266 266              then $a
267 267              else sum($a, $l[$i])
268 268  
269 269          func $f0_2 ($a,$i) =         if (($i >= $s))
270 270              then $a
271 271              else throw("List size exceeds 5")
272 272  
273 273          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
274 274          }
275 275      if ((res == res))
276 276          then [IntegerEntry(((address + "_borrowed_") + assetIdStr), assetAmount)]
277 277          else throw("Strict value is not equal to itself.")
278 278      }
279 279  
280 280  
281 281  
282 282  @Callable(i)
283 283  func deposit () = {
284 284      let address = toString(i.caller)
285 285      let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, 1000000)])
286 286      if ((res == res))
287 287          then [IntegerEntry((address + "supply_waves"), 1000000)]
288 288          else throw("Strict value is not equal to itself.")
289 289      }
290 290  
291 291  
292 292  
293 293  @Callable(i)
294 294  func withdraw (assetIdStr,assetAmount) = {
295 295      let address = toString(i.caller)
296 296      let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "withdraw", [assetIdStr, assetAmount], nil)
297 297      if ((res == res))
298 298          then [IntegerEntry(((address + "_withdrew_") + assetIdStr), assetAmount)]
299 299          else throw("Strict value is not equal to itself.")
300 300      }
301 301  
302 302  
303 303  
304 304  @Callable(i)
305 305  func checkBalance (assetIdStr) = {
306 306      let address = i.caller
307 307      if ((assetIdStr == "WAVES"))
308 308          then [IntegerEntry("Waves Balance", wavesBalance(address).available)]
309 309          else [IntegerEntry("Asset Balance", assetBalance(address, fromBase58String(assetIdStr)))]
310 310      }
311 311  
312 312  
313 313  @Verifier(tx)
314 314  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
315 315

Old	New		Differences
100	100
101	101		$f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
102	102		}
103		-	let returnedTokenAmount = (res / getWaves3LCurrentPrice())
	103	+	let returnedTokenAmount = ((res / getWaves3LCurrentPrice()) * 1000000)
104	104		[IntegerEntry((address + "_gave_USDN"), stableCoinAmount), IntegerEntry((address + "_deposited_WAVES"), convertedWavesAmount), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), res), IntegerEntry((address + "_received_WAVES3L"), returnedTokenAmount), ScriptTransfer(i.caller, returnedTokenAmount, base58'92rW5ucGkH84YeXLnLs8dMN1P7RAFocmR8zfBqUy4gPM')]
105	105		}
106	106		else throw("Strict value is not equal to itself.")

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let waves1LId = Address(base58'CygdaJKZfxRrHyYMwkNdz9ZgSD5FpJLtk5s5B4q1DKV6')
5	5
6	6		let waves3LId = Address(base58'92rW5ucGkH84YeXLnLs8dMN1P7RAFocmR8zfBqUy4gPM')
7	7
8	8		let waves5LId = Address(base58'2qUH6Nh6cgC8dxj8fwH3bTJi261PNr5nMQKRbBXBuwmM')
9	9
10	10		let arr = [1, 2, 3, 4, 5]
11	11
12	12		let arr2 = [1, 2]
13	13
14	14		let arr3 = [1, 2, 3]
15	15
16	16		func sum (a,b) = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", 1000000], nil)
17	17
18	18
19	19		func getBalance (assetIdStr,address) = if ((assetIdStr == "WAVES"))
20	20		then wavesBalance(address).available
21	21		else assetBalance(address, fromBase58String(assetIdStr))
22	22
23	23
24	24		func getCurrentPrice (assetIdStr) = if ((assetIdStr == "WAVES"))
25	25		then 2
26	26		else throw("Error")
27	27
28	28
29	29		func getWavesCurrentPrice () = 2000000
30	30
31	31
32	32		func getWaves1LCurrentPrice () = 1500000
33	33
34	34
35	35		func getWaves3LCurrentPrice () = 1200000
36	36
37	37
38	38		func transferWavesTestInternal (assetIdStr,assetAmount,address) = [IntegerEntry(((address + "_deposited_") + assetIdStr), assetAmount)]
39	39
40	40
41	41		@Callable(i)
42	42		func transferWaves (assetAmount,senderAddress) = if ((i.caller != this))
43	43		then throw("only for internal smart contract invocations")
44	44		else [ScriptTransfer(this, assetAmount, unit), IntegerEntry((senderAddress + "_deposited_WAVES"), assetAmount)]
45	45
46	46
47	47
48	48		@Callable(i)
49	49		func issue3xLong () = [Issue("WAVES3L", "WAVES_USDN_LONG3X Token", 1000000000, 6, true)]
50	50
51	51
52	52
53	53		@Callable(i)
54	54		func transferWavesTest () = if (if ((size(i.payments) != 1))
55	55		then true
56	56		else (i.payments[0].amount == 0))
57	57		then throw("1 payment has to be attached")
58	58		else {
59	59		let assetIdStr = "WAVES"
60	60		let assetAmount = i.payments[0].amount
61	61		transferWavesTestInternal(assetIdStr, assetAmount, toString(i.caller))
62	62		}
63	63
64	64
65	65
66	66		@Callable(i)
67	67		func mintWaves3L () = if (if ((size(i.payments) != 1))
68	68		then true
69	69		else (i.payments[0].amount == 0))
70	70		then throw("1 payment has to be attached")
71	71		else {
72	72		let address = toString(i.caller)
73	73		let stableCoinAmount = i.payments[0].amount
74	74		let convertedWavesAmount = ((stableCoinAmount / getWavesCurrentPrice()) * 100000000)
75	75		let userWavesAmount = getBalance("WAVES", i.caller)
76	76		if ((userWavesAmount > convertedWavesAmount))
77	77		then {
78	78		let depositResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, convertedWavesAmount)])
79	79		if ((depositResult == depositResult))
80	80		then {
81	81		func repeatFunc (accum,next) = {
82	82		let borrowResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", stableCoinAmount], nil)
83	83		if ((borrowResult == borrowResult))
84	84		then (accum + next)
85	85		else throw("Strict value is not equal to itself.")
86	86		}
87	87
88	88		let array = [stableCoinAmount, stableCoinAmount, stableCoinAmount]
89	89		let res = {
90	90		let $l = array
91	91		let $s = size($l)
92	92		let $acc0 = 0
93	93		func $f0_1 ($a,$i) = if (($i >= $s))
94	94		then $a
95	95		else repeatFunc($a, $l[$i])
96	96
97	97		func $f0_2 ($a,$i) = if (($i >= $s))
98	98		then $a
99	99		else throw("List size exceeds 3")
100	100
101	101		$f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
102	102		}
103		-	let returnedTokenAmount = (res / getWaves3LCurrentPrice())
	103	+	let returnedTokenAmount = ((res / getWaves3LCurrentPrice()) * 1000000)
104	104		[IntegerEntry((address + "_gave_USDN"), stableCoinAmount), IntegerEntry((address + "_deposited_WAVES"), convertedWavesAmount), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), res), IntegerEntry((address + "_received_WAVES3L"), returnedTokenAmount), ScriptTransfer(i.caller, returnedTokenAmount, base58'92rW5ucGkH84YeXLnLs8dMN1P7RAFocmR8zfBqUy4gPM')]
105	105		}
106	106		else throw("Strict value is not equal to itself.")
107	107		}
108	108		else throw("Not enough WAVES to deposit!")
109	109		}
110	110
111	111
112	112
113	113		@Callable(i)
114	114		func mintWaves3L_test () = if (if ((size(i.payments) != 1))
115	115		then true
116	116		else (i.payments[0].amount == 0))
117	117		then throw("1 payment has to be attached")
118	118		else {
119	119		let address = toString(i.caller)
120	120		let stableCoinAmount = i.payments[0].amount
121	121		[IntegerEntry((address + "_gave_USDN"), stableCoinAmount)]
122	122		}
123	123
124	124
125	125
126	126		@Callable(i)
127	127		func long3x_v2 () = if (if ((size(i.payments) != 1))
128	128		then true
129	129		else (i.payments[0].amount == 0))
130	130		then throw("1 payment has to be attached")
131	131		else {
132	132		let address = toString(i.caller)
133	133		let assetIdStr = "WAVES"
134	134		let wavesAmount = i.payments[0].amount
135	135		let currentWavesAmount = getBalance(assetIdStr, i.caller)
136	136		if ((currentWavesAmount > wavesAmount))
137	137		then {
138	138		let depositResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, wavesAmount)])
139	139		if ((depositResult == depositResult))
140	140		then {
141	141		func repeatFunc (accum,next) = {
142	142		let borrowResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", ((wavesAmount * getCurrentPrice("WAVES")) / 100)], nil)
143	143		if ((borrowResult == borrowResult))
144	144		then (accum + next)
145	145		else throw("Strict value is not equal to itself.")
146	146		}
147	147
148	148		let array = [wavesAmount, wavesAmount]
149	149		let res = {
150	150		let $l = array
151	151		let $s = size($l)
152	152		let $acc0 = 0
153	153		func $f0_1 ($a,$i) = if (($i >= $s))
154	154		then $a
155	155		else repeatFunc($a, $l[$i])
156	156
157	157		func $f0_2 ($a,$i) = if (($i >= $s))
158	158		then $a
159	159		else throw("List size exceeds 3")
160	160
161	161		$f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
162	162		}
163	163		[IntegerEntry((address + "_deposited_WAVES"), wavesAmount), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), (wavesAmount * getCurrentPrice("WAVES"))), ScriptTransfer(i.caller, ((res * getCurrentPrice("WAVES")) / 100), base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT')]
164	164		}
165	165		else throw("Strict value is not equal to itself.")
166	166		}
167	167		else throw("Not enough WAVES to deposit!")
168	168		}
169	169
170	170
171	171
172	172		@Callable(i)
173	173		func long2x (assetAmount) = {
174	174		let address = toString(i.caller)
175	175		let currentAmount = getBalance("WAVES", i.caller)
176	176		if ((currentAmount > assetAmount))
177	177		then {
178	178		func repeatFunc (accum,next) = {
179	179		let transferResult = invoke(this, "transferWaves", [assetAmount, i.caller], nil)
180	180		if ((transferResult == transferResult))
181	181		then {
182	182		let supplyResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, assetAmount)])
183	183		if ((supplyResult == supplyResult))
184	184		then {
185	185		let borrowResult = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", ((assetAmount * getCurrentPrice("WAVES")) / 100)], nil)
186	186		if ((borrowResult == borrowResult))
187	187		then (accum + next)
188	188		else throw("Strict value is not equal to itself.")
189	189		}
190	190		else throw("Strict value is not equal to itself.")
191	191		}
192	192		else throw("Strict value is not equal to itself.")
193	193		}
194	194
195	195		let array = [assetAmount, assetAmount]
196	196		let res = {
197	197		let $l = array
198	198		let $s = size($l)
199	199		let $acc0 = 0
200	200		func $f0_1 ($a,$i) = if (($i >= $s))
201	201		then $a
202	202		else repeatFunc($a, $l[$i])
203	203
204	204		func $f0_2 ($a,$i) = if (($i >= $s))
205	205		then $a
206	206		else throw("List size exceeds 2")
207	207
208	208		$f0_2($f0_1($f0_1($acc0, 0), 1), 2)
209	209		}
210	210		[IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), (assetAmount * getCurrentPrice("WAVES"))), ScriptTransfer(i.caller, ((res * getCurrentPrice("WAVES")) / 100), base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'), ScriptTransfer(this, res, unit)]
211	211		}
212	212		else throw("Error!")
213	213		}
214	214
215	215
216	216
217	217		@Callable(i)
218	218		func borrow (assetAmount) = {
219	219		let address = toString(i.caller)
220	220		let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
221	221		if ((res == res))
222	222		then [ScriptTransfer(i.caller, assetAmount, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount)]
223	223		else throw("Strict value is not equal to itself.")
224	224		}
225	225
226	226
227	227
228	228		@Callable(i)
229	229		func borrow2 (assetAmount) = {
230	230		let address = toString(i.caller)
231	231		func repeatFunc (accum,next) = {
232	232		let result = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
233	233		if ((result == result))
234	234		then (accum + next)
235	235		else throw("Strict value is not equal to itself.")
236	236		}
237	237
238	238		let array = [assetAmount, assetAmount]
239	239		let res = {
240	240		let $l = array
241	241		let $s = size($l)
242	242		let $acc0 = 0
243	243		func $f0_1 ($a,$i) = if (($i >= $s))
244	244		then $a
245	245		else repeatFunc($a, $l[$i])
246	246
247	247		func $f0_2 ($a,$i) = if (($i >= $s))
248	248		then $a
249	249		else throw("List size exceeds 2")
250	250
251	251		$f0_2($f0_1($f0_1($acc0, 0), 1), 2)
252	252		}
253	253		[IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), ScriptTransfer(i.caller, res, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT')]
254	254		}
255	255
256	256
257	257
258	258		@Callable(i)
259	259		func borrow5 (assetIdStr,assetAmount) = {
260	260		let address = toString(i.caller)
261	261		let res = {
262	262		let $l = arr
263	263		let $s = size($l)
264	264		let $acc0 = 0
265	265		func $f0_1 ($a,$i) = if (($i >= $s))
266	266		then $a
267	267		else sum($a, $l[$i])
268	268
269	269		func $f0_2 ($a,$i) = if (($i >= $s))
270	270		then $a
271	271		else throw("List size exceeds 5")
272	272
273	273		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
274	274		}
275	275		if ((res == res))
276	276		then [IntegerEntry(((address + "_borrowed_") + assetIdStr), assetAmount)]
277	277		else throw("Strict value is not equal to itself.")
278	278		}
279	279
280	280
281	281
282	282		@Callable(i)
283	283		func deposit () = {
284	284		let address = toString(i.caller)
285	285		let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, 1000000)])
286	286		if ((res == res))
287	287		then [IntegerEntry((address + "supply_waves"), 1000000)]
288	288		else throw("Strict value is not equal to itself.")
289	289		}
290	290
291	291
292	292
293	293		@Callable(i)
294	294		func withdraw (assetIdStr,assetAmount) = {
295	295		let address = toString(i.caller)
296	296		let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "withdraw", [assetIdStr, assetAmount], nil)
297	297		if ((res == res))
298	298		then [IntegerEntry(((address + "_withdrew_") + assetIdStr), assetAmount)]
299	299		else throw("Strict value is not equal to itself.")
300	300		}
301	301
302	302
303	303
304	304		@Callable(i)
305	305		func checkBalance (assetIdStr) = {
306	306		let address = i.caller
307	307		if ((assetIdStr == "WAVES"))
308	308		then [IntegerEntry("Waves Balance", wavesBalance(address).available)]
309	309		else [IntegerEntry("Asset Balance", assetBalance(address, fromBase58String(assetIdStr)))]
310	310		}
311	311
312	312
313	313		@Verifier(tx)
314	314		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
315	315

github/deemru/w8io/169f3d6 
76.37 ms ◑