tx · EgWXwdPZ3wgVer7b8GqNk4aCwTFNidQUGMKzvMNHvZH

3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB:  -0.01000000 Waves

2023.01.21 12:25 [2414552] smart account 3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EgWXwdPZ3wgVer7b8GqNk4aCwTFNidQUGMKzvMNHvZH",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1674293191201,
    "version": 2,
    "chainId": 84,
    "sender": "3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB",
    "senderPublicKey": "Gd5NihbWQoWuTnSvq25TuV2BYZG4U1e9KDqZn9zBPix7",
    "proofs": [
        "4DhCm5dBrUfuhWYHLXRUmEjNmzdrvd4RmxBwzMb1HYvUNd9rvZdDGnnd5YnoPdmWyZeQC8Qgm4WCXzLgU1QmDD9A"
    ],
    "script": "base64:BgITCAISBwoFCAgICAgSBAoCCAgSABIAD3N0b3JhZ2VWZXJpZmllcgkBBXZhbHVlAQkApggBAiMzTjJzNVJ0YUhQQmVuQ3N4MkVDY29GUmJZSHgzbm9aaFhXMQAEYmFuawIjM04xRTZ0WGRkUm9WYVJmUTlkUTN2ZzVMYVcyZnNkOEhLdWIADWFjY2VwdGVkVG9rZW4BIOilarzKd0LycGEyNUpPRYO5uR7lmWcXw3Hq2QuhBK3rAAZ1c2RuSUQCLDNLRlhCR0dMQ2pBNVoyRHVXNERxOWZERHJIakpKUDFaRWthb2FqU3p1S3NDAAdWRVJTSU9OAgUxLjEuOQAUc3RvcmFnZUZlZU11bHRpcGxpZXIAAQEKY2hlY2tFbnRyeQIGcHJlZml4BHV1aWQEByRtYXRjaDAJAJ0IAgUEdGhpcwkArAICBQZwcmVmaXgFBHV1aWQDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhAgROT05FAQ9jaGVja0VudHJ5RW1haWwCBHV1aWQGZG9tYWluBAckbWF0Y2gwCQCdCAIFBHRoaXMJAKwCAgkArAICBQR1dWlkAgFABQZkb21haW4DCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhAgROT05FAQljaGVja1VVSUQBBHV1aWQEByRtYXRjaDAJAJ0IAgUEdGhpcwUEdXVpZAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWEFByRtYXRjaDAFAWECBE5PTkUBEmNoZWNrSWZXaGl0ZUxpc3RlZAENY2FsbGVyQWRkcmVzcwQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgICEWFkZHJfV0hJVEVMSVNURURfBQ1jYWxsZXJBZGRyZXNzAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAAAQhpc0FkcmVzcwEEYWRkcgMDAwkAAAIJALECAQUEYWRkcgAjCQAAAgkArwICBQRhZGRyAAICAjNQBwYJAAACCQCvAgIFBGFkZHIAAgICM04GCQAAAgkArwICBQRhZGRyAAICAjNNAQxjb3VudFBhcnRpZXMCC2FjY3VtdWxhdG9yBGFkZHIDCQBmAgkAsQIBBQRhZGRyAAAJAGQCBQthY2N1bXVsYXRvcgABCQBkAgULYWNjdW11bGF0b3IAAAEUY2hlY2tJZlBlbmRpbmdUb1NpZ24BA2tleQQHJG1hdGNoMAkAnQgCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwAwkAAAIFAWECB1BFTkRJTkcGBwcBDmdldFZhbHVlU3RyaW5nAQRqc29uCQCvAgIJALACAgUEanNvbgABCQEFdmFsdWUBCQCzCQIJALACAgUEanNvbgABAgEiAQhnZXRWYWx1ZQIEanNvbgNrZXkECGtleUluZGV4CQEFdmFsdWUBCQCzCQIFBGpzb24JAKwCAgkArAICAgEiBQNrZXkCAiI6BARkYXRhCQCwAgIFBGpzb24JAGQCCQBkAgUIa2V5SW5kZXgJALECAQUDa2V5AAMECWpzb25WYWx1ZQkBDmdldFZhbHVlU3RyaW5nAQUEZGF0YQUJanNvblZhbHVlARJnZXRKc29uQmVmb3JlVmFsdWUCBGpzb24Da2V5BAhrZXlJbmRleAkBBXZhbHVlAQkAswkCBQRqc29uCQCsAgIJAKwCAgIBIgUDa2V5AgIiOgQEZGF0YQkArwICBQRqc29uCQBkAgkAZAIFCGtleUluZGV4CQCxAgEFA2tleQADBQRkYXRhARFnZXRKc29uQWZ0ZXJWYWx1ZQIEanNvbgNrZXkECGtleUluZGV4CQEFdmFsdWUBCQCzCQIFBGpzb24JAKwCAgkArAICAgEiBQNrZXkCAiI6BARkYXRhCQCyAgIFBGpzb24JAGUCCQCxAgEFBGpzb24JAGQCCQBkAgkAZAIJAGQCBQhrZXlJbmRleAkAsQIBBQNrZXkAAwAAAAIFBGRhdGEBCGFzU3RyaW5nAQJidgQHJG1hdGNoMAUCYnYDCQABAgUHJG1hdGNoMAIGU3RyaW5nBANidjAFByRtYXRjaDAFA2J2MAkAAgECJFNwb25zb3JlZCBQdWJsaWMgS2V5IFN0cmluZyBleHBlY3RlZAMGaW52b2tlARFmaWxlQ2VydGlmaWNhdGlvbgUEaGFzaAV0aXRsZQR1dWlkBGlwZnMMc2lnbmVyUHViS2V5BAJpZAkBBXZhbHVlAQgFBmludm9rZQ10cmFuc2FjdGlvbklkBAplbnRyeUV4aXN0CQEKY2hlY2tFbnRyeQIFBGhhc2gFBHV1aWQECXV1aWRFeGlzdAkBCWNoZWNrVVVJRAEFBHV1aWQEDGNhbGxlcklzRGFwcAkAAAIFBHRoaXMIBQZpbnZva2UGY2FsbGVyBA1jYWxsZXJBZGRyZXNzAwUMY2FsbGVySXNEYXBwCQClCAEJAKcIAQkA2QQBBQxzaWduZXJQdWJLZXkJANgEAQgIBQZpbnZva2UGY2FsbGVyBWJ5dGVzBBZjYWxsZXJJc1doaXRlTGlzdGVkTnVtCQESY2hlY2tJZldoaXRlTGlzdGVkAQUNY2FsbGVyQWRkcmVzcwMJAQIhPQIFCmVudHJ5RXhpc3QCBE5PTkUJAAIBAhhUaGlzIGVudHJ5IGFscmVhZHkgZXhpc3QDCQECIT0CBQl1dWlkRXhpc3QCBE5PTkUJAAIBAhdUaGlzIHV1aWQgYWxyZWFkeSBleGlzdAMJAQIhPQIJALECAQUEdXVpZAAkCQACAQIdVXVpZCBzaG91bGQgYmUgMzYgY2hhcmFjdGVycy4DCQECIT0CCQCxAgEFBGhhc2gAQAkAAgECHUhhc2ggc2hvdWxkIGJlIDY0IGNoYXJhY3RlcnMuAwkAZgIJALECAQUFdGl0bGUAZAkAAgECJlRpdGxlIGlzIHRvbyBsb25nLCAxMDAgY2hhcmFjdGVycyBtYXguAwMDCQEIY29udGFpbnMCBQRoYXNoAgEiBgkBCGNvbnRhaW5zAgUFdGl0bGUCASIGCQEIY29udGFpbnMCBQRpcGZzAgEiCQACAQIMTm8gIiBhbGxvd2VkBARkYXRhCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIJeyJoYXNoIjoiBQRoYXNoAg4iLCJ0aW1lc3RhbXAiOgkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAIKLCJ0aXRsZSI6IgUFdGl0bGUCCiIsImlwZnMiOiIFBGlwZnMCAiJ9AwkAZgIFFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0AAAQKY3JlZGl0Q29zdAMJAQIhPQIJALECAQUEaXBmcwAACQBkAgABBRRzdG9yYWdlRmVlTXVsdGlwbGllcgABAwkAZgIAAAkAZQIFFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0FCmNyZWRpdENvc3QJAAIBAhFOb3QgZW5vdWdoIGNyZWRpdAkAzAgCCQELU3RyaW5nRW50cnkCBQR1dWlkCQDYBAEFAmlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUEaGFzaAUEdXVpZAkA2AQBBQJpZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBXRpdGxlBQR1dWlkCQDYBAEFAmlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICEWFkZHJfV0hJVEVMSVNURURfBQ1jYWxsZXJBZGRyZXNzCQBlAgUWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQUKY3JlZGl0Q29zdAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkArAICAghkYXRhX2ZjXwkA2AQBBQJpZAIBXwUNY2FsbGVyQWRkcmVzcwUEZGF0YQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQ1jYWxsZXJBZGRyZXNzAAAFDWFjY2VwdGVkVG9rZW4FA25pbAMJAQEhAQUMY2FsbGVySXNEYXBwBAdwYXltZW50CQEFdmFsdWUBCQCRAwIIBQZpbnZva2UIcGF5bWVudHMAAAQGYW1vdW50CQEFdmFsdWUBCAUHcGF5bWVudAZhbW91bnQEDnBheW1lbnRBc3NldElkAwkBCWlzRGVmaW5lZAEIBQdwYXltZW50B2Fzc2V0SWQJAQV2YWx1ZQEIBQdwYXltZW50B2Fzc2V0SWQJAAIBAiBXYXZlcyBpcyBub3QgYWNjZXB0ZWQgYXMgcGF5bWVudAQMY3VycmVudFByaWNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQ9zdG9yYWdlVmVyaWZpZXIJAKwCAgISY2VydGlmaWNhdGlvbl9mZWVfCQDYBAEJAQV2YWx1ZQEFDnBheW1lbnRBc3NldElkBAdmZWVDb3N0AwkBAiE9AgkAsQIBBQRpcGZzAAAJAGQCBQxjdXJyZW50UHJpY2UJAGgCBRRzdG9yYWdlRmVlTXVsdGlwbGllcgUMY3VycmVudFByaWNlBQxjdXJyZW50UHJpY2UDCQECIT0CBQ1hY2NlcHRlZFRva2VuBQ5wYXltZW50QXNzZXRJZAkAAgECKFRoaXMgdG9rZW4gaXMgbm90IGFjY2VwdGVkIGF0IHRoZSBtb21lbnQDAwkBAiE9AgUGYW1vdW50BQdmZWVDb3N0CQBnAgAABRZjYWxsZXJJc1doaXRlTGlzdGVkTnVtBwkAAgECElRoZSBwcmljZSBpcyB3cm9uZwkAzAgCCQELU3RyaW5nRW50cnkCBQR1dWlkCQDYBAEFAmlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUEaGFzaAUEdXVpZAkA2AQBBQJpZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBXRpdGxlBQR1dWlkCQDYBAEFAmlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgICCGRhdGFfZmNfCQDYBAEFAmlkAgFfBQ1jYWxsZXJBZGRyZXNzBQRkYXRhCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBGJhbmsFB2ZlZUNvc3QIBQdwYXltZW50B2Fzc2V0SWQFA25pbAkAAgECHllvdSBhcmUgbm90IGFsbG93ZWQgdG8gZG8gdGhhdAZpbnZva2UBE3Jldm9rZUNlcnRpZmljYXRpb24CD2NlcnRpZmljYXRpb25JZAxzaWduZXJQdWJLZXkEAmlkCQEFdmFsdWUBCAUGaW52b2tlDXRyYW5zYWN0aW9uSWQEDGNhbGxlcklzRGFwcAkAAAIFBHRoaXMIBQZpbnZva2UGY2FsbGVyBA1jYWxsZXJBZGRyZXNzAwUMY2FsbGVySXNEYXBwCQClCAEJAKcIAQkA2QQBBQxzaWduZXJQdWJLZXkJANgEAQgIBQZpbnZva2UGY2FsbGVyBWJ5dGVzBAplbnRyeUV4aXN0BAckbWF0Y2gwCQCdCAIFBHRoaXMJAKwCAgkArAICCQCsAgICCGRhdGFfZmNfBQ9jZXJ0aWZpY2F0aW9uSWQCAV8FDWNhbGxlckFkZHJlc3MDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhAgROT05FBAlpc1Jldm9rZWQEByRtYXRjaDAJAJ0IAgUEdGhpcwkArAICAgpTVEFUVVNfRkNfBQ9jZXJ0aWZpY2F0aW9uSWQDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhAgROT05FBBZjYWxsZXJJc1doaXRlTGlzdGVkTnVtCQESY2hlY2tJZldoaXRlTGlzdGVkAQUNY2FsbGVyQWRkcmVzcwQHbmV3SnNvbgkArAICCQCsAgIJAKwCAgkAswICBQplbnRyeUV4aXN0AAECEywic3RhdHVzIjoiUkVWT0tFRF8JANgEAQUCaWQCAiJ9AwkBAiE9AgUJaXNSZXZva2VkAgROT05FCQACAQItVGhpcyBjZXJ0aWZpY2F0aW9uIGhhdmUgYWxyZWFkeSBiZWVuIHJldm9rZWQuAwkAAAIFCmVudHJ5RXhpc3QCBE5PTkUJAAIBAjNZb3UgY2Fubm90IGNoYW5nZSB0aGUgc3RhdHVzIG9mIHRoaXMgY2VydGlmaWNhdGlvbi4DCQBmAgUWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICEWFkZHJfV0hJVEVMSVNURURfBQ1jYWxsZXJBZGRyZXNzCQBlAgUWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQABCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIKU1RBVFVTX0ZDXwUPY2VydGlmaWNhdGlvbklkCQCsAgICCFJFVk9LRURfCQDYBAEFAmlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgICCGRhdGFfZmNfBQ9jZXJ0aWZpY2F0aW9uSWQCAV8FDWNhbGxlckFkZHJlc3MFB25ld0pzb24JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUNY2FsbGVyQWRkcmVzcwAABQ1hY2NlcHRlZFRva2VuBQNuaWwDCQEBIQEFDGNhbGxlcklzRGFwcAQHcGF5bWVudAkBBXZhbHVlAQkAkQMCCAUGaW52b2tlCHBheW1lbnRzAAAEBmFtb3VudAkBBXZhbHVlAQgFB3BheW1lbnQGYW1vdW50BA5wYXltZW50QXNzZXRJZAMJAQlpc0RlZmluZWQBCAUHcGF5bWVudAdhc3NldElkCQEFdmFsdWUBCAUHcGF5bWVudAdhc3NldElkCQACAQIgV2F2ZXMgaXMgbm90IGFjY2VwdGVkIGFzIHBheW1lbnQEDGN1cnJlbnRQcmljZQkBEUBleHRyTmF0aXZlKDEwNTApAgUPc3RvcmFnZVZlcmlmaWVyCQCsAgICEmNlcnRpZmljYXRpb25fZmVlXwkA2AQBCQEFdmFsdWUBBQ5wYXltZW50QXNzZXRJZAMJAQIhPQIFDWFjY2VwdGVkVG9rZW4FDnBheW1lbnRBc3NldElkCQACAQIoVGhpcyB0b2tlbiBpcyBub3QgYWNjZXB0ZWQgYXQgdGhlIG1vbWVudAMDCQECIT0CBQZhbW91bnQFDGN1cnJlbnRQcmljZQkAZwIAAAUWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQcJAAIBAhJUaGUgcHJpY2UgaXMgd3JvbmcJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICAgpTVEFUVVNfRkNfBQ9jZXJ0aWZpY2F0aW9uSWQJAKwCAgIIUkVWT0tFRF8JANgEAQUCaWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgIIZGF0YV9mY18FD2NlcnRpZmljYXRpb25JZAIBXwUNY2FsbGVyQWRkcmVzcwUHbmV3SnNvbgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQRiYW5rBQZhbW91bnQIBQdwYXltZW50B2Fzc2V0SWQFA25pbAkAAgECHllvdSBhcmUgbm90IGFsbG93ZWQgdG8gZG8gdGhhdAZpbnZva2UBD3VzZG5TaWduQ3JlZGl0cwAEB3BheW1lbnQJAQV2YWx1ZQEJAJEDAggFBmludm9rZQhwYXltZW50cwAABA1jYWxsZXJBZGRyZXNzCQDYBAEICAUGaW52b2tlBmNhbGxlcgVieXRlcwQHdG9rZW5JZAkBBXZhbHVlAQgFB3BheW1lbnQHYXNzZXRJZAQGYW1vdW50CQEFdmFsdWUBCAUHcGF5bWVudAZhbW91bnQED251bWJlck9mQ3JlZGl0cwkAaQIJAGgCBQZhbW91bnQAAgDAhD0EFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0JARJjaGVja0lmV2hpdGVMaXN0ZWQBBQ1jYWxsZXJBZGRyZXNzAwkBAiE9AgkA2AQBBQd0b2tlbklkBQZ1c2RuSUQJAAIBAhpPbmx5IFVTRE4gY2FuIGJlIGV4Y2hhbmdlZAMDCQECIT0CCQBqAgUGYW1vdW50AMCEPQAACQECIT0CCQBqAgUGYW1vdW50AMCEPQCgwh4HCQACAQkArAICCQCsAgIJAKwCAgIwWW91IGNhbiBvbmx5IGV4Y2hhbmdlIG11bHRpcGxlIG9mIDAuNSwgeW91IHNlbnQ6CQCzAgIJAKQDAQUGYW1vdW50AAYCAS4JALICAgkApAMBBQZhbW91bnQABgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhFhZGRyX1dISVRFTElTVEVEXwUNY2FsbGVyQWRkcmVzcwkAZAIFFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0FD251bWJlck9mQ3JlZGl0cwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQRiYW5rBQZhbW91bnQFB3Rva2VuSWQFA25pbAECdHgBCHZlcmlmaWVyAAQHJG1hdGNoMAUCdHgDCQABAgUHJG1hdGNoMAIXSW52b2tlU2NyaXB0VHJhbnNhY3Rpb24EA2ludgUHJG1hdGNoMAMDAwMJAAACCAUDaW52CGZ1bmN0aW9uAhFmaWxlQ2VydGlmaWNhdGlvbgkAAAIIBQNpbnYEZEFwcAUEdGhpcwcJAAACCAUDaW52A2ZlZQCgwh4HCQAAAggFA2ludgpmZWVBc3NldElkBQR1bml0BwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAkA2QQBCQEIYXNTdHJpbmcBCQCRAwIIBQNpbnYEYXJncwAEAwMDAwkAAAIIBQNpbnYIZnVuY3Rpb24CE3Jldm9rZUNlcnRpZmljYXRpb24JAAACCAUDaW52BGRBcHAFBHRoaXMHCQAAAggFA2ludgNmZWUAoMIeBwkAAAIIBQNpbnYKZmVlQXNzZXRJZAUEdW5pdAcJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAJANkEAQkBCGFzU3RyaW5nAQkAkQMCCAUDaW52BGFyZ3MAAQkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleQkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleSRbFSI=",
    "height": 2414552,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: D8LCo4WrxBiYapL9LebP1bjp6x8U265R3NjBiHPeu9zw
