w8 · tx · 5v7···t47

tx · 5v7c3o9Gc5sUGvX6nshxUZ6hhS9gnuRNerTFrzswEt47

3MuS6qVvhBR6wSynFRdcE3fVqmGBjoc7Hhx:  -0.01600000 Waves

2023.08.18 14:23 [2715972] smart account 3MuS6qVvhBR6wSynFRdcE3fVqmGBjoc7Hhx > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5v7c3o9Gc5sUGvX6nshxUZ6hhS9gnuRNerTFrzswEt47",
    "fee": 1600000,
    "feeAssetId": null,
    "timestamp": 1692357798150,
    "version": 1,
    "sender": "3MuS6qVvhBR6wSynFRdcE3fVqmGBjoc7Hhx",
    "senderPublicKey": "62CHk4MqTdq3LqeUycy7TPnpvwrjgerSa2FqAY2EafXn",
    "proofs": [
        "3vwuNB6riuzY8eUUNZhr5BXGV76rk5ASH4tZmZgZXKotm4u1FHf1M6egPGpit4QD7AvAodThz2MjQ9XWFsidCGu7"
    ],
    "script": "base64:BwKLAQgCEgQKAggIEgQKAggBEgQKAggEEgQKAggCEgMKAQgSAwoBARIDCgEBEgUKAwIBAhIFCgMCGBgSBAoCAgESBAoCAgESBgoEAQEBARIGCgQBAQEBEgASABIDCgEIEgMKARgSABIAEgMKAQgSABIECgIICBIECgIIGBIFCgMICAESBQoDAgIBEgMKAQg3AANTRVACAl9fAAVXQVZFUwIFV0FWRVMAEGNvbnRyYWN0RmlsZW5hbWUCDGZhY3RvcnkucmlkZQEHd3JhcEVycgEBcwkArAICCQCsAgIFEGNvbnRyYWN0RmlsZW5hbWUCAjogBQFzAQh0aHJvd0VycgEBcwkAAgEJAQd3cmFwRXJyAQUBcwEPc3RyaW5nVG9Bc3NldElkAQFzAwkAAAIFAXMFBVdBVkVTBQR1bml0CQDZBAEFAXMAD0FETUlOX0xJU1RfU0laRQAFAAZRVU9SVU0AAwARVFhJRF9CWVRFU19MRU5HVEgAIAEYa2V5QWxsb3dlZFR4SWRWb3RlUHJlZml4AQR0eElkCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICCWFsbG93VHhJZAkAzAgCBQR0eElkBQNuaWwFA1NFUAEQa2V5RnVsbEFkbWluVm90ZQIGcHJlZml4DGFkbWluQWRkcmVzcwkAuQkCCQDMCAIFBnByZWZpeAkAzAgCBQxhZG1pbkFkZHJlc3MFA25pbAUDU0VQARNrZXlBZG1pbkFkZHJlc3NMaXN0AAkAuQkCCQDMCAICAiVzCQDMCAICEGFkbWluQWRkcmVzc0xpc3QFA25pbAUDU0VQAQ5rZXlBbGxvd2VkVHhJZAAJALkJAgkAzAgCAgIlcwkAzAgCAgR0eElkBQNuaWwFA1NFUAEMZ2V0QWRtaW5Wb3RlAgZwcmVmaXgFYWRtaW4EB3ZvdGVLZXkJARBrZXlGdWxsQWRtaW5Wb3RlAgUGcHJlZml4BQVhZG1pbgkBC3ZhbHVlT3JFbHNlAgkAnwgBBQd2b3RlS2V5AAABDWdldEFkbWluc0xpc3QABAckbWF0Y2gwCQCdCAIFBHRoaXMJARNrZXlBZG1pbkFkZHJlc3NMaXN0AAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJALUJAgUBcwUDU0VQBQNuaWwBDWlzSW5BZG1pbkxpc3QBB2FkZHJlc3MJAQ9jb250YWluc0VsZW1lbnQCCQENZ2V0QWRtaW5zTGlzdAAFB2FkZHJlc3MBEmdlblZvdGVzS2V5c0hlbHBlcgIBYQxhZG1pbkFkZHJlc3MECyR0MDEzNzUxMzk5BQFhBAZyZXN1bHQIBQskdDAxMzc1MTM5OQJfMQQGcHJlZml4CAULJHQwMTM3NTEzOTkCXzIJAJQKAgkAzQgCBQZyZXN1bHQJARBrZXlGdWxsQWRtaW5Wb3RlAgUGcHJlZml4BQxhZG1pbkFkZHJlc3MFBnByZWZpeAEMZ2VuVm90ZXNLZXlzAQlrZXlQcmVmaXgECWFkbWluTGlzdAkBE2tleUFkbWluQWRkcmVzc0xpc3QABAskdDAxNTQ2MTYzMAoAAiRsCQENZ2V0QWRtaW5zTGlzdAAKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAUJa2V5UHJlZml4CgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARJnZW5Wb3Rlc0tleXNIZWxwZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFBAZyZXN1bHQIBQskdDAxNTQ2MTYzMAJfMQQGcHJlZml4CAULJHQwMTU0NjE2MzACXzIFBnJlc3VsdAEQY291bnRWb3Rlc0hlbHBlcgIGcmVzdWx0B3ZvdGVLZXkJAGQCBQZyZXN1bHQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdm90ZUtleQAAAQpjb3VudFZvdGVzAQZwcmVmaXgEBXZvdGVzCQEMZ2VuVm90ZXNLZXlzAQUGcHJlZml4CgACJGwFBXZvdGVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARBjb3VudFZvdGVzSGVscGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQEQY2xlYXJWb3Rlc0hlbHBlcgIGcmVzdWx0A2tleQkAzQgCBQZyZXN1bHQJAQtEZWxldGVFbnRyeQEFA2tleQETZ2V0Q2xlYXJWb3RlRW50cmllcwEGcHJlZml4BAV2b3RlcwkBDGdlblZvdGVzS2V5cwEFBnByZWZpeAoAAiRsBQV2b3RlcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEQY2xlYXJWb3Rlc0hlbHBlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUBDHZvdGVJTlRFUk5BTAQTY2FsbGVyQWRkcmVzc1N0cmluZwlrZXlQcmVmaXgIbWluVm90ZXMKdm90ZVJlc3VsdAQHdm90ZUtleQkBEGtleUZ1bGxBZG1pblZvdGUCBQlrZXlQcmVmaXgFE2NhbGxlckFkZHJlc3NTdHJpbmcEEGFkbWluQ3VycmVudFZvdGUJAQxnZXRBZG1pblZvdGUCBQlrZXlQcmVmaXgFE2NhbGxlckFkZHJlc3NTdHJpbmcEA2VycgMJAQEhAQkBDWlzSW5BZG1pbkxpc3QBBRNjYWxsZXJBZGRyZXNzU3RyaW5nCQEIdGhyb3dFcnIBCQCsAgIJAKwCAgIJQWRkcmVzczogBRNjYWxsZXJBZGRyZXNzU3RyaW5nAhIgbm90IGluIEFkbWluIGxpc3QDCQAAAgUQYWRtaW5DdXJyZW50Vm90ZQABCQEIdGhyb3dFcnIBCQCsAgIFB3ZvdGVLZXkCEiB5b3UgYWxyZWFkeSB2b3RlZAUEdW5pdAMJAAACBQNlcnIFA2VycgQFdm90ZXMJAQpjb3VudFZvdGVzAQUJa2V5UHJlZml4AwkAZwIJAGQCBQV2b3RlcwABBQhtaW5Wb3RlcwQQY2xlYXJWb3RlRW50cmllcwkBE2dldENsZWFyVm90ZUVudHJpZXMBBQlrZXlQcmVmaXgJAM4IAgUQY2xlYXJWb3RlRW50cmllcwUKdm90ZVJlc3VsdAkAzAgCCQEMSW50ZWdlckVudHJ5AgUHdm90ZUtleQABBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BFGtleUNhbGN1bGF0b3JBZGRyZXNzAAIOJXNfX2NhbGN1bGF0b3IBF2tleVByb3h5VHJlYXN1cnlBZGRyZXNzAAIRJXNfX3Byb3h5VHJlYXN1cnkBF2tleVBvd2VyQ29udHJhY3RBZGRyZXNzAAIRJXNfX3Bvd2VyQ29udHJhY3QBFmtleVN3YXBDb250cmFjdEFkZHJlc3MAAhAlc19fc3dhcENvbnRyYWN0AQ9rZXlDaGlsZEFkZHJlc3MAAgklc19fY2hpbGQBGGtleUJsb2NrUHJvY2Vzc2luZ1Jld2FyZAACGSVzX19ibG9ja1Byb2Nlc3NpbmdSZXdhcmQBFWtleU5leHRCbG9ja1RvUHJvY2VzcwACFiVzX19uZXh0QmxvY2tUb1Byb2Nlc3MBDGtleUxwQXNzZXRJZAACDSVzX19scEFzc2V0SWQAF2NhbGN1bGF0b3JBZGRyZXNzT3B0aW9uBAckbWF0Y2gwCQCdCAIFBHRoaXMJARRrZXlDYWxjdWxhdG9yQWRkcmVzcwADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQCmCAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yABdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBRdjYWxjdWxhdG9yQWRkcmVzc09wdGlvbgkBB3dyYXBFcnIBAhppbnZhbGlkIGNhbGN1bGF0b3IgYWRkcmVzcwAacHJveHlUcmVhc3VyeUFkZHJlc3NPcHRpb24EByRtYXRjaDAJAJ0IAgUEdGhpcwkBF2tleVByb3h5VHJlYXN1cnlBZGRyZXNzAAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKYIAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IAGnByb3h5VHJlYXN1cnlBZGRyZXNzT3JGYWlsCQETdmFsdWVPckVycm9yTWVzc2FnZQIFGnByb3h5VHJlYXN1cnlBZGRyZXNzT3B0aW9uCQEHd3JhcEVycgECHmludmFsaWQgcHJveHkgdHJlYXN1cnkgYWRkcmVzcwAacG93ZXJDb250cmFjdEFkZHJlc3NPcHRpb24EByRtYXRjaDAJAJ0IAgUEdGhpcwkBF2tleVBvd2VyQ29udHJhY3RBZGRyZXNzAAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKYIAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IAGnBvd2VyQ29udHJhY3RBZGRyZXNzT3JGYWlsCQETdmFsdWVPckVycm9yTWVzc2FnZQIFGnBvd2VyQ29udHJhY3RBZGRyZXNzT3B0aW9uCQEHd3JhcEVycgECHmludmFsaWQgcG93ZXIgY29udHJhY3QgYWRkcmVzcwAZc3dhcENvbnRyYWN0QWRkcmVzc09wdGlvbgQHJG1hdGNoMAkAnQgCBQR0aGlzCQEWa2V5U3dhcENvbnRyYWN0QWRkcmVzcwADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQCmCAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yABlzd2FwQ29udHJhY3RBZGRyZXNzT3JGYWlsCQETdmFsdWVPckVycm9yTWVzc2FnZQIFGXN3YXBDb250cmFjdEFkZHJlc3NPcHRpb24JAQd3cmFwRXJyAQIdaW52YWxpZCBzd2FwIGNvbnRyYWN0IGFkZHJlc3MBEGtleUNvbmZpZ0FkZHJlc3MAAgolc19fY29uZmlnARJrZXlDaGlsZHJlbkFkZHJlc3MAAhFjb250cmFjdF9jaGlsZHJlbgEWa2V5Vm90aW5nUmVzdWx0QWRkcmVzcwACFmNvbnRyYWN0X3ZvdGluZ19yZXN1bHQBGWtleVByb3Bvc2FsQWxsb3dCcm9hZGNhc3QCB2FkZHJlc3MEdHhJZAkArAICCQCsAgIJAKwCAgIZcHJvcG9zYWxfYWxsb3dfYnJvYWRjYXN0XwkApQgBBQdhZGRyZXNzAgFfCQDYBAEFBHR4SWQBEWtleUludmVzdGVkQnlVc2VyAgxjaGlsZEFkZHJlc3MLdXNlckFkZHJlc3MJALkJAgkAzAgCAghpbnZlc3RvcgkAzAgCCQClCAEFDGNoaWxkQWRkcmVzcwkAzAgCCQClCAEFC3VzZXJBZGRyZXNzBQNuaWwCAV8AE2NvbmZpZ0FkZHJlc3NPcHRpb24EByRtYXRjaDAJAJ0IAgUEdGhpcwkBEGtleUNvbmZpZ0FkZHJlc3MAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkApggBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgATY29uZmlnQWRkcmVzc09yRmFpbAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBRNjb25maWdBZGRyZXNzT3B0aW9uCQEHd3JhcEVycgECFmludmFsaWQgY29uZmlnIGFkZHJlc3MAGXZvdGluZ1Jlc3VsdEFkZHJlc3NPcHRpb24EByRtYXRjaDAFE2NvbmZpZ0FkZHJlc3NPcHRpb24DCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQBYQUHJG1hdGNoMAQHJG1hdGNoMQkAnQgCBQFhCQEWa2V5Vm90aW5nUmVzdWx0QWRkcmVzcwADCQABAgUHJG1hdGNoMQIGU3RyaW5nBAFzBQckbWF0Y2gxCQCmCAEFAXMDCQABAgUHJG1hdGNoMQIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgAZdm90aW5nUmVzdWx0QWRkcmVzc09yRmFpbAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBRl2b3RpbmdSZXN1bHRBZGRyZXNzT3B0aW9uCQEHd3JhcEVycgECHWludmFsaWQgdm90aW5nIHJlc3VsdCBhZGRyZXNzABVjaGlsZHJlbkFkZHJlc3NPcHRpb24EByRtYXRjaDAFE2NvbmZpZ0FkZHJlc3NPcHRpb24DCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQBYQUHJG1hdGNoMAQHJG1hdGNoMQkAnQgCBQFhCQESa2V5Q2hpbGRyZW5BZGRyZXNzAAMJAAECBQckbWF0Y2gxAgZTdHJpbmcEAXMFByRtYXRjaDEJAKYIAQUBcwMJAAECBQckbWF0Y2gxAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yABVjaGlsZHJlbkFkZHJlc3NPckZhaWwJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgUVY2hpbGRyZW5BZGRyZXNzT3B0aW9uCQEHd3JhcEVycgECGGludmFsaWQgY2hpbGRyZW4gYWRkcmVzcwAPbHBBc3NldElkT3B0aW9uBAckbWF0Y2gwCQCdCAIFBHRoaXMJAQxrZXlMcEFzc2V0SWQAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgAPbHBBc3NldElkT3JGYWlsCQETdmFsdWVPckVycm9yTWVzc2FnZQIFD2xwQXNzZXRJZE9wdGlvbgkBB3dyYXBFcnIBAhFpbnZhbGlkIGxwQXNzZXRJZAELb25seUFkZHJlc3MCAWkHYWRkcmVzcwMJAAACCAUBaQZjYWxsZXIFB2FkZHJlc3MGCQEIdGhyb3dFcnIBAhFwZXJtaXNzaW9uIGRlbmllZAEIb25seVRoaXMBAWkJAQtvbmx5QWRkcmVzcwIFAWkFBHRoaXMBDm9ubHlDYWxjdWxhdG9yAQFpCQELb25seUFkZHJlc3MCBQFpBRdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbBoBaQELc3RyaW5nRW50cnkCA2tleQN2YWwDCQEOb25seUNhbGN1bGF0b3IBBQFpCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUDa2V5BQN2YWwFA25pbAUDa2V5CQCUCgIFA25pbAUEdW5pdAFpAQxpbnRlZ2VyRW50cnkCA2tleQN2YWwDCQEOb25seUNhbGN1bGF0b3IBBQFpCQCUCgIJAMwIAgkBDEludGVnZXJFbnRyeQIFA2tleQUDdmFsBQNuaWwFA2tleQkAlAoCBQNuaWwFBHVuaXQBaQEMYm9vbGVhbkVudHJ5AgNrZXkDdmFsAwkBDm9ubHlDYWxjdWxhdG9yAQUBaQkAlAoCCQDMCAIJAQxCb29sZWFuRW50cnkCBQNrZXkFA3ZhbAUDbmlsBQNrZXkJAJQKAgUDbmlsBQR1bml0AWkBC2JpbmFyeUVudHJ5AgNrZXkDdmFsAwkBDm9ubHlDYWxjdWxhdG9yAQUBaQkAlAoCCQDMCAIJAQtCaW5hcnlFbnRyeQIFA2tleQUDdmFsBQNuaWwFA2tleQkAlAoCBQNuaWwFBHVuaXQBaQELZGVsZXRlRW50cnkBA2tleQMJAQ5vbmx5Q2FsY3VsYXRvcgEFAWkJAJQKAgkAzAgCCQELRGVsZXRlRW50cnkBBQNrZXkFA25pbAUDa2V5CQCUCgIFA25pbAUEdW5pdAFpAQdyZWlzc3VlAQZhbW91bnQDCQEOb25seUNhbGN1bGF0b3IBBQFpCQCUCgIJAMwIAgkBB1JlaXNzdWUDBQ9scEFzc2V0SWRPckZhaWwFBmFtb3VudAYFA25pbAUGYW1vdW50CQCUCgIFA25pbAUEdW5pdAFpAQRidXJuAQZhbW91bnQDCQEOb25seUNhbGN1bGF0b3IBBQFpCQCUCgIJAMwIAgkBBEJ1cm4CBQ9scEFzc2V0SWRPckZhaWwFBmFtb3VudAUDbmlsBQZhbW91bnQJAJQKAgUDbmlsBQR1bml0AWkBDXRyYW5zZmVyQXNzZXQDDnJlY2lwaWVudEJ5dGVzBmFtb3VudAdhc3NldElkAwkBDm9ubHlDYWxjdWxhdG9yAQUBaQkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQUOcmVjaXBpZW50Qnl0ZXMFBmFtb3VudAUHYXNzZXRJZAUDbmlsBQZhbW91bnQJAJQKAgUDbmlsBQR1bml0AWkBDnRyYW5zZmVyQXNzZXRzAw5yZWNpcGllbnRCeXRlcwphc3NldHNMaXN0C2Ftb3VudHNMaXN0AwkBDm9ubHlDYWxjdWxhdG9yAQUBaQoBDmFkZE5ld1RyYW5zZmVyAgNhY2MLbmV4dEFzc2V0SWQECyR0MDgxMTg4MTQyBQNhY2MECXRyYW5zZmVycwgFCyR0MDgxMTg4MTQyAl8xBAFqCAULJHQwODExODgxNDICXzIEC25ld1RyYW5zZmVyCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEFDnJlY2lwaWVudEJ5dGVzCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULYW1vdW50c0xpc3QFAWoJAQ9zdHJpbmdUb0Fzc2V0SWQBCQCRAwIFCmFzc2V0c0xpc3QFAWoEEHVwZGF0ZWRUcmFuc2ZlcnMJAM0IAgUJdHJhbnNmZXJzBQtuZXdUcmFuc2ZlcgkAlAoCBRB1cGRhdGVkVHJhbnNmZXJzCQBkAgUBagABBAskdDA4NDAyODQ4MwoAAiRsBQphc3NldHNMaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEOYWRkTmV3VHJhbnNmZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoED2Fzc2V0c1RyYW5zZmVycwgFCyR0MDg0MDI4NDgzAl8xBApfbGFzdEluZGV4CAULJHQwODQwMjg0ODMCXzIJAJQKAgUPYXNzZXRzVHJhbnNmZXJzBQR1bml0CQCUCgIFA25pbAUEdW5pdAFpAQ10cmFuc2ZlcldhdmVzAg5yZWNpcGllbnRCeXRlcwZhbW91bnQDCQEOb25seUNhbGN1bGF0b3IBBQFpCQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBBQ5yZWNpcGllbnRCeXRlcwUGYW1vdW50BQR1bml0BQNuaWwFBmFtb3VudAkAlAoCBQNuaWwFBHVuaXQBaQEZdHJhbnNmZXJGcm9tUHJveHlUcmVhc3VyeQIOcmVjaXBpZW50Qnl0ZXMNcmV3YXJkc0Ftb3VudAMJAQ5vbmx5Q2FsY3VsYXRvcgEFAWkJAJQKAgUDbmlsCQD8BwQFGnByb3h5VHJlYXN1cnlBZGRyZXNzT3JGYWlsAg10cmFuc2ZlcldhdmVzCQDMCAIFDnJlY2lwaWVudEJ5dGVzCQDMCAIFDXJld2FyZHNBbW91bnQFA25pbAUDbmlsCQCUCgIFA25pbAUEdW5pdAFpAQhmaW5hbGl6ZQQTZG9uYXRpb25QYXJ0SW5XYXZlcw1scFBhcnRJbldhdmVzEGNsYWltUGFydEluV2F2ZXMVcG93ZXJTdGFrZVBhcnRJbldhdmVzCQCUCgIFA25pbAkA/QcEBRdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbAIIZmluYWxpemUJAMwIAggIBQFpBmNhbGxlcgVieXRlcwkAzAgCBRNkb25hdGlvblBhcnRJbldhdmVzCQDMCAIFDWxwUGFydEluV2F2ZXMJAMwIAgUQY2xhaW1QYXJ0SW5XYXZlcwkAzAgCBRVwb3dlclN0YWtlUGFydEluV2F2ZXMFA25pbAgFAWkIcGF5bWVudHMBaQEQZmluYWxpemVSRUFET05MWQQTZG9uYXRpb25QYXJ0SW5XYXZlcw1scFBhcnRJbldhdmVzEGNsYWltUGFydEluV2F2ZXMVcG93ZXJTdGFrZVBhcnRJbldhdmVzCQCUCgIFA25pbAkA/QcEBRdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbAIQZmluYWxpemVSRUFET05MWQkAzAgCBRNkb25hdGlvblBhcnRJbldhdmVzCQDMCAIFDWxwUGFydEluV2F2ZXMJAMwIAgUQY2xhaW1QYXJ0SW5XYXZlcwkAzAgCBRVwb3dlclN0YWtlUGFydEluV2F2ZXMFA25pbAUDbmlsAWkBE3Jld2FyZFNwbGl0UkVBRE9OTFkACQCUCgIFA25pbAkA/QcEBRdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbAITcmV3YXJkU3BsaXRSRUFET05MWQUDbmlsBQNuaWwBaQEHY2xhaW1MUAAJAJQKAgUDbmlsCQD9BwQFF2NhbGN1bGF0b3JBZGRyZXNzT3JGYWlsAgdjbGFpbUxQCQDMCAIICAUBaQZjYWxsZXIFYnl0ZXMFA25pbAgFAWkIcGF5bWVudHMBaQEPY2xhaW1Db2xsYXRlcmFsAQd0eElkU3RyCQCUCgIFA25pbAkA/QcEBRdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbAIPY2xhaW1Db2xsYXRlcmFsCQDMCAIICAUBaQZjYWxsZXIFYnl0ZXMJAMwIAgUHdHhJZFN0cgUDbmlsCAUBaQhwYXltZW50cwFpARNjbGFpbUNvbGxhdGVyYWxCdWxrAQV0eElkcwkAlAoCBQNuaWwJAP0HBAUXY2FsY3VsYXRvckFkZHJlc3NPckZhaWwCE2NsYWltQ29sbGF0ZXJhbEJ1bGsJAMwIAggIBQFpBmNhbGxlcgVieXRlcwkAzAgCBQV0eElkcwUDbmlsCAUBaQhwYXltZW50cwFpAQZpbnZlc3QACQCUCgIFA25pbAkA/QcEBRdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbAIGaW52ZXN0CQDMCAIICAUBaQZjYWxsZXIFYnl0ZXMFA25pbAgFAWkIcGF5bWVudHMBaQEId2l0aGRyYXcACQCUCgIFA25pbAkA/QcEBRdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbAIId2l0aGRyYXcJAMwIAggIBQFpBmNhbGxlcgVieXRlcwUDbmlsCAUBaQhwYXltZW50cwFpAQ5jYW5jZWxXaXRoZHJhdwEHdHhJZFN0cgkAlAoCBQNuaWwJAP0HBAUXY2FsY3VsYXRvckFkZHJlc3NPckZhaWwCDmNhbmNlbFdpdGhkcmF3CQDMCAIICAUBaQZjYWxsZXIFYnl0ZXMJAMwIAgkA2QQBBQd0eElkU3RyBQNuaWwIBQFpCHBheW1lbnRzAWkBDXByb2Nlc3NCbG9ja3MACQCUCgIFA25pbAkA/QcEBRdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbAINcHJvY2Vzc0Jsb2NrcwkAzAgCCAgFAWkGY2FsbGVyBWJ5dGVzBQNuaWwIBQFpCHBheW1lbnRzAWkBF2NsYWltQ29sbGF0ZXJhbFJFQURPTkxZAgt1c2VyQWRkcmVzcwd0eElkU3RyCQCUCgIFA25pbAkA/QcEBRdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbAIXY2xhaW1Db2xsYXRlcmFsUkVBRE9OTFkJAMwIAgkA2QQBBQt1c2VyQWRkcmVzcwkAzAgCBQd0eElkU3RyBQNuaWwFA25pbAFpARtjbGFpbUNvbGxhdGVyYWxCdWxrUkVBRE9OTFkCC3VzZXJBZGRyZXNzBXR4SWRzCQCUCgIFA25pbAkA/QcEBRdjYWxjdWxhdG9yQWRkcmVzc09yRmFpbAIbY2xhaW1Db2xsYXRlcmFsQnVsa1JFQURPTkxZCQDMCAIJANkEAQULdXNlckFkZHJlc3MJAMwIAgUFdHhJZHMFA25pbAUDbmlsAWkBBHN3YXADB2Fzc2V0SWQOcGF5bWVudEFzc2V0SWQNcGF5bWVudEFtb3VudAQFY2hlY2sJAMwIAgkBDm9ubHlDYWxjdWxhdG9yAQUBaQUDbmlsAwkAAAIFBWNoZWNrBQVjaGVjawQMcGF5bWVudEFzc2V0AwkAAAIFDnBheW1lbnRBc3NldElkAgVXQVZFUwUEdW5pdAkA2QQBBQ5wYXltZW50QXNzZXRJZAQQaW5pdEFzc2V0QmFsYW5jZQMJAAACBQdhc3NldElkAgVXQVZFUwgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkA2QQBBQdhc3NldElkAwkAAAIFEGluaXRBc3NldEJhbGFuY2UFEGluaXRBc3NldEJhbGFuY2UECnN3YXBJbnZva2UJAPwHBAUZc3dhcENvbnRyYWN0QWRkcmVzc09yRmFpbAIEc3dhcAkAzAgCAAAJAMwIAgUHYXNzZXRJZAkAzAgCCQClCAEFBHRoaXMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUMcGF5bWVudEFzc2V0BQ1wYXltZW50QW1vdW50BQNuaWwDCQAAAgUKc3dhcEludm9rZQUKc3dhcEludm9rZQQPbmV3QXNzZXRCYWxhbmNlAwkAAAIFB2Fzc2V0SWQCBVdBVkVTCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQDZBAEFB2Fzc2V0SWQDCQAAAgUPbmV3QXNzZXRCYWxhbmNlBQ9uZXdBc3NldEJhbGFuY2UJAJQKAgUDbmlsCQBlAgUPbmV3QXNzZXRCYWxhbmNlBRBpbml0QXNzZXRCYWxhbmNlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnBvd2VyU3Rha2UDDnJlY2lwaWVudEJ5dGVzDGFzc2V0SWRCeXRlcwZhbW91bnQDCQEOb25seUNhbGN1bGF0b3IBBQFpCQCUCgIFA25pbAkA/AcEBRpwb3dlckNvbnRyYWN0QWRkcmVzc09yRmFpbAIOY29tbWl0Rm9yTWluZXIJAMwIAgkApQgBCQEHQWRkcmVzcwEFDnJlY2lwaWVudEJ5dGVzBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFDGFzc2V0SWRCeXRlcwUGYW1vdW50BQNuaWwJAJQKAgUDbmlsBQR1bml0AWkBC3ZvdGVGb3JUeElkAQR0eElkBBNjYWxsZXJBZGRyZXNzU3RyaW5nCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMECWtleVByZWZpeAkBGGtleUFsbG93ZWRUeElkVm90ZVByZWZpeAEFBHR4SWQEBnJlc3VsdAkAzAgCCQELU3RyaW5nRW50cnkCCQEOa2V5QWxsb3dlZFR4SWQABQR0eElkBQNuaWwEEWFsbG93ZWRUeElkT3B0aW9uCQCdCAIFBHRoaXMJAQ5rZXlBbGxvd2VkVHhJZAAEA2VycgkAzAgCAwkAAAIJAMgBAQkA2QQBBQR0eElkBRFUWElEX0JZVEVTX0xFTkdUSAYJAQh0aHJvd0VycgEJAKwCAgUEdHhJZAISIGlzIG5vdCB2YWxpZCB0eElkCQDMCAIDAwkAAAIFEWFsbG93ZWRUeElkT3B0aW9uBQR1bml0BgkBAiE9AgkBBXZhbHVlAQURYWxsb3dlZFR4SWRPcHRpb24FBHR4SWQGCQEIdGhyb3dFcnIBCQCsAgIFBHR4SWQCEyBpcyBhbHJlYWR5IGFsbG93ZWQFA25pbAMJAAACBQNlcnIFA2VycgkBDHZvdGVJTlRFUk5BTAQFE2NhbGxlckFkZHJlc3NTdHJpbmcFCWtleVByZWZpeAUGUVVPUlVNBQZyZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkABApieVByb3Bvc2FsBAckbWF0Y2gwBRl2b3RpbmdSZXN1bHRBZGRyZXNzT3B0aW9uAwkAAQIFByRtYXRjaDACB0FkZHJlc3MED3Byb3Bvc2FsQWRkcmVzcwUHJG1hdGNoMAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQ9wcm9wb3NhbEFkZHJlc3MJARlrZXlQcm9wb3NhbEFsbG93QnJvYWRjYXN0AgUEdGhpcwgFAnR4AmlkBwcECGJ5QWRtaW5zCQAAAggFAnR4AmlkCQDZBAEJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleUFsbG93ZWRUeElkAAIABAdieU93bmVyAwkAZwIJAJADAQkBDWdldEFkbWluc0xpc3QABQZRVU9SVU0HCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5AwMFCmJ5UHJvcG9zYWwGBQhieUFkbWlucwYFB2J5T3duZXJdPFs0",
    "chainId": 84,
    "height": 2715972,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: ysGhs6RRNT7Pviy1geShijGAp1tUAo77ZChyUg33sxx