Next: 2o2dtQg6hmzgc1oU1odW2V3t2QnEQ66GRmfwXFc3bozr

Diff: 
Old
New
Differences
9
9
 
10
10
 
let d = "3KFXBGGLCjA5Z2DuW4Dq9fDDrHjJJP1ZEkaoajSzuKsC"
11
11
 
12
-
let e = 1
12
+
let e = "1.1.9"
13
13
 
14
-
func f (g,h) = {
15
-
    let i = getString(this, (g + h))
16
-
    if ($isInstanceOf(i, "String"))
14
+
let f = 1
15
+
16
+
func g (h,i) = {
17
+
    let j = getString(this, (h + i))
18
+
    if ($isInstanceOf(j, "String"))
17
19
 
        then {
18
-
            let j = i
19
-
            j
20
+
            let k = j
21
+
            k
20
22
 
            }
21
23
 
        else "NONE"
22
24
 
    }
23
25
 
24
26
 
25
-
func k (h,l) = {
26
-
    let i = getString(this, ((h + "@") + l))
27
-
    if ($isInstanceOf(i, "String"))
27
+
func l (i,m) = {
28
+
    let j = getString(this, ((i + "@") + m))
29
+
    if ($isInstanceOf(j, "String"))
28
30
 
        then {
29
-
            let j = i
30
-
            j
31
+
            let k = j
32
+
            k
31
33
 
            }
32
34
 
        else "NONE"
33
35
 
    }
34
36
 
35
37
 
36
-
func m (h) = {
37
-
    let i = getString(this, h)
38
-
    if ($isInstanceOf(i, "String"))
38
+
func n (i) = {
39
+
    let j = getString(this, i)
40
+
    if ($isInstanceOf(j, "String"))
39
41
 
        then {
40
-
            let j = i
41
-
            j
42
+
            let k = j
43
+
            k
42
44
 
            }
43
45
 
        else "NONE"
44
46
 
    }
45
47
 
46
48
 
47
-
func n (o) = {
48
-
    let i = getInteger(this, ("addr_WHITELISTED_" + o))
49
-
    if ($isInstanceOf(i, "Int"))
49
+
func o (p) = {
50
+
    let j = getInteger(this, ("addr_WHITELISTED_" + p))
51
+
    if ($isInstanceOf(j, "Int"))
50
52
 
        then {
51
-
            let j = i
52
-
            j
53
+
            let k = j
54
+
            k
53
55
 
            }
54
56
 
        else 0
55
57
 
    }
56
58
 
57
59
 
58
-
func p (q) = if (if (if ((size(q) == 35))
59
-
    then (take(q, 2) == "3P")
60
+
func q (r) = if (if (if ((size(r) == 35))
61
+
    then (take(r, 2) == "3P")
60
62
 
    else false)
61
63
 
    then true
62
-
    else (take(q, 2) == "3N"))
64
+
    else (take(r, 2) == "3N"))
63
65
 
    then true
64
-
    else (take(q, 2) == "3M")
66
+
    else (take(r, 2) == "3M")
65
67
 
66
68
 
67
-
func r (s,q) = if ((size(q) > 0))
68
-
    then (s + 1)
69
-
    else (s + 0)
69
+
func s (t,r) = if ((size(r) > 0))
70
+
    then (t + 1)
71
+
    else (t + 0)
70
72
 
71
73
 
72
-
func t (u) = {
73
-
    let i = getString(this, u)
74
-
    if ($isInstanceOf(i, "String"))
74
+
func u (v) = {
75
+
    let j = getString(this, v)
76
+
    if ($isInstanceOf(j, "String"))
75
77
 
        then {
76
-
            let j = i
77
-
            if ((j == "PENDING"))
78
+
            let k = j
79
+
            if ((k == "PENDING"))
78
80
 
                then true
79
81
 
                else false
80
82
 
            }
82
84
 
    }
83
85
 
84
86
 
85
-
func v (w) = take(drop(w, 1), value(indexOf(drop(w, 1), "\"")))
87
+
func w (x) = take(drop(x, 1), value(indexOf(drop(x, 1), "\"")))
86
88
 
87
89
 
88
-
func x (w,u) = {
89
-
    let y = value(indexOf(w, (("\"" + u) + "\":")))
90
-
    let z = drop(w, ((y + size(u)) + 3))
91
-
    let A = v(z)
90
+
func y (x,v) = {
91
+
    let z = value(indexOf(x, (("\"" + v) + "\":")))
92
+
    let A = drop(x, ((z + size(v)) + 3))
93
+
    let B = w(A)
94
+
    B
95
+
    }
96
+
97
+
98
+
func C (x,v) = {
99
+
    let z = value(indexOf(x, (("\"" + v) + "\":")))
100
+
    let A = take(x, ((z + size(v)) + 3))
92
101
 
    A
93
102
 
    }
94
103
 
95
104
 
96
-
func B (w,u) = {
97
-
    let y = value(indexOf(w, (("\"" + u) + "\":")))
98
-
    let z = take(w, ((y + size(u)) + 3))
99
-
    z
105
+
func D (x,v) = {
106
+
    let z = value(indexOf(x, (("\"" + v) + "\":")))
107
+
    let A = takeRight(x, (size(x) - ((((z + size(v)) + 3) + 0) + 2)))
108
+
    A
100
109
 
    }
101
110
 
102
111
 
103
-
func C (w,u) = {
104
-
    let y = value(indexOf(w, (("\"" + u) + "\":")))
105
-
    let z = takeRight(w, (size(w) - ((((y + size(u)) + 3) + 0) + 2)))
106
-
    z
107
-
    }
108
-
109
-
110
-
func D (E) = {
111
-
    let i = E
112
-
    if ($isInstanceOf(i, "String"))
112
+
func E (F) = {
113
+
    let j = F
114
+
    if ($isInstanceOf(j, "String"))
113
115
 
        then {
114
-
            let F = i
115
-
            F
116
+
            let G = j
117
+
            G
116
118
 
            }
117
119
 
        else throw("Sponsored Public Key String expected")
118
120
 
    }
119
121
 
120
122
 
121
-
@Callable(G)
122
-
func fileCertification (H,I,h,J,K) = {
123
-
    let L = value(G.transactionId)
124
-
    let M = f(H, h)
125
-
    let N = m(h)
126
-
    let O = (this == G.caller)
127
-
    let o = if (O)
128
-
        then toString(addressFromPublicKey(fromBase58String(K)))
129
-
        else toBase58String(G.caller.bytes)
130
-
    let P = n(o)
131
-
    if ((M != "NONE"))
123
+
@Callable(H)
124
+
func fileCertification (I,J,i,K,L) = {
125
+
    let M = value(H.transactionId)
126
+
    let N = g(I, i)
127
+
    let O = n(i)
128
+
    let P = (this == H.caller)
129
+
    let p = if (P)
130
+
        then toString(addressFromPublicKey(fromBase58String(L)))
131
+
        else toBase58String(H.caller.bytes)
132
+
    let Q = o(p)
133
+
    if ((N != "NONE"))
132
134
 
        then throw("This entry already exist")
133
-
        else if ((N != "NONE"))
135
+
        else if ((O != "NONE"))
134
136
 
            then throw("This uuid already exist")
135
-
            else if ((size(h) != 36))
137
+
            else if ((size(i) != 36))
136
138
 
                then throw("Uuid should be 36 characters.")
137
-
                else if ((size(H) != 64))
139
+
                else if ((size(I) != 64))
138
140
 
                    then throw("Hash should be 64 characters.")
139
-
                    else if ((size(I) > 100))
141
+
                    else if ((size(J) > 100))
140
142
 
                        then throw("Title is too long, 100 characters max.")
141
-
                        else if (if (if (contains(H, "\""))
142
-
                            then true
143
-
                            else contains(I, "\""))
143
+
                        else if (if (if (contains(I, "\""))
144
144
 
                            then true
145
145
 
                            else contains(J, "\""))
146
+
                            then true
147
+
                            else contains(K, "\""))
146
148
 
                            then throw("No \" allowed")
147
149
 
                            else {
148
-
                                let z = (((((((("{\"hash\":\"" + H) + "\",\"timestamp\":") + toString(lastBlock.timestamp)) + ",\"title\":\"") + I) + "\",\"ipfs\":\"") + J) + "\"}")
149
-
                                if ((P > 0))
150
+
                                let A = (((((((("{\"hash\":\"" + I) + "\",\"timestamp\":") + toString(lastBlock.timestamp)) + ",\"title\":\"") + J) + "\",\"ipfs\":\"") + K) + "\"}")
151
+
                                if ((Q > 0))
150
152
 
                                    then {
151
-
                                        let Q = if ((size(J) != 0))
152
-
                                            then (1 + e)
153
+
                                        let R = if ((size(K) != 0))
154
+
                                            then (1 + f)
153
155
 
                                            else 1
154
-
                                        if ((0 > (P - Q)))
156
+
                                        if ((0 > (Q - R)))
155
157
 
                                            then throw("Not enough credit")
156
-
                                            else [StringEntry(h, toBase58String(L)), StringEntry((H + h), toBase58String(L)), StringEntry((I + h), toBase58String(L)), IntegerEntry(("addr_WHITELISTED_" + o), (P - Q)), StringEntry(((("data_fc_" + toBase58String(L)) + "_") + o), z), ScriptTransfer(addressFromStringValue(o), 0, c)]
158
+
                                            else [StringEntry(i, toBase58String(M)), StringEntry((I + i), toBase58String(M)), StringEntry((J + i), toBase58String(M)), IntegerEntry(("addr_WHITELISTED_" + p), (Q - R)), StringEntry(((("data_fc_" + toBase58String(M)) + "_") + p), A), ScriptTransfer(addressFromStringValue(p), 0, c)]
157
159
 
                                        }
158
-
                                    else if (!(O))
160
+
                                    else if (!(P))
159
161
 
                                        then {
160
-
                                            let R = value(G.payments[0])
161
-
                                            let S = value(R.amount)
162
-
                                            let T = if (isDefined(R.assetId))
163
-
                                                then value(R.assetId)
162
+
                                            let S = value(H.payments[0])
163
+
                                            let T = value(S.amount)
164
+
                                            let U = if (isDefined(S.assetId))
165
+
                                                then value(S.assetId)
164
166
 
                                                else throw("Waves is not accepted as payment")
165
-
                                            let U = getIntegerValue(a, ("certification_fee_" + toBase58String(value(T))))
166
-
                                            let V = if ((size(J) != 0))
167
-
                                                then (U + (e * U))
168
-
                                                else U
169
-
                                            if ((c != T))
167
+
                                            let V = getIntegerValue(a, ("certification_fee_" + toBase58String(value(U))))
168
+
                                            let W = if ((size(K) != 0))
169
+
                                                then (V + (f * V))
170
+
                                                else V
171
+
                                            if ((c != U))
170
172
 
                                                then throw("This token is not accepted at the moment")
171
-
                                                else if (if ((S != V))
172
-
                                                    then (0 >= P)
173
+
                                                else if (if ((T != W))
174
+
                                                    then (0 >= Q)
173
175
 
                                                    else false)
174
176
 
                                                    then throw("The price is wrong")
175
-
                                                    else [StringEntry(h, toBase58String(L)), StringEntry((H + h), toBase58String(L)), StringEntry((I + h), toBase58String(L)), StringEntry(((("data_fc_" + toBase58String(L)) + "_") + o), z), ScriptTransfer(addressFromStringValue(b), V, R.assetId)]
177
+
                                                    else [StringEntry(i, toBase58String(M)), StringEntry((I + i), toBase58String(M)), StringEntry((J + i), toBase58String(M)), StringEntry(((("data_fc_" + toBase58String(M)) + "_") + p), A), ScriptTransfer(addressFromStringValue(b), W, S.assetId)]
176
178
 
                                            }
177
179
 
                                        else throw("You are not allowed to do that")
178
180
 
                                }
180
182
 
181
183
 
182
184
 
183
-
@Callable(G)
184
-
func revokeCertification (W,K) = {
185
-
    let L = value(G.transactionId)
186
-
    let O = (this == G.caller)
187
-
    let o = if (O)
188
-
        then toString(addressFromPublicKey(fromBase58String(K)))
189
-
        else toBase58String(G.caller.bytes)
190
-
    let M = {
191
-
        let i = getString(this, ((("data_fc_" + W) + "_") + o))
192
-
        if ($isInstanceOf(i, "String"))
185
+
@Callable(H)
186
+
func revokeCertification (X,L) = {
187
+
    let M = value(H.transactionId)
188
+
    let P = (this == H.caller)
189
+
    let p = if (P)
190
+
        then toString(addressFromPublicKey(fromBase58String(L)))
191
+
        else toBase58String(H.caller.bytes)
192
+
    let N = {
193
+
        let j = getString(this, ((("data_fc_" + X) + "_") + p))
194
+
        if ($isInstanceOf(j, "String"))
193
195
 
            then {
194
-
                let j = i
195
-
                j
196
+
                let k = j
197
+
                k
196
198
 
                }
197
199
 
            else "NONE"
198
200
 
        }
199
-
    let X = {
200
-
        let i = getString(this, ("STATUS_FC_" + W))
201
-
        if ($isInstanceOf(i, "String"))
201
+
    let Y = {
202
+
        let j = getString(this, ("STATUS_FC_" + X))
203
+
        if ($isInstanceOf(j, "String"))
202
204
 
            then {
203
-
                let j = i
204
-
                j
205
+
                let k = j
206
+
                k
205
207
 
                }
206
208
 
            else "NONE"
207
209
 
        }
208
-
    let P = n(o)
209
-
    let Y = (((dropRight(M, 1) + ",\"status\":\"REVOKED_") + toBase58String(L)) + "\"}")
210
-
    if ((X != "NONE"))
210
+
    let Q = o(p)
211
+
    let Z = (((dropRight(N, 1) + ",\"status\":\"REVOKED_") + toBase58String(M)) + "\"}")
212
+
    if ((Y != "NONE"))
211
213
 
        then throw("This certification have already been revoked.")
212
-
        else if ((M == "NONE"))
214
+
        else if ((N == "NONE"))
213
215
 
            then throw("You cannot change the status of this certification.")
214
-
            else if ((P > 0))
215
-
                then [IntegerEntry(("addr_WHITELISTED_" + o), (P - 1)), StringEntry(("STATUS_FC_" + W), ("REVOKED_" + toBase58String(L))), StringEntry(((("data_fc_" + W) + "_") + o), Y), ScriptTransfer(addressFromStringValue(o), 0, c)]
216
-
                else if (!(O))
216
+
            else if ((Q > 0))
217
+
                then [IntegerEntry(("addr_WHITELISTED_" + p), (Q - 1)), StringEntry(("STATUS_FC_" + X), ("REVOKED_" + toBase58String(M))), StringEntry(((("data_fc_" + X) + "_") + p), Z), ScriptTransfer(addressFromStringValue(p), 0, c)]
218
+
                else if (!(P))
217
219
 
                    then {
218
-
                        let R = value(G.payments[0])
219
-
                        let S = value(R.amount)
220
-
                        let T = if (isDefined(R.assetId))
221
-
                            then value(R.assetId)
220
+
                        let S = value(H.payments[0])
221
+
                        let T = value(S.amount)
222
+
                        let U = if (isDefined(S.assetId))
223
+
                            then value(S.assetId)
222
224
 
                            else throw("Waves is not accepted as payment")
223
-
                        let U = getIntegerValue(a, ("certification_fee_" + toBase58String(value(T))))
224
-
                        if ((c != T))
225
+
                        let V = getIntegerValue(a, ("certification_fee_" + toBase58String(value(U))))
226
+
                        if ((c != U))
225
227
 
                            then throw("This token is not accepted at the moment")
226
-
                            else if (if ((S != U))
227
-
                                then (0 >= P)
228
+
                            else if (if ((T != V))
229
+
                                then (0 >= Q)
228
230
 
                                else false)
229
231
 
                                then throw("The price is wrong")
230
-
                                else [StringEntry(("STATUS_FC_" + W), ("REVOKED_" + toBase58String(L))), StringEntry(((("data_fc_" + W) + "_") + o), Y), ScriptTransfer(addressFromStringValue(b), S, R.assetId)]
232
+
                                else [StringEntry(("STATUS_FC_" + X), ("REVOKED_" + toBase58String(M))), StringEntry(((("data_fc_" + X) + "_") + p), Z), ScriptTransfer(addressFromStringValue(b), T, S.assetId)]
231
233
 
                        }
232
234
 
                    else throw("You are not allowed to do that")
233
235
 
    }
234
236
 
235
237
 
236
238
 
237
-
@Callable(G)
238
-
func emailCertification (l,I,h,K) = {
239
-
    let L = value(G.transactionId)
240
-
    let M = k(l, h)
241
-
    let N = m(h)
242
-
    let O = (this == G.caller)
243
-
    let o = if (O)
244
-
        then toString(addressFromPublicKey(fromBase58String(K)))
245
-
        else toBase58String(G.caller.bytes)
246
-
    let P = n(o)
247
-
    if ((M != "NONE"))
248
-
        then throw("This entry already exist")
249
-
        else if ((N != "NONE"))
250
-
            then throw("This uuid already exist")
251
-
            else if ((size(h) > 36))
252
-
                then throw("Uuid is too long, 36 characters max.")
253
-
                else if ((size(l) > 150))
254
-
                    then throw("Domain is too long, 150 characters max.")
255
-
                    else if ((size(I) > 100))
256
-
                        then throw("Title is too long, 100 characters max.")
257
-
                        else if (if (if (contains(h, "\""))
258
-
                            then true
259
-
                            else contains(I, "\""))
260
-
                            then true
261
-
                            else contains(l, "\""))
262
-
                            then throw("No \" allowed")
263
-
                            else {
264
-
                                let z = (((((((("{\"messageid\":\"" + h) + "@") + l) + "\",\"timestamp\":") + toString(lastBlock.timestamp)) + ",\"reference\":\"") + I) + "\"}")
265
-
                                if ((P > 0))
266
-
                                    then [StringEntry(h, toBase58String(L)), StringEntry(((h + "@") + l), toBase58String(L)), StringEntry((I + h), toBase58String(L)), IntegerEntry(("addr_WHITELISTED_" + o), (P - 1)), StringEntry(((("data_ec_" + toBase58String(L)) + "_") + o), z), ScriptTransfer(addressFromStringValue(o), 0, c)]
267
-
                                    else if (!(O))
268
-
                                        then {
269
-
                                            let R = value(G.payments[0])
270
-
                                            let S = value(R.amount)
271
-
                                            let T = if (isDefined(R.assetId))
272
-
                                                then value(R.assetId)
273
-
                                                else throw("Waves is not accepted as payment")
274
-
                                            let U = getIntegerValue(a, ("certification_fee_" + toBase58String(value(T))))
275
-
                                            if ((c != T))
276
-
                                                then throw("This token is not accepted at the moment")
277
-
                                                else if (if ((S != U))
278
-
                                                    then (0 >= P)
279
-
                                                    else false)
280
-
                                                    then throw("The price is wrong")
281
-
                                                    else [StringEntry(h, toBase58String(L)), StringEntry(((h + "@") + l), toBase58String(L)), StringEntry((I + h), toBase58String(L)), StringEntry(((("data_ec_" + toBase58String(L)) + "_") + o), z), ScriptTransfer(addressFromStringValue(b), S, R.assetId)]
282
-
                                            }
283
-
                                        else throw("You are not allowed to do that")
284
-
                                }
239
+
@Callable(H)
240
+
func usdnSignCredits () = {
241
+
    let S = value(H.payments[0])
242
+
    let p = toBase58String(H.caller.bytes)
243
+
    let aa = value(S.assetId)
244
+
    let T = value(S.amount)
245
+
    let ab = ((T * 2) / 1000000)
246
+
    let Q = o(p)
247
+
    if ((toBase58String(aa) != d))
248
+
        then throw("Only USDN can be exchanged")
249
+
        else if (if (((T % 1000000) != 0))
250
+
            then ((T % 1000000) != 500000)
251
+
            else false)
252
+
            then throw(((("You can only exchange multiple of 0.5, you sent:" + dropRight(toString(T), 6)) + ".") + takeRight(toString(T), 6)))
253
+
            else [IntegerEntry(("addr_WHITELISTED_" + p), (Q + ab)), ScriptTransfer(addressFromStringValue(b), T, aa)]
285
254
 
    }
286
255
 
287
256
 
288
-
289
-
@Callable(G)
290
-
func createAgreement (H,I,Z,aa,K,h) = {
291
-
    let L = value(G.transactionId)
292
-
    let M = f(H, h)
293
-
    let N = m(h)
294
-
    let O = (this == G.caller)
295
-
    let o = if (O)
296
-
        then toString(addressFromPublicKey(fromBase58String(K)))
297
-
        else toBase58String(G.caller.bytes)
298
-
    let P = n(o)
299
-
    let ab = ((((B(Z, "creator") + "\"") + o) + "\"") + C(Z, "creator"))
300
-
    let ac = split(aa, ",")
301
-
    let ad = size(ac)
302
-
    let ae = StringEntry((I + h), toBase58String(L))
303
-
    let af = StringEntry((H + h), toBase58String(L))
304
-
    let ag = StringEntry(((("data_MA_" + toBase58String(L)) + "_") + o), ab)
305
-
    let ah = StringEntry(((o + "_MA_") + toBase58String(L)), ("SIGNED_" + toBase58String(L)))
306
-
    let ai = IntegerEntry(("addr_WHITELISTED_" + o), (P - (ad + 1)))
307
-
    if ((M != "NONE"))
308
-
        then throw("This entry already exist")
309
-
        else if ((N != "NONE"))
310
-
            then throw("This uuid already exist")
311
-
            else if ((size(h) > 36))
312
-
                then throw("Uuid is too long, 36 characters max.")
313
-
                else if ((size(H) > 64))
314
-
                    then throw("Message-id is too long, 64 characters max.")
315
-
                    else if ((size(I) > 100))
316
-
                        then throw("Title is too long, 100 characters max.")
317
-
                        else if ((P > 0))
318
-
                            then if (((ad + 1) > P))
319
-
                                then throw("You don't have enough certification credit")
320
-
                                else if ((ad == 6))
321
-
                                    then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[4] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[5] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c), ScriptTransfer(addressFromStringValue(ac[4]), 0, c), ScriptTransfer(addressFromStringValue(ac[5]), 0, c)]
322
-
                                    else if ((ad == 5))
323
-
                                        then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[4] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c), ScriptTransfer(addressFromStringValue(ac[4]), 0, c)]
324
-
                                        else if ((ad == 4))
325
-
                                            then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c)]
326
-
                                            else if ((ad == 3))
327
-
                                                then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c)]
328
-
                                                else if ((ad == 2))
329
-
                                                    then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c)]
330
-
                                                    else if ((ad == 1))
331
-
                                                        then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c)]
332
-
                                                        else throw("Wrong number of participants")
333
-
                            else if (!(O))
334
-
                                then {
335
-
                                    let R = value(G.payments[0])
336
-
                                    let S = if (isDefined(R.amount))
337
-
                                        then value(R.amount)
338
-
                                        else 0
339
-
                                    let T = if (isDefined(R.assetId))
340
-
                                        then value(R.assetId)
341
-
                                        else c
342
-
                                    let U = getIntegerValue(a, ("certification_fee_" + toBase58String(value(T))))
343
-
                                    if (((U * (ad + 1)) > S))
344
-
                                        then throw(("The price is wrong, it should be " + toString((U * (ad + 1)))))
345
-
                                        else if ((ad == 6))
346
-
                                            then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[4] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[5] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c), ScriptTransfer(addressFromStringValue(ac[4]), 0, c), ScriptTransfer(addressFromStringValue(ac[5]), 0, c)]
347
-
                                            else if ((ad == 5))
348
-
                                                then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[4] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c), ScriptTransfer(addressFromStringValue(ac[4]), 0, c)]
349
-
                                                else if ((ad == 4))
350
-
                                                    then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c)]
351
-
                                                    else if ((ad == 3))
352
-
                                                        then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c)]
353
-
                                                        else if ((ad == 2))
354
-
                                                            then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c)]
355
-
                                                            else if ((ad == 1))
356
-
                                                                then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c)]
357
-
                                                                else throw(("Needs 1 to 6 recipient addresses, currently sent: " + toString(ad)))
358
-
                                    }
359
-
                                else throw("You are not allowed to do that")
360
-
    }
361
-
362
-
363
-
364
-
@Callable(G)
365
-
func signAgreement (H,aj,K) = {
366
-
    let R = value(G.payments[0])
367
-
    let S = value(R.amount)
368
-
    let L = value(G.transactionId)
369
-
    let O = (this == G.caller)
370
-
    let ak = if (O)
371
-
        then toString(addressFromPublicKey(fromBase58String(K)))
372
-
        else toBase58String(G.caller.bytes)
373
-
    let al = t(((ak + "_MA_") + aj))
374
-
    if (!(al))
375
-
        then throw("Sorry there is no pending signature")
376
-
        else [StringEntry(((ak + "_MA_") + aj), ("SIGNED_" + toBase58String(L))), ScriptTransfer(addressFromStringValue(ak), 0, c)]
377
-
    }
378
-
379
-
380
-
381
-
@Callable(G)
382
-
func usdnSignCredits () = {
383
-
    let R = value(G.payments[0])
384
-
    let o = toBase58String(G.caller.bytes)
385
-
    let am = value(R.assetId)
386
-
    let S = value(R.amount)
387
-
    let an = ((S * 2) / 1000000)
388
-
    let P = n(o)
389
-
    if ((toBase58String(am) != d))
390
-
        then throw("Only USDN can be exchanged")
391
-
        else if (if (((S % 1000000) != 0))
392
-
            then ((S % 1000000) != 500000)
393
-
            else false)
394
-
            then throw(((("You can only exchange multiple of 0.5, you sent:" + dropRight(toString(S), 6)) + ".") + takeRight(toString(S), 6)))
395
-
            else [IntegerEntry(("addr_WHITELISTED_" + o), (P + an)), ScriptTransfer(addressFromStringValue(b), S, am)]
396
-
    }