Next: none

Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 7 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let SEP = "__"
5 5  
6 6  let WAVES = "WAVES"
7 7  
8 8  let contractFilename = "factory.ride"
9 9  
10 10  func wrapErr (s) = ((contractFilename + ": ") + s)
11 11  
12 12  
13 13  func throwErr (s) = throw(wrapErr(s))
14 14  
15 15  
16 16  func stringToAssetId (s) = if ((s == WAVES))
17 17      then unit
18 18      else fromBase58String(s)
19 19  
20 20  
21 21  let ADMIN_LIST_SIZE = 5
22 22  
23 23  let QUORUM = 3
24 24  
25 25  let TXID_BYTES_LENGTH = 32
26 26  
27 27  func keyAllowedTxIdVotePrefix (txId) = makeString(["%s%s%s", "allowTxId", txId], SEP)
28 28  
29 29  
30 30  func keyFullAdminVote (prefix,adminAddress) = makeString([prefix, adminAddress], SEP)
31 31  
32 32  
33 33  func keyAdminAddressList () = makeString(["%s", "adminAddressList"], SEP)
34 34  
35 35  
36 36  func keyAllowedTxId () = makeString(["%s", "txId"], SEP)
37 37  
38 38  
39 39  func getAdminVote (prefix,admin) = {
40 40      let voteKey = keyFullAdminVote(prefix, admin)
41 41      valueOrElse(getInteger(voteKey), 0)
42 42      }
43 43  
44 44  
45 45  func getAdminsList () = match getString(this, keyAdminAddressList()) {
46 46      case s: String => 
47 47          split(s, SEP)
48 48      case _ => 
49 49          nil
50 50  }
51 51  
52 52  
53 53  func isInAdminList (address) = containsElement(getAdminsList(), address)
54 54  
55 55  
56 56  func genVotesKeysHelper (a,adminAddress) = {
57 57      let $t013751399 = a
58 58      let result = $t013751399._1
59 59      let prefix = $t013751399._2
60 60      $Tuple2((result :+ keyFullAdminVote(prefix, adminAddress)), prefix)
61 61      }
62 62  
63 63  
64 64  func genVotesKeys (keyPrefix) = {
65 65      let adminList = keyAdminAddressList()
66 66      let $t015461630 = {
67 67          let $l = getAdminsList()
68 68          let $s = size($l)
69 69          let $acc0 = $Tuple2(nil, keyPrefix)
70 70          func $f0_1 ($a,$i) =         if (($i >= $s))
71 71              then $a
72 72              else genVotesKeysHelper($a, $l[$i])
73 73  
74 74          func $f0_2 ($a,$i) =         if (($i >= $s))
75 75              then $a
76 76              else throw("List size exceeds 5")
77 77  
78 78          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
79 79          }
80 80      let result = $t015461630._1
81 81      let prefix = $t015461630._2
82 82      result
83 83      }
84 84  
85 85  
86 86  func countVotesHelper (result,voteKey) = (result + valueOrElse(getInteger(voteKey), 0))
87 87  
88 88  
89 89  func countVotes (prefix) = {
90 90      let votes = genVotesKeys(prefix)
91 91      let $l = votes
92 92      let $s = size($l)
93 93      let $acc0 = 0
94 94      func $f0_1 ($a,$i) =     if (($i >= $s))
95 95          then $a
96 96          else countVotesHelper($a, $l[$i])
97 97  
98 98      func $f0_2 ($a,$i) =     if (($i >= $s))
99 99          then $a
100 100          else throw("List size exceeds 5")
101 101  
102 102      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
103 103      }
104 104  
105 105  
106 106  func clearVotesHelper (result,key) = (result :+ DeleteEntry(key))
107 107  
108 108  
109 109  func getClearVoteEntries (prefix) = {
110 110      let votes = genVotesKeys(prefix)
111 111      let $l = votes
112 112      let $s = size($l)
113 113      let $acc0 = nil
114 114      func $f0_1 ($a,$i) =     if (($i >= $s))
115 115          then $a
116 116          else clearVotesHelper($a, $l[$i])
117 117  
118 118      func $f0_2 ($a,$i) =     if (($i >= $s))
119 119          then $a
120 120          else throw("List size exceeds 5")
121 121  
122 122      $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
123 123      }
124 124  
125 125  
126 126  func voteINTERNAL (callerAddressString,keyPrefix,minVotes,voteResult) = {
127 127      let voteKey = keyFullAdminVote(keyPrefix, callerAddressString)
128 128      let adminCurrentVote = getAdminVote(keyPrefix, callerAddressString)
129 129      let err = if (!(isInAdminList(callerAddressString)))
130 130          then throwErr((("Address: " + callerAddressString) + " not in Admin list"))
131 131          else if ((adminCurrentVote == 1))
132 132              then throwErr((voteKey + " you already voted"))
133 133              else unit
134 134      if ((err == err))
135 135          then {
136 136              let votes = countVotes(keyPrefix)
137 137              if (((votes + 1) >= minVotes))
138 138                  then {
139 139                      let clearVoteEntries = getClearVoteEntries(keyPrefix)
140 140                      (clearVoteEntries ++ voteResult)
141 141                      }
142 142                  else [IntegerEntry(voteKey, 1)]
143 143              }
144 144          else throw("Strict value is not equal to itself.")
145 145      }
146 146  
147 147  
148 148  func keyCalculatorAddress () = "%s__calculator"
149 149  
150 150  
151 151  func keyProxyTreasuryAddress () = "%s__proxyTreasury"
152 152  
153 153  
154 154  func keyPowerContractAddress () = "%s__powerContract"
155 155  
156 156  
157 157  func keySwapContractAddress () = "%s__swapContract"
158 158  
159 159  
160 160  func keyChildAddress () = "%s__child"
161 161  
162 162  
163 163  func keyBlockProcessingReward () = "%s__blockProcessingReward"
164 164  
165 165  
166 166  func keyNextBlockToProcess () = "%s__nextBlockToProcess"
167 167  
168 168  
169 169  func keyLpAssetId () = "%s__lpAssetId"
170 170  
171 171  
172 172  let calculatorAddressOption = match getString(this, keyCalculatorAddress()) {
173 173      case s: String => 
174 174          addressFromString(s)
175 175      case _: Unit => 
176 176          unit
177 177      case _ => 
178 178          throw("Match error")
179 179  }
180 180  
181 181  let calculatorAddressOrFail = valueOrErrorMessage(calculatorAddressOption, wrapErr("invalid calculator address"))
182 182  
183 183  let proxyTreasuryAddressOption = match getString(this, keyProxyTreasuryAddress()) {
184 184      case s: String => 
185 185          addressFromString(s)
186 186      case _: Unit => 
187 187          unit
188 188      case _ => 
189 189          throw("Match error")
190 190  }
191 191  
192 192  let proxyTreasuryAddressOrFail = valueOrErrorMessage(proxyTreasuryAddressOption, wrapErr("invalid proxy treasury address"))
193 193  
194 194  let powerContractAddressOption = match getString(this, keyPowerContractAddress()) {
195 195      case s: String => 
196 196          addressFromString(s)
197 197      case _: Unit => 
198 198          unit
199 199      case _ => 
200 200          throw("Match error")
201 201  }
202 202  
203 203  let powerContractAddressOrFail = valueOrErrorMessage(powerContractAddressOption, wrapErr("invalid power contract address"))
204 204  
205 205  let swapContractAddressOption = match getString(this, keySwapContractAddress()) {
206 206      case s: String => 
207 207          addressFromString(s)
208 208      case _: Unit => 
209 209          unit
210 210      case _ => 
211 211          throw("Match error")
212 212  }
213 213  
214 214  let swapContractAddressOrFail = valueOrErrorMessage(swapContractAddressOption, wrapErr("invalid swap contract address"))
215 215  
216 216  func keyConfigAddress () = "%s__config"
217 217  
218 218  
219 219  func keyChildrenAddress () = "contract_children"
220 220  
221 221  
222 222  func keyVotingResultAddress () = "contract_voting_result"
223 223  
224 224  
225 225  func keyProposalAllowBroadcast (address,txId) = ((("proposal_allow_broadcast_" + toString(address)) + "_") + toBase58String(txId))
226 226  
227 227  
228 228  func keyInvestedByUser (childAddress,userAddress) = makeString(["investor", toString(childAddress), toString(userAddress)], "_")
229 229  
230 230  
231 231  let configAddressOption = match getString(this, keyConfigAddress()) {
232 232      case s: String => 
233 233          addressFromString(s)
234 234      case _: Unit => 
235 235          unit
236 236      case _ => 
237 237          throw("Match error")
238 238  }
239 239  
240 240  let configAddressOrFail = valueOrErrorMessage(configAddressOption, wrapErr("invalid config address"))
241 241  
242 242  let votingResultAddressOption = match configAddressOption {
243 243      case a: Address => 
244 244          match getString(a, keyVotingResultAddress()) {
245 245              case s: String => 
246 246                  addressFromString(s)
247 247              case _: Unit => 
248 248                  unit
249 249              case _ => 
250 250                  throw("Match error")
251 251          }
252 252      case _: Unit => 
253 253          unit
254 254      case _ => 
255 255          throw("Match error")
256 256  }
257 257  
258 258  let votingResultAddressOrFail = valueOrErrorMessage(votingResultAddressOption, wrapErr("invalid voting result address"))
259 259  
260 260  let childrenAddressOption = match configAddressOption {
261 261      case a: Address => 
262 262          match getString(a, keyChildrenAddress()) {
263 263              case s: String => 
264 264                  addressFromString(s)
265 265              case _: Unit => 
266 266                  unit
267 267              case _ => 
268 268                  throw("Match error")
269 269          }
270 270      case _: Unit => 
271 271          unit
272 272      case _ => 
273 273          throw("Match error")
274 274  }
275 275  
276 276  let childrenAddressOrFail = valueOrErrorMessage(childrenAddressOption, wrapErr("invalid children address"))
277 277  
278 278  let lpAssetIdOption = match getString(this, keyLpAssetId()) {
279 279      case s: String => 
280 280          fromBase58String(s)
281 281      case _: Unit => 
282 282          unit
283 283      case _ => 
284 284          throw("Match error")
285 285  }
286 286  
287 287  let lpAssetIdOrFail = valueOrErrorMessage(lpAssetIdOption, wrapErr("invalid lpAssetId"))
288 288  
289 289  func onlyAddress (i,address) = if ((i.caller == address))
290 290      then true
291 291      else throwErr("permission denied")
292 292  
293 293  
294 294  func onlyThis (i) = onlyAddress(i, this)
295 295  
296 296  
297 297  func onlyCalculator (i) = onlyAddress(i, calculatorAddressOrFail)
298 298  
299 299  
300 300  @Callable(i)
301 301  func stringEntry (key,val) = if (onlyCalculator(i))
302 302      then $Tuple2([StringEntry(key, val)], key)
303 303      else $Tuple2(nil, unit)
304 304  
305 305  
306 306  
307 307  @Callable(i)
308 308  func integerEntry (key,val) = if (onlyCalculator(i))
309 309      then $Tuple2([IntegerEntry(key, val)], key)
310 310      else $Tuple2(nil, unit)
311 311  
312 312  
313 313  
314 314  @Callable(i)
315 315  func booleanEntry (key,val) = if (onlyCalculator(i))
316 316      then $Tuple2([BooleanEntry(key, val)], key)
317 317      else $Tuple2(nil, unit)
318 318  
319 319  
320 320  
321 321  @Callable(i)
322 322  func binaryEntry (key,val) = if (onlyCalculator(i))
323 323      then $Tuple2([BinaryEntry(key, val)], key)
324 324      else $Tuple2(nil, unit)
325 325  
326 326  
327 327  
328 328  @Callable(i)
329 329  func deleteEntry (key) = if (onlyCalculator(i))
330 330      then $Tuple2([DeleteEntry(key)], key)
331 331      else $Tuple2(nil, unit)
332 332  
333 333  
334 334  
335 335  @Callable(i)
336 336  func reissue (amount) = if (onlyCalculator(i))
337 337      then $Tuple2([Reissue(lpAssetIdOrFail, amount, true)], amount)
338 338      else $Tuple2(nil, unit)
339 339  
340 340  
341 341  
342 342  @Callable(i)
343 343  func burn (amount) = if (onlyCalculator(i))
344 344      then $Tuple2([Burn(lpAssetIdOrFail, amount)], amount)
345 345      else $Tuple2(nil, unit)
346 346  
347 347  
348 348  
349 349  @Callable(i)
350 350  func transferAsset (recipientBytes,amount,assetId) = if (onlyCalculator(i))
351 351      then $Tuple2([ScriptTransfer(Address(recipientBytes), amount, assetId)], amount)
352 352      else $Tuple2(nil, unit)
353 353  
354 354  
355 355  
356 356  @Callable(i)
357 357  func transferAssets (recipientBytes,assetsList,amountsList) = if (onlyCalculator(i))
358 358      then {
359 359          func addNewTransfer (acc,nextAssetId) =         {
360 360              let $t081188142 = acc
361 361              let transfers = $t081188142._1
362 362              let j = $t081188142._2
363 363              let newTransfer = ScriptTransfer(Address(recipientBytes), parseIntValue(amountsList[j]), stringToAssetId(assetsList[j]))
364 364              let updatedTransfers = (transfers :+ newTransfer)
365 365              $Tuple2(updatedTransfers, (j + 1))
366 366              }
367 367  
368 368          let $t084028483 = {
369 369              let $l = assetsList
370 370              let $s = size($l)
371 371              let $acc0 = $Tuple2(nil, 0)
372 372              func $f0_1 ($a,$i) =             if (($i >= $s))
373 373                  then $a
374 374                  else addNewTransfer($a, $l[$i])
375 375  
376 376              func $f0_2 ($a,$i) =             if (($i >= $s))
377 377                  then $a
378 378                  else throw("List size exceeds 10")
379 379  
380 380              $f0_2($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)
381 381              }
382 382          let assetsTransfers = $t084028483._1
383 383          let _lastIndex = $t084028483._2
384 384          $Tuple2(assetsTransfers, unit)
385 385          }
386 386      else $Tuple2(nil, unit)
387 387  
388 388  
389 389  
390 390  @Callable(i)
391 391  func transferWaves (recipientBytes,amount) = if (onlyCalculator(i))
392 392      then $Tuple2([ScriptTransfer(Address(recipientBytes), amount, unit)], amount)
393 393      else $Tuple2(nil, unit)
394 394  
395 395  
396 396  
397 397  @Callable(i)
398 398  func transferFromProxyTreasury (recipientBytes,rewardsAmount) = if (onlyCalculator(i))
399 399      then $Tuple2(nil, invoke(proxyTreasuryAddressOrFail, "transferWaves", [recipientBytes, rewardsAmount], nil))
400 400      else $Tuple2(nil, unit)
401 401  
402 402  
403 403  
404 404  @Callable(i)
405 405  func finalize (donationPartInWaves,lpPartInWaves,claimPartInWaves,powerStakePartInWaves) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "finalize", [i.caller.bytes, donationPartInWaves, lpPartInWaves, claimPartInWaves, powerStakePartInWaves], i.payments))
406 406  
407 407  
408 408  
409 409  @Callable(i)
410 410  func finalizeREADONLY (donationPartInWaves,lpPartInWaves,claimPartInWaves,powerStakePartInWaves) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "finalizeREADONLY", [donationPartInWaves, lpPartInWaves, claimPartInWaves, powerStakePartInWaves], nil))
411 411  
412 412  
413 413  
414 414  @Callable(i)
415 415  func rewardSplitREADONLY () = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "rewardSplitREADONLY", nil, nil))
416 416  
417 417  
418 418  
419 419  @Callable(i)
420 420  func claimLP () = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "claimLP", [i.caller.bytes], i.payments))
421 421  
422 422  
423 423  
424 424  @Callable(i)
425 425  func claimCollateral (txIdStr) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "claimCollateral", [i.caller.bytes, txIdStr], i.payments))
426 426  
427 427  
428 428  
429 429  @Callable(i)
430 430  func claimCollateralBulk (txIds) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "claimCollateralBulk", [i.caller.bytes, txIds], i.payments))
431 431  
432 432  
433 433  
434 434  @Callable(i)
435 435  func invest () = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "invest", [i.caller.bytes], i.payments))
436 436  
437 437  
438 438  
439 439  @Callable(i)
440 440  func withdraw () = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "withdraw", [i.caller.bytes], i.payments))
441 441  
442 442  
443 443  
444 444  @Callable(i)
445 445  func cancelWithdraw (txIdStr) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "cancelWithdraw", [i.caller.bytes, fromBase58String(txIdStr)], i.payments))
446 446  
447 447  
448 448  
449 449  @Callable(i)
450 450  func processBlocks () = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "processBlocks", [i.caller.bytes], i.payments))
451 451  
452 452  
453 453  
454 454  @Callable(i)
455 455  func claimCollateralREADONLY (userAddress,txIdStr) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "claimCollateralREADONLY", [fromBase58String(userAddress), txIdStr], nil))
456 456  
457 457  
458 458  
459 459  @Callable(i)
460 460  func claimCollateralBulkREADONLY (userAddress,txIds) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "claimCollateralBulkREADONLY", [fromBase58String(userAddress), txIds], nil))
461 461  
462 462  
463 463  
464 464  @Callable(i)
465 465  func swap (assetId,paymentAssetId,paymentAmount) = {
466 466      let check = [onlyCalculator(i)]
467 467      if ((check == check))
468 468          then {
469 469              let paymentAsset = if ((paymentAssetId == "WAVES"))
470 470                  then unit
471 471                  else fromBase58String(paymentAssetId)
472 472              let initAssetBalance = if ((assetId == "WAVES"))
473 473                  then wavesBalance(this).available
474 474                  else assetBalance(this, fromBase58String(assetId))
475 475              if ((initAssetBalance == initAssetBalance))
476 476                  then {
477 477                      let swapInvoke = invoke(swapContractAddressOrFail, "swap", [0, assetId, toString(this)], [AttachedPayment(paymentAsset, paymentAmount)])
478 478                      if ((swapInvoke == swapInvoke))
479 479                          then {
480 480                              let newAssetBalance = if ((assetId == "WAVES"))
481 481                                  then wavesBalance(this).available
482 482                                  else assetBalance(this, fromBase58String(assetId))
483 483                              if ((newAssetBalance == newAssetBalance))
484 484                                  then $Tuple2(nil, (newAssetBalance - initAssetBalance))
485 485                                  else throw("Strict value is not equal to itself.")
486 486                              }
487 487                          else throw("Strict value is not equal to itself.")
488 488                      }
489 489                  else throw("Strict value is not equal to itself.")
490 490              }
491 491          else throw("Strict value is not equal to itself.")
492 492      }
493 493  
494 494  
495 495  
496 496  @Callable(i)
497 497  func powerStake (recipientBytes,assetIdBytes,amount) = if (onlyCalculator(i))
498 498      then $Tuple2(nil, invoke(powerContractAddressOrFail, "commitForMiner", [toString(Address(recipientBytes))], [AttachedPayment(assetIdBytes, amount)]))
499 499      else $Tuple2(nil, unit)
500 500  
501 501  
502 502  
503 503  @Callable(i)
504 504  func voteForTxId (txId) = {
505 505      let callerAddressString = toBase58String(i.caller.bytes)
506 506      let keyPrefix = keyAllowedTxIdVotePrefix(txId)
507 507      let result = [StringEntry(keyAllowedTxId(), txId)]
508 508      let allowedTxIdOption = getString(this, keyAllowedTxId())
509 509      let err = [if ((size(fromBase58String(txId)) == TXID_BYTES_LENGTH))
510 510          then true
511 511          else throwErr((txId + " is not valid txId")), if (if ((allowedTxIdOption == unit))
512 512          then true
513 513          else (value(allowedTxIdOption) != txId))
514 514          then true
515 515          else throwErr((txId + " is already allowed"))]
516 516      if ((err == err))
517 517          then voteINTERNAL(callerAddressString, keyPrefix, QUORUM, result)
518 518          else throw("Strict value is not equal to itself.")
519 519      }
520 520  
521 521  
522 522  @Verifier(tx)
523 523  func verify () = {
524 524      let byProposal =     match votingResultAddressOption {
525 525          case proposalAddress: Address => 
526 526              valueOrElse(getBoolean(proposalAddress, keyProposalAllowBroadcast(this, tx.id)), false)
527 527          case _ => 
528 528              false
529 529      }
530 530      let byAdmins = (tx.id == fromBase58String(valueOrElse(getString(this, keyAllowedTxId()), "")))
531 531      let byOwner = if ((size(getAdminsList()) >= QUORUM))
532 532          then false
533 533          else sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
534 534      if (if (byProposal)
535 535          then true
536 536          else byAdmins)
537 537          then true
538 538          else byOwner
539 539      }
540 540