397
-
398
-
399
-
@Verifier(ao)
400
-
func ap () = {
401
-
    let i = ao
402
-
    if ($isInstanceOf(i, "InvokeScriptTransaction"))
257
+
@Verifier(ac)
258
+
func ad () = {
259
+
    let j = ac
260
+
    if ($isInstanceOf(j, "InvokeScriptTransaction"))
403
261
 
        then {
404
-
            let aq = i
405
-
            if (if ((aq.function == "fileCertification"))
406
-
                then true
407
-
                else (aq.function == "createAgreement"))
408
-
                then sigVerify(ao.bodyBytes, ao.proofs[0], fromBase58String(D(aq.args[4])))
409
-
                else if ((aq.function == "emailCertification"))
410
-
                    then sigVerify(ao.bodyBytes, ao.proofs[0], fromBase58String(D(aq.args[3])))
411
-
                    else if ((aq.function == "signAgreement"))
412
-
                        then sigVerify(ao.bodyBytes, ao.proofs[0], fromBase58String(D(aq.args[2])))
413
-
                        else if ((aq.function == "revokeCertification"))
414
-
                            then sigVerify(ao.bodyBytes, ao.proofs[0], fromBase58String(D(aq.args[1])))
415
-
                            else sigVerify(ao.bodyBytes, ao.proofs[0], ao.senderPublicKey)
262
+
            let ae = j
263
+
            if (if (if (if ((ae.function == "fileCertification"))
264
+
                then (ae.dApp == this)
265
+
                else false)
266
+
                then (ae.fee == 500000)
267
+
                else false)
268
+
                then (ae.feeAssetId == unit)
269
+
                else false)
270
+
                then sigVerify(ac.bodyBytes, ac.proofs[0], fromBase58String(E(ae.args[4])))
271
+
                else if (if (if (if ((ae.function == "revokeCertification"))
272
+
                    then (ae.dApp == this)
273
+
                    else false)
274
+
                    then (ae.fee == 500000)
275
+
                    else false)
276
+
                    then (ae.feeAssetId == unit)
277
+
                    else false)
278
+
                    then sigVerify(ac.bodyBytes, ac.proofs[0], fromBase58String(E(ae.args[1])))
279
+
                    else sigVerify(ac.bodyBytes, ac.proofs[0], ac.senderPublicKey)
416
280
 
            }
417
-
        else sigVerify(ao.bodyBytes, ao.proofs[0], ao.senderPublicKey)
281
+
        else sigVerify(ac.bodyBytes, ac.proofs[0], ac.senderPublicKey)
418
282
 
    }
419
283
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = value(addressFromString("3N2s5RtaHPBenCsx2ECcoFRbYHx3noZhXW1"))
5
5
 
6
6
 
let b = "3N1E6tXddRoVaRfQ9dQ3vg5LaW2fsd8HKub"
7
7
 
8
8
 
let c = base58'Gf9t8FA4H3ssoZPCwrg3KwUFCci8zuUFP9ssRsUY3s6a'
9
9
 
10
10
 
let d = "3KFXBGGLCjA5Z2DuW4Dq9fDDrHjJJP1ZEkaoajSzuKsC"
11
11
 
12
-
let e = 1
12
+
let e = "1.1.9"
13
13
 
14
-
func f (g,h) = {
15
-
    let i = getString(this, (g + h))
16
-
    if ($isInstanceOf(i, "String"))
14
+
let f = 1
15
+
16
+
func g (h,i) = {
17
+
    let j = getString(this, (h + i))
18
+
    if ($isInstanceOf(j, "String"))
17
19
 
        then {
18
-
            let j = i
19
-
            j
20
+
            let k = j
21
+
            k
20
22
 
            }
21
23
 
        else "NONE"
22
24
 
    }
23
25
 
24
26
 
25
-
func k (h,l) = {
26
-
    let i = getString(this, ((h + "@") + l))
27
-
    if ($isInstanceOf(i, "String"))
27
+
func l (i,m) = {
28
+
    let j = getString(this, ((i + "@") + m))
29
+
    if ($isInstanceOf(j, "String"))
28
30
 
        then {
29
-
            let j = i
30
-
            j
31
+
            let k = j
32
+
            k
31
33
 
            }
32
34
 
        else "NONE"
33
35
 
    }
34
36
 
35
37
 
36
-
func m (h) = {
37
-
    let i = getString(this, h)
38
-
    if ($isInstanceOf(i, "String"))
38
+
func n (i) = {
39
+
    let j = getString(this, i)
40
+
    if ($isInstanceOf(j, "String"))
39
41
 
        then {
40
-
            let j = i
41
-
            j
42
+
            let k = j
43
+
            k
42
44
 
            }
43
45
 
        else "NONE"
44
46
 
    }
45
47
 
46
48
 
47
-
func n (o) = {
48
-
    let i = getInteger(this, ("addr_WHITELISTED_" + o))
49
-
    if ($isInstanceOf(i, "Int"))
49
+
func o (p) = {
50
+
    let j = getInteger(this, ("addr_WHITELISTED_" + p))
51
+
    if ($isInstanceOf(j, "Int"))
50
52
 
        then {
51
-
            let j = i
52
-
            j
53
+
            let k = j
54
+
            k
53
55
 
            }
54
56
 
        else 0
55
57
 
    }
56
58
 
57
59
 
58
-
func p (q) = if (if (if ((size(q) == 35))
59
-
    then (take(q, 2) == "3P")
60
+
func q (r) = if (if (if ((size(r) == 35))
61
+
    then (take(r, 2) == "3P")
60
62
 
    else false)
61
63
 
    then true
62
-
    else (take(q, 2) == "3N"))
64
+
    else (take(r, 2) == "3N"))
63
65
 
    then true
64
-
    else (take(q, 2) == "3M")
66
+
    else (take(r, 2) == "3M")
65
67
 
66
68
 
67
-
func r (s,q) = if ((size(q) > 0))
68
-
    then (s + 1)
69
-
    else (s + 0)
69
+
func s (t,r) = if ((size(r) > 0))
70
+
    then (t + 1)
71
+
    else (t + 0)
70
72
 
71
73
 
72
-
func t (u) = {
73
-
    let i = getString(this, u)
74
-
    if ($isInstanceOf(i, "String"))
74
+
func u (v) = {
75
+
    let j = getString(this, v)
76
+
    if ($isInstanceOf(j, "String"))
75
77
 
        then {
76
-
            let j = i
77
-
            if ((j == "PENDING"))
78
+
            let k = j
79
+
            if ((k == "PENDING"))
78
80
 
                then true
79
81
 
                else false
80
82
 
            }
81
83
 
        else false
82
84
 
    }
83
85
 
84
86
 
85
-
func v (w) = take(drop(w, 1), value(indexOf(drop(w, 1), "\"")))
87
+
func w (x) = take(drop(x, 1), value(indexOf(drop(x, 1), "\"")))
86
88
 
87
89
 
88
-
func x (w,u) = {
89
-
    let y = value(indexOf(w, (("\"" + u) + "\":")))
90
-
    let z = drop(w, ((y + size(u)) + 3))
91
-
    let A = v(z)
90
+
func y (x,v) = {
91
+
    let z = value(indexOf(x, (("\"" + v) + "\":")))
92
+
    let A = drop(x, ((z + size(v)) + 3))
93
+
    let B = w(A)
94
+
    B
95
+
    }
96
+
97
+
98
+
func C (x,v) = {
99
+
    let z = value(indexOf(x, (("\"" + v) + "\":")))
100
+
    let A = take(x, ((z + size(v)) + 3))
92
101
 
    A
93
102
 
    }
94
103
 
95
104
 
96
-
func B (w,u) = {
97
-
    let y = value(indexOf(w, (("\"" + u) + "\":")))
98
-
    let z = take(w, ((y + size(u)) + 3))
99
-
    z
105
+
func D (x,v) = {
106
+
    let z = value(indexOf(x, (("\"" + v) + "\":")))
107
+
    let A = takeRight(x, (size(x) - ((((z + size(v)) + 3) + 0) + 2)))
108
+
    A
100
109
 
    }
101
110
 
102
111
 
103
-
func C (w,u) = {
104
-
    let y = value(indexOf(w, (("\"" + u) + "\":")))
105
-
    let z = takeRight(w, (size(w) - ((((y + size(u)) + 3) + 0) + 2)))
106
-
    z
107
-
    }
108
-
109
-
110
-
func D (E) = {
111
-
    let i = E
112
-
    if ($isInstanceOf(i, "String"))
112
+
func E (F) = {
113
+
    let j = F
114
+
    if ($isInstanceOf(j, "String"))
113
115
 
        then {
114
-
            let F = i
115
-
            F
116
+
            let G = j
117
+
            G
116
118
 
            }
117
119
 
        else throw("Sponsored Public Key String expected")
118
120
 
    }
119
121
 
120
122
 
121
-
@Callable(G)
122
-
func fileCertification (H,I,h,J,K) = {
123
-
    let L = value(G.transactionId)
124
-
    let M = f(H, h)
125
-
    let N = m(h)
126
-
    let O = (this == G.caller)
127
-
    let o = if (O)
128
-
        then toString(addressFromPublicKey(fromBase58String(K)))
129
-
        else toBase58String(G.caller.bytes)
130
-
    let P = n(o)
131
-
    if ((M != "NONE"))
123
+
@Callable(H)
124
+
func fileCertification (I,J,i,K,L) = {
125
+
    let M = value(H.transactionId)
126
+
    let N = g(I, i)
127
+
    let O = n(i)
128
+
    let P = (this == H.caller)
129
+
    let p = if (P)
130
+
        then toString(addressFromPublicKey(fromBase58String(L)))
131
+
        else toBase58String(H.caller.bytes)
132
+
    let Q = o(p)
133
+
    if ((N != "NONE"))
132
134
 
        then throw("This entry already exist")
133
-
        else if ((N != "NONE"))
135
+
        else if ((O != "NONE"))
134
136
 
            then throw("This uuid already exist")
135
-
            else if ((size(h) != 36))
137
+
            else if ((size(i) != 36))
136
138
 
                then throw("Uuid should be 36 characters.")
137
-
                else if ((size(H) != 64))
139
+
                else if ((size(I) != 64))
138
140
 
                    then throw("Hash should be 64 characters.")
139
-
                    else if ((size(I) > 100))
141
+
                    else if ((size(J) > 100))
140
142
 
                        then throw("Title is too long, 100 characters max.")
141
-
                        else if (if (if (contains(H, "\""))
142
-
                            then true
143
-
                            else contains(I, "\""))
143
+
                        else if (if (if (contains(I, "\""))
144
144
 
                            then true
145
145
 
                            else contains(J, "\""))
146
+
                            then true
147
+
                            else contains(K, "\""))
146
148
 
                            then throw("No \" allowed")
147
149
 
                            else {
148
-
                                let z = (((((((("{\"hash\":\"" + H) + "\",\"timestamp\":") + toString(lastBlock.timestamp)) + ",\"title\":\"") + I) + "\",\"ipfs\":\"") + J) + "\"}")
149
-
                                if ((P > 0))
150
+
                                let A = (((((((("{\"hash\":\"" + I) + "\",\"timestamp\":") + toString(lastBlock.timestamp)) + ",\"title\":\"") + J) + "\",\"ipfs\":\"") + K) + "\"}")
151
+
                                if ((Q > 0))
150
152
 
                                    then {
151
-
                                        let Q = if ((size(J) != 0))
152
-
                                            then (1 + e)
153
+
                                        let R = if ((size(K) != 0))
154
+
                                            then (1 + f)
153
155
 
                                            else 1
154
-
                                        if ((0 > (P - Q)))
156
+
                                        if ((0 > (Q - R)))
155
157
 
                                            then throw("Not enough credit")
156
-
                                            else [StringEntry(h, toBase58String(L)), StringEntry((H + h), toBase58String(L)), StringEntry((I + h), toBase58String(L)), IntegerEntry(("addr_WHITELISTED_" + o), (P - Q)), StringEntry(((("data_fc_" + toBase58String(L)) + "_") + o), z), ScriptTransfer(addressFromStringValue(o), 0, c)]
158
+
                                            else [StringEntry(i, toBase58String(M)), StringEntry((I + i), toBase58String(M)), StringEntry((J + i), toBase58String(M)), IntegerEntry(("addr_WHITELISTED_" + p), (Q - R)), StringEntry(((("data_fc_" + toBase58String(M)) + "_") + p), A), ScriptTransfer(addressFromStringValue(p), 0, c)]
157
159
 
                                        }
158
-
                                    else if (!(O))
160
+
                                    else if (!(P))
159
161
 
                                        then {
160
-
                                            let R = value(G.payments[0])
161
-
                                            let S = value(R.amount)
162
-
                                            let T = if (isDefined(R.assetId))
163
-
                                                then value(R.assetId)
162
+
                                            let S = value(H.payments[0])
163
+
                                            let T = value(S.amount)
164
+
                                            let U = if (isDefined(S.assetId))
165
+
                                                then value(S.assetId)
164
166
 
                                                else throw("Waves is not accepted as payment")
165
-
                                            let U = getIntegerValue(a, ("certification_fee_" + toBase58String(value(T))))
166
-
                                            let V = if ((size(J) != 0))
167
-
                                                then (U + (e * U))
168
-
                                                else U
169
-
                                            if ((c != T))
167
+
                                            let V = getIntegerValue(a, ("certification_fee_" + toBase58String(value(U))))
168
+
                                            let W = if ((size(K) != 0))
169
+
                                                then (V + (f * V))
170
+
                                                else V
171
+
                                            if ((c != U))
170
172
 
                                                then throw("This token is not accepted at the moment")
171
-
                                                else if (if ((S != V))
172
-
                                                    then (0 >= P)
173
+
                                                else if (if ((T != W))
174
+
                                                    then (0 >= Q)
173
175
 
                                                    else false)
174
176
 
                                                    then throw("The price is wrong")
175
-
                                                    else [StringEntry(h, toBase58String(L)), StringEntry((H + h), toBase58String(L)), StringEntry((I + h), toBase58String(L)), StringEntry(((("data_fc_" + toBase58String(L)) + "_") + o), z), ScriptTransfer(addressFromStringValue(b), V, R.assetId)]
177
+
                                                    else [StringEntry(i, toBase58String(M)), StringEntry((I + i), toBase58String(M)), StringEntry((J + i), toBase58String(M)), StringEntry(((("data_fc_" + toBase58String(M)) + "_") + p), A), ScriptTransfer(addressFromStringValue(b), W, S.assetId)]
176
178
 
                                            }
177
179
 
                                        else throw("You are not allowed to do that")
178
180
 
                                }
179
181
 
    }
180
182
 
181
183
 
182
184
 
183
-
@Callable(G)
184
-
func revokeCertification (W,K) = {
185
-
    let L = value(G.transactionId)
186
-
    let O = (this == G.caller)
187
-
    let o = if (O)
188
-
        then toString(addressFromPublicKey(fromBase58String(K)))
189
-
        else toBase58String(G.caller.bytes)
190
-
    let M = {
191
-
        let i = getString(this, ((("data_fc_" + W) + "_") + o))
192
-
        if ($isInstanceOf(i, "String"))
185
+
@Callable(H)
186
+
func revokeCertification (X,L) = {
187
+
    let M = value(H.transactionId)
188
+
    let P = (this == H.caller)
189
+
    let p = if (P)
190
+
        then toString(addressFromPublicKey(fromBase58String(L)))
191
+
        else toBase58String(H.caller.bytes)
192
+
    let N = {
193
+
        let j = getString(this, ((("data_fc_" + X) + "_") + p))
194
+
        if ($isInstanceOf(j, "String"))
193
195
 
            then {
194
-
                let j = i
195
-
                j
196
+
                let k = j
197
+
                k
196
198
 
                }
197
199
 
            else "NONE"
198
200
 
        }
199
-
    let X = {
200
-
        let i = getString(this, ("STATUS_FC_" + W))
201
-
        if ($isInstanceOf(i, "String"))
201
+
    let Y = {
202
+
        let j = getString(this, ("STATUS_FC_" + X))
203
+
        if ($isInstanceOf(j, "String"))
202
204
 
            then {
203
-
                let j = i
204
-
                j
205
+
                let k = j
206
+
                k
205
207
 
                }
206
208
 
            else "NONE"
207
209
 
        }
208
-
    let P = n(o)
209
-
    let Y = (((dropRight(M, 1) + ",\"status\":\"REVOKED_") + toBase58String(L)) + "\"}")
210
-
    if ((X != "NONE"))
210
+
    let Q = o(p)
211
+
    let Z = (((dropRight(N, 1) + ",\"status\":\"REVOKED_") + toBase58String(M)) + "\"}")
212
+
    if ((Y != "NONE"))
211
213
 
        then throw("This certification have already been revoked.")
212
-
        else if ((M == "NONE"))
214
+
        else if ((N == "NONE"))
213
215
 
            then throw("You cannot change the status of this certification.")
214
-
            else if ((P > 0))
215
-
                then [IntegerEntry(("addr_WHITELISTED_" + o), (P - 1)), StringEntry(("STATUS_FC_" + W), ("REVOKED_" + toBase58String(L))), StringEntry(((("data_fc_" + W) + "_") + o), Y), ScriptTransfer(addressFromStringValue(o), 0, c)]
216
-
                else if (!(O))
216
+
            else if ((Q > 0))
217
+
                then [IntegerEntry(("addr_WHITELISTED_" + p), (Q - 1)), StringEntry(("STATUS_FC_" + X), ("REVOKED_" + toBase58String(M))), StringEntry(((("data_fc_" + X) + "_") + p), Z), ScriptTransfer(addressFromStringValue(p), 0, c)]
218
+
                else if (!(P))
217
219
 
                    then {
218
-
                        let R = value(G.payments[0])
219
-
                        let S = value(R.amount)
220
-
                        let T = if (isDefined(R.assetId))
221
-
                            then value(R.assetId)
220
+
                        let S = value(H.payments[0])
221
+
                        let T = value(S.amount)
222
+
                        let U = if (isDefined(S.assetId))
223
+
                            then value(S.assetId)
222
224
 
                            else throw("Waves is not accepted as payment")
223
-
                        let U = getIntegerValue(a, ("certification_fee_" + toBase58String(value(T))))
224
-
                        if ((c != T))
225
+
                        let V = getIntegerValue(a, ("certification_fee_" + toBase58String(value(U))))
226
+
                        if ((c != U))
225
227
 
                            then throw("This token is not accepted at the moment")
226
-
                            else if (if ((S != U))
227
-
                                then (0 >= P)
228
+
                            else if (if ((T != V))
229
+
                                then (0 >= Q)
228
230
 
                                else false)
229
231
 
                                then throw("The price is wrong")
230
-
                                else [StringEntry(("STATUS_FC_" + W), ("REVOKED_" + toBase58String(L))), StringEntry(((("data_fc_" + W) + "_") + o), Y), ScriptTransfer(addressFromStringValue(b), S, R.assetId)]
232
+
                                else [StringEntry(("STATUS_FC_" + X), ("REVOKED_" + toBase58String(M))), StringEntry(((("data_fc_" + X) + "_") + p), Z), ScriptTransfer(addressFromStringValue(b), T, S.assetId)]
231
233
 
                        }
232
234
 
                    else throw("You are not allowed to do that")
233
235
 
    }
234
236
 
235
237
 
236
238
 
237
-
@Callable(G)
238
-
func emailCertification (l,I,h,K) = {
239
-
    let L = value(G.transactionId)
240
-
    let M = k(l, h)
241
-
    let N = m(h)
242
-
    let O = (this == G.caller)
243
-
    let o = if (O)
244
-
        then toString(addressFromPublicKey(fromBase58String(K)))
245
-
        else toBase58String(G.caller.bytes)
246
-
    let P = n(o)
247
-
    if ((M != "NONE"))
248
-
        then throw("This entry already exist")
249
-
        else if ((N != "NONE"))
250
-
            then throw("This uuid already exist")
251
-
            else if ((size(h) > 36))
252
-
                then throw("Uuid is too long, 36 characters max.")
253
-
                else if ((size(l) > 150))
254
-
                    then throw("Domain is too long, 150 characters max.")
255
-
                    else if ((size(I) > 100))
256
-
                        then throw("Title is too long, 100 characters max.")
257
-
                        else if (if (if (contains(h, "\""))
258
-
                            then true
259
-
                            else contains(I, "\""))
260
-
                            then true
261
-
                            else contains(l, "\""))
262
-
                            then throw("No \" allowed")
263
-
                            else {
264
-
                                let z = (((((((("{\"messageid\":\"" + h) + "@") + l) + "\",\"timestamp\":") + toString(lastBlock.timestamp)) + ",\"reference\":\"") + I) + "\"}")
265
-
                                if ((P > 0))
266
-
                                    then [StringEntry(h, toBase58String(L)), StringEntry(((h + "@") + l), toBase58String(L)), StringEntry((I + h), toBase58String(L)), IntegerEntry(("addr_WHITELISTED_" + o), (P - 1)), StringEntry(((("data_ec_" + toBase58String(L)) + "_") + o), z), ScriptTransfer(addressFromStringValue(o), 0, c)]
267
-
                                    else if (!(O))
268
-
                                        then {
269
-
                                            let R = value(G.payments[0])
270
-
                                            let S = value(R.amount)
271
-
                                            let T = if (isDefined(R.assetId))
272
-
                                                then value(R.assetId)
273
-
                                                else throw("Waves is not accepted as payment")
274
-
                                            let U = getIntegerValue(a, ("certification_fee_" + toBase58String(value(T))))
275
-
                                            if ((c != T))
276
-
                                                then throw("This token is not accepted at the moment")
277
-
                                                else if (if ((S != U))
278
-
                                                    then (0 >= P)
279
-
                                                    else false)
280
-
                                                    then throw("The price is wrong")
281
-
                                                    else [StringEntry(h, toBase58String(L)), StringEntry(((h + "@") + l), toBase58String(L)), StringEntry((I + h), toBase58String(L)), StringEntry(((("data_ec_" + toBase58String(L)) + "_") + o), z), ScriptTransfer(addressFromStringValue(b), S, R.assetId)]
282
-
                                            }
283
-
                                        else throw("You are not allowed to do that")
284
-
                                }
239
+
@Callable(H)
240
+
func usdnSignCredits () = {
241
+
    let S = value(H.payments[0])
242
+
    let p = toBase58String(H.caller.bytes)
243
+
    let aa = value(S.assetId)
244
+
    let T = value(S.amount)
245
+
    let ab = ((T * 2) / 1000000)
246
+
    let Q = o(p)
247
+
    if ((toBase58String(aa) != d))
248
+
        then throw("Only USDN can be exchanged")
249
+
        else if (if (((T % 1000000) != 0))
250
+
            then ((T % 1000000) != 500000)
251
+
            else false)
252
+
            then throw(((("You can only exchange multiple of 0.5, you sent:" + dropRight(toString(T), 6)) + ".") + takeRight(toString(T), 6)))
253
+
            else [IntegerEntry(("addr_WHITELISTED_" + p), (Q + ab)), ScriptTransfer(addressFromStringValue(b), T, aa)]
285
254
 
    }
286
255
 
287
256
 
288
-
289
-
@Callable(G)
290
-
func createAgreement (H,I,Z,aa,K,h) = {
291
-
    let L = value(G.transactionId)
292
-
    let M = f(H, h)
293
-
    let N = m(h)
294
-
    let O = (this == G.caller)
295
-
    let o = if (O)
296
-
        then toString(addressFromPublicKey(fromBase58String(K)))
297
-
        else toBase58String(G.caller.bytes)
298
-
    let P = n(o)
299
-
    let ab = ((((B(Z, "creator") + "\"") + o) + "\"") + C(Z, "creator"))
300
-
    let ac = split(aa, ",")
301
-
    let ad = size(ac)
302
-
    let ae = StringEntry((I + h), toBase58String(L))
303
-
    let af = StringEntry((H + h), toBase58String(L))
304
-
    let ag = StringEntry(((("data_MA_" + toBase58String(L)) + "_") + o), ab)
305
-
    let ah = StringEntry(((o + "_MA_") + toBase58String(L)), ("SIGNED_" + toBase58String(L)))
306
-
    let ai = IntegerEntry(("addr_WHITELISTED_" + o), (P - (ad + 1)))
307
-
    if ((M != "NONE"))
308
-
        then throw("This entry already exist")
309
-
        else if ((N != "NONE"))
310
-
            then throw("This uuid already exist")
311
-
            else if ((size(h) > 36))
312
-
                then throw("Uuid is too long, 36 characters max.")
313
-
                else if ((size(H) > 64))
314
-
                    then throw("Message-id is too long, 64 characters max.")
315
-
                    else if ((size(I) > 100))
316
-
                        then throw("Title is too long, 100 characters max.")
317
-
                        else if ((P > 0))
318
-
                            then if (((ad + 1) > P))
319
-
                                then throw("You don't have enough certification credit")
320
-
                                else if ((ad == 6))
321
-
                                    then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[4] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[5] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c), ScriptTransfer(addressFromStringValue(ac[4]), 0, c), ScriptTransfer(addressFromStringValue(ac[5]), 0, c)]
322
-
                                    else if ((ad == 5))
323
-
                                        then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[4] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c), ScriptTransfer(addressFromStringValue(ac[4]), 0, c)]
324
-
                                        else if ((ad == 4))
325
-
                                            then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c)]
326
-
                                            else if ((ad == 3))
327
-
                                                then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c)]
328
-
                                                else if ((ad == 2))
329
-
                                                    then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c)]
330
-
                                                    else if ((ad == 1))
331
-
                                                        then [ae, af, ag, ah, ai, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(o), 0, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c)]
332
-
                                                        else throw("Wrong number of participants")
333
-
                            else if (!(O))
334
-
                                then {
335
-
                                    let R = value(G.payments[0])
336
-
                                    let S = if (isDefined(R.amount))
337
-
                                        then value(R.amount)
338
-
                                        else 0
339
-
                                    let T = if (isDefined(R.assetId))
340
-
                                        then value(R.assetId)
341
-
                                        else c
342
-
                                    let U = getIntegerValue(a, ("certification_fee_" + toBase58String(value(T))))
343
-
                                    if (((U * (ad + 1)) > S))
344
-
                                        then throw(("The price is wrong, it should be " + toString((U * (ad + 1)))))
345
-
                                        else if ((ad == 6))
346
-
                                            then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[4] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[5] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c), ScriptTransfer(addressFromStringValue(ac[4]), 0, c), ScriptTransfer(addressFromStringValue(ac[5]), 0, c)]
347
-
                                            else if ((ad == 5))
348
-
                                                then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[4] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c), ScriptTransfer(addressFromStringValue(ac[4]), 0, c)]
349
-
                                                else if ((ad == 4))
350
-
                                                    then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[3] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c), ScriptTransfer(addressFromStringValue(ac[3]), 0, c)]
351
-
                                                    else if ((ad == 3))
352
-
                                                        then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[2] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c), ScriptTransfer(addressFromStringValue(ac[2]), 0, c)]
353
-
                                                        else if ((ad == 2))
354
-
                                                            then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), StringEntry(((ac[1] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c), ScriptTransfer(addressFromStringValue(ac[1]), 0, c)]
355
-
                                                            else if ((ad == 1))
356
-
                                                                then [ae, af, ag, ah, StringEntry(((ac[0] + "_MA_") + toBase58String(L)), "PENDING"), ScriptTransfer(addressFromStringValue(b), S, c), ScriptTransfer(addressFromStringValue(ac[0]), 0, c)]
357
-
                                                                else throw(("Needs 1 to 6 recipient addresses, currently sent: " + toString(ad)))
358
-
                                    }
359
-
                                else throw("You are not allowed to do that")
360
-
    }
361
-
362
-
363
-
364
-
@Callable(G)
365
-
func signAgreement (H,aj,K) = {
366
-
    let R = value(G.payments[0])
367
-
    let S = value(R.amount)
368
-
    let L = value(G.transactionId)
369
-
    let O = (this == G.caller)
370
-
    let ak = if (O)
371
-
        then toString(addressFromPublicKey(fromBase58String(K)))
372
-
        else toBase58String(G.caller.bytes)
373
-
    let al = t(((ak + "_MA_") + aj))
374
-
    if (!(al))
375
-
        then throw("Sorry there is no pending signature")
376
-
        else [StringEntry(((ak + "_MA_") + aj), ("SIGNED_" + toBase58String(L))), ScriptTransfer(addressFromStringValue(ak), 0, c)]
377
-
    }
378
-
379
-
380
-
381
-
@Callable(G)
382
-
func usdnSignCredits () = {
383
-
    let R = value(G.payments[0])
384
-
    let o = toBase58String(G.caller.bytes)
385
-
    let am = value(R.assetId)
386
-
    let S = value(R.amount)
387
-
    let an = ((S * 2) / 1000000)
388
-
    let P = n(o)
389
-
    if ((toBase58String(am) != d))
390
-
        then throw("Only USDN can be exchanged")
391
-
        else if (if (((S % 1000000) != 0))
392
-
            then ((S % 1000000) != 500000)
393
-
            else false)
394
-
            then throw(((("You can only exchange multiple of 0.5, you sent:" + dropRight(toString(S), 6)) + ".") + takeRight(toString(S), 6)))
395
-
            else [IntegerEntry(("addr_WHITELISTED_" + o), (P + an)), ScriptTransfer(addressFromStringValue(b), S, am)]
396
-
    }