Old	New	Differences
1	1	{-# STDLIB_VERSION 7 #-}
2	2	{-# SCRIPT_TYPE ACCOUNT #-}
3	3	{-# CONTENT_TYPE DAPP #-}
4	4	let SEP = "__"
5	5
6	6	let WAVES = "WAVES"
7	7
8	8	let contractFilename = "factory.ride"
9	9
10	10	func wrapErr (s) = ((contractFilename + ": ") + s)
11	11
12	12
13	13	func throwErr (s) = throw(wrapErr(s))
14	14
15	15
16	16	func stringToAssetId (s) = if ((s == WAVES))
17	17	then unit
18	18	else fromBase58String(s)
19	19
20	20
21	21	let ADMIN_LIST_SIZE = 5
22	22
23	23	let QUORUM = 3
24	24
25	25	let TXID_BYTES_LENGTH = 32
26	26
27	27	func keyAllowedTxIdVotePrefix (txId) = makeString(["%s%s%s", "allowTxId", txId], SEP)
28	28
29	29
30	30	func keyFullAdminVote (prefix,adminAddress) = makeString([prefix, adminAddress], SEP)
31	31
32	32
33	33	func keyAdminAddressList () = makeString(["%s", "adminAddressList"], SEP)
34	34
35	35
36	36	func keyAllowedTxId () = makeString(["%s", "txId"], SEP)
37	37
38	38
39	39	func getAdminVote (prefix,admin) = {
40	40	let voteKey = keyFullAdminVote(prefix, admin)
41	41	valueOrElse(getInteger(voteKey), 0)
42	42	}
43	43
44	44
45	45	func getAdminsList () = match getString(this, keyAdminAddressList()) {
46	46	case s: String =>
47	47	split(s, SEP)
48	48	case _ =>
49	49	nil
50	50	}
51	51
52	52
53	53	func isInAdminList (address) = containsElement(getAdminsList(), address)
54	54
55	55
56	56	func genVotesKeysHelper (a,adminAddress) = {
57	57	let $t013751399 = a
58	58	let result = $t013751399._1
59	59	let prefix = $t013751399._2
60	60	$Tuple2((result :+ keyFullAdminVote(prefix, adminAddress)), prefix)
61	61	}
62	62
63	63
64	64	func genVotesKeys (keyPrefix) = {
65	65	let adminList = keyAdminAddressList()
66	66	let $t015461630 = {
67	67	let $l = getAdminsList()
68	68	let $s = size($l)
69	69	let $acc0 = $Tuple2(nil, keyPrefix)
70	70	func $f0_1 ($a,$i) = if (($i >= $s))
71	71	then $a
72	72	else genVotesKeysHelper($a, $l[$i])
73	73
74	74	func $f0_2 ($a,$i) = if (($i >= $s))
75	75	then $a
76	76	else throw("List size exceeds 5")
77	77
78	78	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
79	79	}
80	80	let result = $t015461630._1
81	81	let prefix = $t015461630._2
82	82	result
83	83	}
84	84
85	85
86	86	func countVotesHelper (result,voteKey) = (result + valueOrElse(getInteger(voteKey), 0))
87	87
88	88
89	89	func countVotes (prefix) = {
90	90	let votes = genVotesKeys(prefix)
91	91	let $l = votes
92	92	let $s = size($l)
93	93	let $acc0 = 0
94	94	func $f0_1 ($a,$i) = if (($i >= $s))
95	95	then $a
96	96	else countVotesHelper($a, $l[$i])
97	97
98	98	func $f0_2 ($a,$i) = if (($i >= $s))
99	99	then $a
100	100	else throw("List size exceeds 5")
101	101
102	102	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
103	103	}
104	104
105	105
106	106	func clearVotesHelper (result,key) = (result :+ DeleteEntry(key))
107	107
108	108
109	109	func getClearVoteEntries (prefix) = {
110	110	let votes = genVotesKeys(prefix)
111	111	let $l = votes
112	112	let $s = size($l)
113	113	let $acc0 = nil
114	114	func $f0_1 ($a,$i) = if (($i >= $s))
115	115	then $a
116	116	else clearVotesHelper($a, $l[$i])
117	117
118	118	func $f0_2 ($a,$i) = if (($i >= $s))
119	119	then $a
120	120	else throw("List size exceeds 5")
121	121
122	122	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
123	123	}
124	124
125	125
126	126	func voteINTERNAL (callerAddressString,keyPrefix,minVotes,voteResult) = {
127	127	let voteKey = keyFullAdminVote(keyPrefix, callerAddressString)
128	128	let adminCurrentVote = getAdminVote(keyPrefix, callerAddressString)
129	129	let err = if (!(isInAdminList(callerAddressString)))
130	130	then throwErr((("Address: " + callerAddressString) + " not in Admin list"))
131	131	else if ((adminCurrentVote == 1))
132	132	then throwErr((voteKey + " you already voted"))
133	133	else unit
134	134	if ((err == err))
135	135	then {
136	136	let votes = countVotes(keyPrefix)
137	137	if (((votes + 1) >= minVotes))
138	138	then {
139	139	let clearVoteEntries = getClearVoteEntries(keyPrefix)
140	140	(clearVoteEntries ++ voteResult)
141	141	}
142	142	else [IntegerEntry(voteKey, 1)]
143	143	}
144	144	else throw("Strict value is not equal to itself.")
145	145	}
146	146
147	147
148	148	func keyCalculatorAddress () = "%s__calculator"
149	149
150	150
151	151	func keyProxyTreasuryAddress () = "%s__proxyTreasury"
152	152
153	153
154	154	func keyPowerContractAddress () = "%s__powerContract"
155	155
156	156
157	157	func keySwapContractAddress () = "%s__swapContract"
158	158
159	159
160	160	func keyChildAddress () = "%s__child"
161	161
162	162
163	163	func keyBlockProcessingReward () = "%s__blockProcessingReward"
164	164
165	165
166	166	func keyNextBlockToProcess () = "%s__nextBlockToProcess"
167	167
168	168
169	169	func keyLpAssetId () = "%s__lpAssetId"
170	170
171	171
172	172	let calculatorAddressOption = match getString(this, keyCalculatorAddress()) {
173	173	case s: String =>
174	174	addressFromString(s)
175	175	case _: Unit =>
176	176	unit
177	177	case _ =>
178	178	throw("Match error")
179	179	}
180	180
181	181	let calculatorAddressOrFail = valueOrErrorMessage(calculatorAddressOption, wrapErr("invalid calculator address"))
182	182
183	183	let proxyTreasuryAddressOption = match getString(this, keyProxyTreasuryAddress()) {
184	184	case s: String =>
185	185	addressFromString(s)
186	186	case _: Unit =>
187	187	unit
188	188	case _ =>
189	189	throw("Match error")
190	190	}
191	191
192	192	let proxyTreasuryAddressOrFail = valueOrErrorMessage(proxyTreasuryAddressOption, wrapErr("invalid proxy treasury address"))
193	193
194	194	let powerContractAddressOption = match getString(this, keyPowerContractAddress()) {
195	195	case s: String =>
196	196	addressFromString(s)
197	197	case _: Unit =>
198	198	unit
199	199	case _ =>
200	200	throw("Match error")
201	201	}
202	202
203	203	let powerContractAddressOrFail = valueOrErrorMessage(powerContractAddressOption, wrapErr("invalid power contract address"))
204	204
205	205	let swapContractAddressOption = match getString(this, keySwapContractAddress()) {
206	206	case s: String =>
207	207	addressFromString(s)
208	208	case _: Unit =>
209	209	unit
210	210	case _ =>
211	211	throw("Match error")
212	212	}
213	213
214	214	let swapContractAddressOrFail = valueOrErrorMessage(swapContractAddressOption, wrapErr("invalid swap contract address"))
215	215
216	216	func keyConfigAddress () = "%s__config"
217	217
218	218
219	219	func keyChildrenAddress () = "contract_children"
220	220
221	221
222	222	func keyVotingResultAddress () = "contract_voting_result"
223	223
224	224
225	225	func keyProposalAllowBroadcast (address,txId) = ((("proposal_allow_broadcast_" + toString(address)) + "_") + toBase58String(txId))
226	226
227	227
228	228	func keyInvestedByUser (childAddress,userAddress) = makeString(["investor", toString(childAddress), toString(userAddress)], "_")
229	229
230	230
231	231	let configAddressOption = match getString(this, keyConfigAddress()) {
232	232	case s: String =>
233	233	addressFromString(s)
234	234	case _: Unit =>
235	235	unit
236	236	case _ =>
237	237	throw("Match error")
238	238	}
239	239
240	240	let configAddressOrFail = valueOrErrorMessage(configAddressOption, wrapErr("invalid config address"))
241	241
242	242	let votingResultAddressOption = match configAddressOption {
243	243	case a: Address =>
244	244	match getString(a, keyVotingResultAddress()) {
245	245	case s: String =>
246	246	addressFromString(s)
247	247	case _: Unit =>
248	248	unit
249	249	case _ =>
250	250	throw("Match error")
251	251	}
252	252	case _: Unit =>
253	253	unit
254	254	case _ =>
255	255	throw("Match error")
256	256	}
257	257
258	258	let votingResultAddressOrFail = valueOrErrorMessage(votingResultAddressOption, wrapErr("invalid voting result address"))
259	259
260	260	let childrenAddressOption = match configAddressOption {
261	261	case a: Address =>
262	262	match getString(a, keyChildrenAddress()) {
263	263	case s: String =>
264	264	addressFromString(s)
265	265	case _: Unit =>
266	266	unit
267	267	case _ =>
268	268	throw("Match error")
269	269	}
270	270	case _: Unit =>
271	271	unit
272	272	case _ =>
273	273	throw("Match error")
274	274	}
275	275
276	276	let childrenAddressOrFail = valueOrErrorMessage(childrenAddressOption, wrapErr("invalid children address"))
277	277
278	278	let lpAssetIdOption = match getString(this, keyLpAssetId()) {
279	279	case s: String =>
280	280	fromBase58String(s)
281	281	case _: Unit =>
282	282	unit
283	283	case _ =>
284	284	throw("Match error")
285	285	}
286	286
287	287	let lpAssetIdOrFail = valueOrErrorMessage(lpAssetIdOption, wrapErr("invalid lpAssetId"))
288	288
289	289	func onlyAddress (i,address) = if ((i.caller == address))
290	290	then true
291	291	else throwErr("permission denied")
292	292
293	293
294	294	func onlyThis (i) = onlyAddress(i, this)
295	295
296	296
297	297	func onlyCalculator (i) = onlyAddress(i, calculatorAddressOrFail)
298	298
299	299
300	300	@Callable(i)
301	301	func stringEntry (key,val) = if (onlyCalculator(i))
302	302	then $Tuple2([StringEntry(key, val)], key)
303	303	else $Tuple2(nil, unit)
304	304
305	305
306	306
307	307	@Callable(i)
308	308	func integerEntry (key,val) = if (onlyCalculator(i))
309	309	then $Tuple2([IntegerEntry(key, val)], key)
310	310	else $Tuple2(nil, unit)
311	311
312	312
313	313
314	314	@Callable(i)
315	315	func booleanEntry (key,val) = if (onlyCalculator(i))
316	316	then $Tuple2([BooleanEntry(key, val)], key)
317	317	else $Tuple2(nil, unit)
318	318
319	319
320	320
321	321	@Callable(i)
322	322	func binaryEntry (key,val) = if (onlyCalculator(i))
323	323	then $Tuple2([BinaryEntry(key, val)], key)
324	324	else $Tuple2(nil, unit)
325	325
326	326
327	327
328	328	@Callable(i)
329	329	func deleteEntry (key) = if (onlyCalculator(i))
330	330	then $Tuple2([DeleteEntry(key)], key)
331	331	else $Tuple2(nil, unit)
332	332
333	333
334	334
335	335	@Callable(i)
336	336	func reissue (amount) = if (onlyCalculator(i))
337	337	then $Tuple2([Reissue(lpAssetIdOrFail, amount, true)], amount)
338	338	else $Tuple2(nil, unit)
339	339
340	340
341	341
342	342	@Callable(i)
343	343	func burn (amount) = if (onlyCalculator(i))
344	344	then $Tuple2([Burn(lpAssetIdOrFail, amount)], amount)
345	345	else $Tuple2(nil, unit)
346	346
347	347
348	348
349	349	@Callable(i)
350	350	func transferAsset (recipientBytes,amount,assetId) = if (onlyCalculator(i))
351	351	then $Tuple2([ScriptTransfer(Address(recipientBytes), amount, assetId)], amount)
352	352	else $Tuple2(nil, unit)
353	353
354	354
355	355
356	356	@Callable(i)
357	357	func transferAssets (recipientBytes,assetsList,amountsList) = if (onlyCalculator(i))
358	358	then {
359	359	func addNewTransfer (acc,nextAssetId) = {
360	360	let $t081188142 = acc
361	361	let transfers = $t081188142._1
362	362	let j = $t081188142._2
363	363	let newTransfer = ScriptTransfer(Address(recipientBytes), parseIntValue(amountsList[j]), stringToAssetId(assetsList[j]))
364	364	let updatedTransfers = (transfers :+ newTransfer)
365	365	$Tuple2(updatedTransfers, (j + 1))
366	366	}
367	367
368	368	let $t084028483 = {
369	369	let $l = assetsList
370	370	let $s = size($l)
371	371	let $acc0 = $Tuple2(nil, 0)
372	372	func $f0_1 ($a,$i) = if (($i >= $s))
373	373	then $a
374	374	else addNewTransfer($a, $l[$i])
375	375
376	376	func $f0_2 ($a,$i) = if (($i >= $s))
377	377	then $a
378	378	else throw("List size exceeds 10")
379	379
380	380	$f0_2($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)
381	381	}
382	382	let assetsTransfers = $t084028483._1
383	383	let _lastIndex = $t084028483._2
384	384	$Tuple2(assetsTransfers, unit)
385	385	}
386	386	else $Tuple2(nil, unit)
387	387
388	388
389	389
390	390	@Callable(i)
391	391	func transferWaves (recipientBytes,amount) = if (onlyCalculator(i))
392	392	then $Tuple2([ScriptTransfer(Address(recipientBytes), amount, unit)], amount)
393	393	else $Tuple2(nil, unit)
394	394
395	395
396	396
397	397	@Callable(i)
398	398	func transferFromProxyTreasury (recipientBytes,rewardsAmount) = if (onlyCalculator(i))
399	399	then $Tuple2(nil, invoke(proxyTreasuryAddressOrFail, "transferWaves", [recipientBytes, rewardsAmount], nil))
400	400	else $Tuple2(nil, unit)
401	401
402	402
403	403
404	404	@Callable(i)
405	405	func finalize (donationPartInWaves,lpPartInWaves,claimPartInWaves,powerStakePartInWaves) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "finalize", [i.caller.bytes, donationPartInWaves, lpPartInWaves, claimPartInWaves, powerStakePartInWaves], i.payments))
406	406
407	407
408	408
409	409	@Callable(i)
410	410	func finalizeREADONLY (donationPartInWaves,lpPartInWaves,claimPartInWaves,powerStakePartInWaves) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "finalizeREADONLY", [donationPartInWaves, lpPartInWaves, claimPartInWaves, powerStakePartInWaves], nil))
411	411
412	412
413	413
414	414	@Callable(i)
415	415	func rewardSplitREADONLY () = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "rewardSplitREADONLY", nil, nil))
416	416
417	417
418	418
419	419	@Callable(i)
420	420	func claimLP () = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "claimLP", [i.caller.bytes], i.payments))
421	421
422	422
423	423
424	424	@Callable(i)
425	425	func claimCollateral (txIdStr) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "claimCollateral", [i.caller.bytes, txIdStr], i.payments))
426	426
427	427
428	428
429	429	@Callable(i)
430	430	func claimCollateralBulk (txIds) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "claimCollateralBulk", [i.caller.bytes, txIds], i.payments))
431	431
432	432
433	433
434	434	@Callable(i)
435	435	func invest () = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "invest", [i.caller.bytes], i.payments))
436	436
437	437
438	438
439	439	@Callable(i)
440	440	func withdraw () = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "withdraw", [i.caller.bytes], i.payments))
441	441
442	442
443	443
444	444	@Callable(i)
445	445	func cancelWithdraw (txIdStr) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "cancelWithdraw", [i.caller.bytes, fromBase58String(txIdStr)], i.payments))
446	446
447	447
448	448
449	449	@Callable(i)
450	450	func processBlocks () = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "processBlocks", [i.caller.bytes], i.payments))
451	451
452	452
453	453
454	454	@Callable(i)
455	455	func claimCollateralREADONLY (userAddress,txIdStr) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "claimCollateralREADONLY", [fromBase58String(userAddress), txIdStr], nil))
456	456
457	457
458	458
459	459	@Callable(i)
460	460	func claimCollateralBulkREADONLY (userAddress,txIds) = $Tuple2(nil, reentrantInvoke(calculatorAddressOrFail, "claimCollateralBulkREADONLY", [fromBase58String(userAddress), txIds], nil))
461	461
462	462
463	463
464	464	@Callable(i)
465	465	func swap (assetId,paymentAssetId,paymentAmount) = {
466	466	let check = [onlyCalculator(i)]
467	467	if ((check == check))
468	468	then {
469	469	let paymentAsset = if ((paymentAssetId == "WAVES"))
470	470	then unit
471	471	else fromBase58String(paymentAssetId)
472	472	let initAssetBalance = if ((assetId == "WAVES"))
473	473	then wavesBalance(this).available
474	474	else assetBalance(this, fromBase58String(assetId))
475	475	if ((initAssetBalance == initAssetBalance))
476	476	then {
477	477	let swapInvoke = invoke(swapContractAddressOrFail, "swap", [0, assetId, toString(this)], [AttachedPayment(paymentAsset, paymentAmount)])
478	478	if ((swapInvoke == swapInvoke))
479	479	then {
480	480	let newAssetBalance = if ((assetId == "WAVES"))
481	481	then wavesBalance(this).available
482	482	else assetBalance(this, fromBase58String(assetId))
483	483	if ((newAssetBalance == newAssetBalance))
484	484	then $Tuple2(nil, (newAssetBalance - initAssetBalance))
485	485	else throw("Strict value is not equal to itself.")
486	486	}
487	487	else throw("Strict value is not equal to itself.")
488	488	}
489	489	else throw("Strict value is not equal to itself.")
490	490	}
491	491	else throw("Strict value is not equal to itself.")
492	492	}
493	493
494	494
495	495
496	496	@Callable(i)
497	497	func powerStake (recipientBytes,assetIdBytes,amount) = if (onlyCalculator(i))
498	498	then $Tuple2(nil, invoke(powerContractAddressOrFail, "commitForMiner", [toString(Address(recipientBytes))], [AttachedPayment(assetIdBytes, amount)]))
499	499	else $Tuple2(nil, unit)
500	500

github/deemru/w8io/169f3d6 
49.18 ms ◑