397
-
398
-
399
-
@Verifier(ao)
400
-
func ap () = {
401
-
    let i = ao
402
-
    if ($isInstanceOf(i, "InvokeScriptTransaction"))
257
+
@Verifier(ac)
258
+
func ad () = {
259
+
    let j = ac
260
+
    if ($isInstanceOf(j, "InvokeScriptTransaction"))
403
261
 
        then {
404
-
            let aq = i
405
-
            if (if ((aq.function == "fileCertification"))
406
-
                then true
407
-
                else (aq.function == "createAgreement"))
408
-
                then sigVerify(ao.bodyBytes, ao.proofs[0], fromBase58String(D(aq.args[4])))
409
-
                else if ((aq.function == "emailCertification"))
410
-
                    then sigVerify(ao.bodyBytes, ao.proofs[0], fromBase58String(D(aq.args[3])))
411
-
                    else if ((aq.function == "signAgreement"))
412
-
                        then sigVerify(ao.bodyBytes, ao.proofs[0], fromBase58String(D(aq.args[2])))
413
-
                        else if ((aq.function == "revokeCertification"))
414
-
                            then sigVerify(ao.bodyBytes, ao.proofs[0], fromBase58String(D(aq.args[1])))
415
-
                            else sigVerify(ao.bodyBytes, ao.proofs[0], ao.senderPublicKey)
262
+
            let ae = j
263
+
            if (if (if (if ((ae.function == "fileCertification"))
264
+
                then (ae.dApp == this)
265
+
                else false)
266
+
                then (ae.fee == 500000)
267
+
                else false)
268
+
                then (ae.feeAssetId == unit)
269
+
                else false)
270
+
                then sigVerify(ac.bodyBytes, ac.proofs[0], fromBase58String(E(ae.args[4])))
271
+
                else if (if (if (if ((ae.function == "revokeCertification"))
272
+
                    then (ae.dApp == this)
273
+
                    else false)
274
+
                    then (ae.fee == 500000)
275
+
                    else false)
276
+
                    then (ae.feeAssetId == unit)
277
+
                    else false)
278
+
                    then sigVerify(ac.bodyBytes, ac.proofs[0], fromBase58String(E(ae.args[1])))
279
+
                    else sigVerify(ac.bodyBytes, ac.proofs[0], ac.senderPublicKey)
416
280
 
            }
417
-
        else sigVerify(ao.bodyBytes, ao.proofs[0], ao.senderPublicKey)
281
+
        else sigVerify(ac.bodyBytes, ac.proofs[0], ac.senderPublicKey)
418
282
 
    }
419
283
 

github/deemru/w8io/3ef1775 
191.18 ms ◑