w8 · tx · FdY···HVq

tx · FdYDozj552AqNm3WaY2ypPnbC1TXBioXnSNLsuyxRHVq

3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB:  -0.01400000 Waves

2021.09.28 11:05 [1722533] smart account 3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FdYDozj552AqNm3WaY2ypPnbC1TXBioXnSNLsuyxRHVq",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1632816336630,
    "version": 2,
    "chainId": 84,
    "sender": "3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB",
    "senderPublicKey": "Gd5NihbWQoWuTnSvq25TuV2BYZG4U1e9KDqZn9zBPix7",
    "proofs": [
        "4vAQYSA6REkQge7RA4o2TXb2PQmhUDegB3Y2tofBu3U27yCu96fsn9iquBa8ccFFhDJD2rV58HZSfCYWP1DSpm2z"
    ],
    "script": "base64:AAIFAAAAAAAAAC0IAhIHCgUICAgICBIECgIICBIHCgUICAgICBIICgYICAgICAgSBQoDCAgIEgAAAAAQAAAAAA9zdG9yYWdlVmVyaWZpZXIJAQAAAAV2YWx1ZQAAAAEJAAQmAAAAAQIAAAAjM04yczVSdGFIUEJlbkNzeDJFQ2NvRlJiWUh4M25vWmhYVzEAAAAABGJhbmsCAAAAIzNOMUU2dFhkZFJvVmFSZlE5ZFEzdmc1TGFXMmZzZDhIS3ViAAAAAA1hY2NlcHRlZFRva2VuAQAAACDopWq8yndC8nBhMjVKT0WDubke5ZlnF8Nx6tkLoQSt6wAAAAAGdXNkbklEAgAAACwzS0ZYQkdHTENqQTVaMkR1VzREcTlmRERySGpKSlAxWkVrYW9halN6dUtzQwEAAAAKY2hlY2tFbnRyeQAAAAIAAAAGcHJlZml4AAAABHV1aWQEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAZwcmVmaXgFAAAABHV1aWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQIAAAAETk9ORQEAAAAPY2hlY2tFbnRyeUVtYWlsAAAAAgAAAAR1dWlkAAAABmRvbWFpbgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgUAAAAEdXVpZAIAAAABQAUAAAAGZG9tYWluAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWECAAAABE5PTkUBAAAACWNoZWNrVVVJRAAAAAEAAAAEdXVpZAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAAR1dWlkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWECAAAABE5PTkUBAAAAEmNoZWNrSWZXaGl0ZUxpc3RlZAAAAAEAAAANY2FsbGVyQWRkcmVzcwQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEWFkZHJfV0hJVEVMSVNURURfBQAAAA1jYWxsZXJBZGRyZXNzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAABAAAACGlzQWRyZXNzAAAAAQAAAARhZGRyAwMDCQAAAAAAAAIJAAExAAAAAQUAAAAEYWRkcgAAAAAAAAAAIwkAAAAAAAACCQABLwAAAAIFAAAABGFkZHIAAAAAAAAAAAICAAAAAjNQBwYJAAAAAAAAAgkAAS8AAAACBQAAAARhZGRyAAAAAAAAAAACAgAAAAIzTgYJAAAAAAAAAgkAAS8AAAACBQAAAARhZGRyAAAAAAAAAAACAgAAAAIzTQEAAAAMY291bnRQYXJ0aWVzAAAAAgAAAAthY2N1bXVsYXRvcgAAAARhZGRyAwkAAGYAAAACCQABMQAAAAEFAAAABGFkZHIAAAAAAAAAAAAJAABkAAAAAgUAAAALYWNjdW11bGF0b3IAAAAAAAAAAAEJAABkAAAAAgUAAAALYWNjdW11bGF0b3IAAAAAAAAAAAABAAAAFGNoZWNrSWZQZW5kaW5nVG9TaWduAAAAAQAAAANrZXkEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDADCQAAAAAAAAIFAAAAAWECAAAAB1BFTkRJTkcGBwcBAAAADmdldFZhbHVlU3RyaW5nAAAAAQAAAARqc29uCQABLwAAAAIJAAEwAAAAAgUAAAAEanNvbgAAAAAAAAAAAQkBAAAABXZhbHVlAAAAAQkABLMAAAACCQABMAAAAAIFAAAABGpzb24AAAAAAAAAAAECAAAAASIBAAAACGdldFZhbHVlAAAAAgAAAARqc29uAAAAA2tleQQAAAAIa2V5SW5kZXgJAQAAAAV2YWx1ZQAAAAEJAASzAAAAAgUAAAAEanNvbgkAASwAAAACCQABLAAAAAICAAAAASIFAAAAA2tleQIAAAACIjoEAAAABGRhdGEJAAEwAAAAAgUAAAAEanNvbgkAAGQAAAACCQAAZAAAAAIFAAAACGtleUluZGV4CQABMQAAAAEFAAAAA2tleQAAAAAAAAAAAwQAAAAJanNvblZhbHVlCQEAAAAOZ2V0VmFsdWVTdHJpbmcAAAABBQAAAARkYXRhBQAAAAlqc29uVmFsdWUBAAAAEmdldEpzb25CZWZvcmVWYWx1ZQAAAAIAAAAEanNvbgAAAANrZXkEAAAACGtleUluZGV4CQEAAAAFdmFsdWUAAAABCQAEswAAAAIFAAAABGpzb24JAAEsAAAAAgkAASwAAAACAgAAAAEiBQAAAANrZXkCAAAAAiI6BAAAAARkYXRhCQABLwAAAAIFAAAABGpzb24JAABkAAAAAgkAAGQAAAACBQAAAAhrZXlJbmRleAkAATEAAAABBQAAAANrZXkAAAAAAAAAAAMFAAAABGRhdGEBAAAAEWdldEpzb25BZnRlclZhbHVlAAAAAgAAAARqc29uAAAAA2tleQQAAAAIa2V5SW5kZXgJAQAAAAV2YWx1ZQAAAAEJAASzAAAAAgUAAAAEanNvbgkAASwAAAACCQABLAAAAAICAAAAASIFAAAAA2tleQIAAAACIjoEAAAABGRhdGEJAQAAAAl0YWtlUmlnaHQAAAACBQAAAARqc29uCQAAZQAAAAIJAAExAAAAAQUAAAAEanNvbgkAAGQAAAACCQAAZAAAAAIJAABkAAAAAgkAAGQAAAACBQAAAAhrZXlJbmRleAkAATEAAAABBQAAAANrZXkAAAAAAAAAAAMAAAAAAAAAAAAAAAAAAAAAAAIFAAAABGRhdGEBAAAACGFzU3RyaW5nAAAAAQAAAAJidgQAAAAHJG1hdGNoMAUAAAACYnYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAADYnYwBQAAAAckbWF0Y2gwBQAAAANidjAJAAACAAAAAQIAAAAkU3BvbnNvcmVkIFB1YmxpYyBLZXkgU3RyaW5nIGV4cGVjdGVkAAAABgAAAAZpbnZva2UBAAAAEWZpbGVDZXJ0aWZpY2F0aW9uAAAABQAAAARoYXNoAAAABXRpdGxlAAAABHV1aWQAAAAEZGF0YQAAAAxzaWduZXJQdWJLZXkEAAAAAmlkCQEAAAAFdmFsdWUAAAABCAUAAAAGaW52b2tlAAAADXRyYW5zYWN0aW9uSWQEAAAACmVudHJ5RXhpc3QJAQAAAApjaGVja0VudHJ5AAAAAgUAAAAEaGFzaAUAAAAEdXVpZAQAAAAJdXVpZEV4aXN0CQEAAAAJY2hlY2tVVUlEAAAAAQUAAAAEdXVpZAQAAAAMY2FsbGVySXNEYXBwCQAAAAAAAAIFAAAABHRoaXMIBQAAAAZpbnZva2UAAAAGY2FsbGVyBAAAAA1jYWxsZXJBZGRyZXNzAwUAAAAMY2FsbGVySXNEYXBwCQAEJQAAAAEJAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEJAAJZAAAAAQUAAAAMc2lnbmVyUHViS2V5CQACWAAAAAEICAUAAAAGaW52b2tlAAAABmNhbGxlcgAAAAVieXRlcwQAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQkBAAAAEmNoZWNrSWZXaGl0ZUxpc3RlZAAAAAEFAAAADWNhbGxlckFkZHJlc3MDCQEAAAACIT0AAAACBQAAAAplbnRyeUV4aXN0AgAAAAROT05FCQAAAgAAAAECAAAAGFRoaXMgZW50cnkgYWxyZWFkeSBleGlzdAMJAQAAAAIhPQAAAAIFAAAACXV1aWRFeGlzdAIAAAAETk9ORQkAAAIAAAABAgAAABdUaGlzIHV1aWQgYWxyZWFkeSBleGlzdAMJAQAAAAIhPQAAAAIJAAExAAAAAQUAAAAEdXVpZAAAAAAAAAAAJAkAAAIAAAABAgAAAB1VdWlkIHNob3VsZCBiZSAzNiBjaGFyYWN0ZXJzLgMJAQAAAAIhPQAAAAIJAAExAAAAAQUAAAAEaGFzaAAAAAAAAAAAQAkAAAIAAAABAgAAAB1IYXNoIHNob3VsZCBiZSA2NCBjaGFyYWN0ZXJzLgMJAABmAAAAAgkAATEAAAABBQAAAAV0aXRsZQAAAAAAAAAAQAkAAAIAAAABAgAAACVUaXRsZSBpcyB0b28gbG9uZywgNjQgY2hhcmFjdGVycyBtYXguAwkAAGYAAAACBQAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtAAAAAAAAAAAACQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACBQAAAARoYXNoBQAAAAR1dWlkCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAFdGl0bGUFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAARYWRkcl9XSElURUxJU1RFRF8FAAAADWNhbGxlckFkZHJlc3MJAABlAAAAAgUAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQAAAAAAAAAAAQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhkYXRhX2ZjXwkAAlgAAAABBQAAAAJpZAIAAAABXwUAAAANY2FsbGVyQWRkcmVzcwUAAAAEZGF0YQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAA1jYWxsZXJBZGRyZXNzAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwDCQEAAAABIQAAAAEFAAAADGNhbGxlcklzRGFwcAQAAAAHcGF5bWVudAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAAGaW52b2tlAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAZhbW91bnQJAQAAAAV2YWx1ZQAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAQAAAAOcGF5bWVudEFzc2V0SWQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkBAAAABXZhbHVlAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkAAAIAAAABAgAAACBXYXZlcyBpcyBub3QgYWNjZXB0ZWQgYXMgcGF5bWVudAQAAAAMY3VycmVudFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAA9zdG9yYWdlVmVyaWZpZXIJAAEsAAAAAgIAAAASY2VydGlmaWNhdGlvbl9mZWVfCQACWAAAAAEJAQAAAAV2YWx1ZQAAAAEFAAAADnBheW1lbnRBc3NldElkAwkBAAAAAiE9AAAAAgUAAAANYWNjZXB0ZWRUb2tlbgUAAAAOcGF5bWVudEFzc2V0SWQJAAACAAAAAQIAAAAoVGhpcyB0b2tlbiBpcyBub3QgYWNjZXB0ZWQgYXQgdGhlIG1vbWVudAMDCQEAAAACIT0AAAACBQAAAAZhbW91bnQFAAAADGN1cnJlbnRQcmljZQkAAGcAAAACAAAAAAAAAAAABQAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtBwkAAAIAAAABAgAAABJUaGUgcHJpY2UgaXMgd3JvbmcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAABGhhc2gFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACBQAAAAV0aXRsZQUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhkYXRhX2ZjXwkAAlgAAAABBQAAAAJpZAIAAAABXwUAAAANY2FsbGVyQWRkcmVzcwUAAAAEZGF0YQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAARiYW5rBQAAAAZhbW91bnQIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAAA25pbAkAAAIAAAABAgAAAB5Zb3UgYXJlIG5vdCBhbGxvd2VkIHRvIGRvIHRoYXQAAAAGaW52b2tlAQAAABNyZXZva2VDZXJ0aWZpY2F0aW9uAAAAAgAAAA9jZXJ0aWZpY2F0aW9uSWQAAAAMc2lnbmVyUHViS2V5BAAAAAJpZAkBAAAABXZhbHVlAAAAAQgFAAAABmludm9rZQAAAA10cmFuc2FjdGlvbklkBAAAAAxjYWxsZXJJc0RhcHAJAAAAAAAAAgUAAAAEdGhpcwgFAAAABmludm9rZQAAAAZjYWxsZXIEAAAADWNhbGxlckFkZHJlc3MDBQAAAAxjYWxsZXJJc0RhcHAJAAQlAAAAAQkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQkAAlkAAAABBQAAAAxzaWduZXJQdWJLZXkJAAJYAAAAAQgIBQAAAAZpbnZva2UAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAplbnRyeUV4aXN0BAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGRhdGFfZmNfBQAAAA9jZXJ0aWZpY2F0aW9uSWQCAAAAAV8FAAAADWNhbGxlckFkZHJlc3MDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQIAAAAETk9ORQQAAAAJaXNSZXZva2VkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAAKU1RBVFVTX0ZDXwUAAAAPY2VydGlmaWNhdGlvbklkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWECAAAABE5PTkUEAAAAFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0JAQAAABJjaGVja0lmV2hpdGVMaXN0ZWQAAAABBQAAAA1jYWxsZXJBZGRyZXNzBAAAAAduZXdKc29uCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQEAAAAJZHJvcFJpZ2h0AAAAAgUAAAAKZW50cnlFeGlzdAAAAAAAAAAAAQIAAAATLCJzdGF0dXMiOiJSRVZPS0VEXwkAAlgAAAABBQAAAAJpZAIAAAACIn0DCQEAAAACIT0AAAACBQAAAAlpc1Jldm9rZWQCAAAABE5PTkUJAAACAAAAAQIAAAAtVGhpcyBjZXJ0aWZpY2F0aW9uIGhhdmUgYWxyZWFkeSBiZWVuIHJldm9rZWQuAwkAAAAAAAACBQAAAAplbnRyeUV4aXN0AgAAAAROT05FCQAAAgAAAAECAAAAM1lvdSBjYW5ub3QgY2hhbmdlIHRoZSBzdGF0dXMgb2YgdGhpcyBjZXJ0aWZpY2F0aW9uLgMJAABmAAAAAgUAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABFhZGRyX1dISVRFTElTVEVEXwUAAAANY2FsbGVyQWRkcmVzcwkAAGUAAAACBQAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtAAAAAAAAAAABCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAKU1RBVFVTX0ZDXwUAAAAPY2VydGlmaWNhdGlvbklkCQABLAAAAAICAAAACFJFVk9LRURfCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGRhdGFfZmNfBQAAAA9jZXJ0aWZpY2F0aW9uSWQCAAAAAV8FAAAADWNhbGxlckFkZHJlc3MFAAAAB25ld0pzb24FAAAAA25pbAMJAQAAAAEhAAAAAQUAAAAMY2FsbGVySXNEYXBwBAAAAAdwYXltZW50CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAZpbnZva2UAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAABmFtb3VudAkBAAAABXZhbHVlAAAAAQgFAAAAB3BheW1lbnQAAAAGYW1vdW50BAAAAA5wYXltZW50QXNzZXRJZAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQEAAAAFdmFsdWUAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQAAAgAAAAECAAAAIFdhdmVzIGlzIG5vdCBhY2NlcHRlZCBhcyBwYXltZW50BAAAAAxjdXJyZW50UHJpY2UJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAAD3N0b3JhZ2VWZXJpZmllcgkAASwAAAACAgAAABJjZXJ0aWZpY2F0aW9uX2ZlZV8JAAJYAAAAAQkBAAAABXZhbHVlAAAAAQUAAAAOcGF5bWVudEFzc2V0SWQDCQEAAAACIT0AAAACBQAAAA1hY2NlcHRlZFRva2VuBQAAAA5wYXltZW50QXNzZXRJZAkAAAIAAAABAgAAAChUaGlzIHRva2VuIGlzIG5vdCBhY2NlcHRlZCBhdCB0aGUgbW9tZW50AwMJAQAAAAIhPQAAAAIFAAAABmFtb3VudAUAAAAMY3VycmVudFByaWNlCQAAZwAAAAIAAAAAAAAAAAAFAAAAFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0HCQAAAgAAAAECAAAAElRoZSBwcmljZSBpcyB3cm9uZwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAAClNUQVRVU19GQ18FAAAAD2NlcnRpZmljYXRpb25JZAkAASwAAAACAgAAAAhSRVZPS0VEXwkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhkYXRhX2ZjXwUAAAAPY2VydGlmaWNhdGlvbklkAgAAAAFfBQAAAA1jYWxsZXJBZGRyZXNzBQAAAAduZXdKc29uCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAABGJhbmsFAAAABmFtb3VudAgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAUAAAADbmlsCQAAAgAAAAECAAAAHllvdSBhcmUgbm90IGFsbG93ZWQgdG8gZG8gdGhhdAAAAAZpbnZva2UBAAAAEmVtYWlsQ2VydGlmaWNhdGlvbgAAAAUAAAAGZG9tYWluAAAABXRpdGxlAAAABHV1aWQAAAAEZGF0YQAAAAxzaWduZXJQdWJLZXkEAAAAAmlkCQEAAAAFdmFsdWUAAAABCAUAAAAGaW52b2tlAAAADXRyYW5zYWN0aW9uSWQEAAAACmVudHJ5RXhpc3QJAQAAAA9jaGVja0VudHJ5RW1haWwAAAACBQAAAAZkb21haW4FAAAABHV1aWQEAAAACXV1aWRFeGlzdAkBAAAACWNoZWNrVVVJRAAAAAEFAAAABHV1aWQEAAAADGNhbGxlcklzRGFwcAkAAAAAAAACBQAAAAR0aGlzCAUAAAAGaW52b2tlAAAABmNhbGxlcgQAAAANY2FsbGVyQWRkcmVzcwMFAAAADGNhbGxlcklzRGFwcAkABCUAAAABCQEAAAAUYWRkcmVzc0Zyb21QdWJsaWNLZXkAAAABCQACWQAAAAEFAAAADHNpZ25lclB1YktleQkAAlgAAAABCAgFAAAABmludm9rZQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0JAQAAABJjaGVja0lmV2hpdGVMaXN0ZWQAAAABBQAAAA1jYWxsZXJBZGRyZXNzAwkBAAAAAiE9AAAAAgUAAAAKZW50cnlFeGlzdAIAAAAETk9ORQkAAAIAAAABAgAAABhUaGlzIGVudHJ5IGFscmVhZHkgZXhpc3QDCQEAAAACIT0AAAACBQAAAAl1dWlkRXhpc3QCAAAABE5PTkUJAAACAAAAAQIAAAAXVGhpcyB1dWlkIGFscmVhZHkgZXhpc3QDCQAAZgAAAAIJAAExAAAAAQUAAAAEdXVpZAAAAAAAAAAAJAkAAAIAAAABAgAAACRVdWlkIGlzIHRvbyBsb25nLCAzNiBjaGFyYWN0ZXJzIG1heC4DCQAAZgAAAAIJAAExAAAAAQUAAAAGZG9tYWluAAAAAAAAAABACQAAAgAAAAECAAAAJkRvbWFpbiBpcyB0b28gbG9uZywgNjQgY2hhcmFjdGVycyBtYXguAwkAAGYAAAACCQABMQAAAAEFAAAABXRpdGxlAAAAAAAAAABACQAAAgAAAAECAAAAJVRpdGxlIGlzIHRvbyBsb25nLCA2NCBjaGFyYWN0ZXJzIG1heC4DCQAAZgAAAAIFAAAAFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0AAAAAAAAAAAAJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEdXVpZAIAAAABQAUAAAAGZG9tYWluCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAFdGl0bGUFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAARYWRkcl9XSElURUxJU1RFRF8FAAAADWNhbGxlckFkZHJlc3MJAABlAAAAAgUAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQAAAAAAAAAAAQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhkYXRhX2VjXwkAAlgAAAABBQAAAAJpZAIAAAABXwUAAAANY2FsbGVyQWRkcmVzcwUAAAAEZGF0YQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAA1jYWxsZXJBZGRyZXNzAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwDCQEAAAABIQAAAAEFAAAADGNhbGxlcklzRGFwcAQAAAAHcGF5bWVudAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAAGaW52b2tlAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAZhbW91bnQJAQAAAAV2YWx1ZQAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAQAAAAOcGF5bWVudEFzc2V0SWQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkBAAAABXZhbHVlAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkAAAIAAAABAgAAACBXYXZlcyBpcyBub3QgYWNjZXB0ZWQgYXMgcGF5bWVudAQAAAAMY3VycmVudFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAA9zdG9yYWdlVmVyaWZpZXIJAAEsAAAAAgIAAAASY2VydGlmaWNhdGlvbl9mZWVfCQACWAAAAAEJAQAAAAV2YWx1ZQAAAAEFAAAADnBheW1lbnRBc3NldElkAwkBAAAAAiE9AAAAAgUAAAANYWNjZXB0ZWRUb2tlbgUAAAAOcGF5bWVudEFzc2V0SWQJAAACAAAAAQIAAAAoVGhpcyB0b2tlbiBpcyBub3QgYWNjZXB0ZWQgYXQgdGhlIG1vbWVudAMDCQEAAAACIT0AAAACBQAAAAZhbW91bnQFAAAADGN1cnJlbnRQcmljZQkAAGcAAAACAAAAAAAAAAAABQAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtBwkAAAIAAAABAgAAABJUaGUgcHJpY2UgaXMgd3JvbmcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAEdXVpZAIAAAABQAUAAAAGZG9tYWluCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAFdGl0bGUFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIZGF0YV9lY18JAAJYAAAAAQUAAAACaWQCAAAAAV8FAAAADWNhbGxlckFkZHJlc3MFAAAABGRhdGEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50CAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAANuaWwJAAACAAAAAQIAAAAeWW91IGFyZSBub3QgYWxsb3dlZCB0byBkbyB0aGF0AAAABmludm9rZQEAAAAPY3JlYXRlQWdyZWVtZW50AAAABgAAAARoYXNoAAAABXRpdGxlAAAAD3N0cmluZ2lmaWVkSlNPTgAAAAxjb3VudGVyUGFydHMAAAAMc2lnbmVyUHViS2V5AAAABHV1aWQEAAAAAmlkCQEAAAAFdmFsdWUAAAABCAUAAAAGaW52b2tlAAAADXRyYW5zYWN0aW9uSWQEAAAACmVudHJ5RXhpc3QJAQAAAApjaGVja0VudHJ5AAAAAgUAAAAEaGFzaAUAAAAEdXVpZAQAAAAJdXVpZEV4aXN0CQEAAAAJY2hlY2tVVUlEAAAAAQUAAAAEdXVpZAQAAAAMY2FsbGVySXNEYXBwCQAAAAAAAAIFAAAABHRoaXMIBQAAAAZpbnZva2UAAAAGY2FsbGVyBAAAAA1jYWxsZXJBZGRyZXNzAwUAAAAMY2FsbGVySXNEYXBwCQAEJQAAAAEJAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEJAAJZAAAAAQUAAAAMc2lnbmVyUHViS2V5CQACWAAAAAEICAUAAAAGaW52b2tlAAAABmNhbGxlcgAAAAVieXRlcwQAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQkBAAAAEmNoZWNrSWZXaGl0ZUxpc3RlZAAAAAEFAAAADWNhbGxlckFkZHJlc3MEAAAABEpTT04JAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkBAAAAEmdldEpzb25CZWZvcmVWYWx1ZQAAAAIFAAAAD3N0cmluZ2lmaWVkSlNPTgIAAAAHY3JlYXRvcgIAAAABIgUAAAANY2FsbGVyQWRkcmVzcwIAAAABIgkBAAAAEWdldEpzb25BZnRlclZhbHVlAAAAAgUAAAAPc3RyaW5naWZpZWRKU09OAgAAAAdjcmVhdG9yBAAAAA5hZGRyZXNzZXNBcnJheQkABLUAAAACBQAAAAxjb3VudGVyUGFydHMCAAAAASwEAAAADnRvdGFsQWRkcmVzc2VzCQABkAAAAAEFAAAADmFkZHJlc3Nlc0FycmF5BAAAAA9nbG9iYWxEYXRhVGl0bGUJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAFdGl0bGUFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQEAAAADmdsb2JhbERhdGFIYXNoCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAABGhhc2gFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQEAAAADmdsb2JhbERhdGFKc29uCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhkYXRhX01BXwkAAlgAAAABBQAAAAJpZAIAAAABXwUAAAANY2FsbGVyQWRkcmVzcwUAAAAESlNPTgQAAAAPZ2xvYmFsRGF0YU93bmVyCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAANY2FsbGVyQWRkcmVzcwIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAkAASwAAAACAgAAAAdTSUdORURfCQACWAAAAAEFAAAAAmlkBAAAAA9kYXRhV2hpdGVMaXN0ZWQJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEWFkZHJfV0hJVEVMSVNURURfBQAAAA1jYWxsZXJBZGRyZXNzCQAAZQAAAAIFAAAAFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0JAABkAAAAAgUAAAAOdG90YWxBZGRyZXNzZXMAAAAAAAAAAAEDCQEAAAACIT0AAAACBQAAAAplbnRyeUV4aXN0AgAAAAROT05FCQAAAgAAAAECAAAAGFRoaXMgZW50cnkgYWxyZWFkeSBleGlzdAMJAQAAAAIhPQAAAAIFAAAACXV1aWRFeGlzdAIAAAAETk9ORQkAAAIAAAABAgAAABdUaGlzIHV1aWQgYWxyZWFkeSBleGlzdAMJAABmAAAAAgkAATEAAAABBQAAAAR1dWlkAAAAAAAAAAAkCQAAAgAAAAECAAAAJFV1aWQgaXMgdG9vIGxvbmcsIDM2IGNoYXJhY3RlcnMgbWF4LgMJAABmAAAAAgkAATEAAAABBQAAAARoYXNoAAAAAAAAAABACQAAAgAAAAECAAAAKk1lc3NhZ2UtaWQgaXMgdG9vIGxvbmcsIDY0IGNoYXJhY3RlcnMgbWF4LgMJAABmAAAAAgkAATEAAAABBQAAAAV0aXRsZQAAAAAAAAAAQAkAAAIAAAABAgAAACVUaXRsZSBpcyB0b28gbG9uZywgNjQgY2hhcmFjdGVycyBtYXguAwkAAGYAAAACBQAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtAAAAAAAAAAAAAwkAAGYAAAACCQAAZAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAABBQAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtCQAAAgAAAAECAAAAKllvdSBkb24ndCBoYXZlIGVub3VnaCBjZXJ0aWZpY2F0aW9uIGNyZWRpdAMJAAAAAAAAAgUAAAAOdG90YWxBZGRyZXNzZXMAAAAAAAAAAAYJAARMAAAAAgUAAAAPZ2xvYmFsRGF0YVRpdGxlCQAETAAAAAIFAAAADmdsb2JhbERhdGFIYXNoCQAETAAAAAIFAAAADmdsb2JhbERhdGFKc29uCQAETAAAAAIFAAAAD2dsb2JhbERhdGFPd25lcgkABEwAAAACBQAAAA9kYXRhV2hpdGVMaXN0ZWQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAQCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAUCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAANY2FsbGVyQWRkcmVzcwAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAEAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAQAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgUAAAADbmlsAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAABQkABEwAAAACBQAAAA9nbG9iYWxEYXRhVGl0bGUJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUhhc2gJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUpzb24JAARMAAAAAgUAAAAPZ2xvYmFsRGF0YU93bmVyCQAETAAAAAIFAAAAD2RhdGFXaGl0ZUxpc3RlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAA1jYWxsZXJBZGRyZXNzAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABAAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgUAAAADbmlsAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAABAkABEwAAAACBQAAAA9nbG9iYWxEYXRhVGl0bGUJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUhhc2gJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUpzb24JAARMAAAAAgUAAAAPZ2xvYmFsRGF0YU93bmVyCQAETAAAAAIFAAAAD2RhdGFXaGl0ZUxpc3RlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAA1jYWxsZXJBZGRyZXNzAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4FAAAAA25pbAMJAAAAAAAAAgUAAAAOdG90YWxBZGRyZXNzZXMAAAAAAAAAAAMJAARMAAAAAgUAAAAPZ2xvYmFsRGF0YVRpdGxlCQAETAAAAAIFAAAADmdsb2JhbERhdGFIYXNoCQAETAAAAAIFAAAADmdsb2JhbERhdGFKc29uCQAETAAAAAIFAAAAD2dsb2JhbERhdGFPd25lcgkABEwAAAACBQAAAA9kYXRhV2hpdGVMaXN0ZWQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAANY2FsbGVyQWRkcmVzcwAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAEAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgUAAAADbmlsAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAAAgkABEwAAAACBQAAAA9nbG9iYWxEYXRhVGl0bGUJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUhhc2gJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUpzb24JAARMAAAAAgUAAAAPZ2xvYmFsRGF0YU93bmVyCQAETAAAAAIFAAAAD2RhdGFXaGl0ZUxpc3RlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAA1jYWxsZXJBZGRyZXNzAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgUAAAADbmlsAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAAAQkABEwAAAACBQAAAA9nbG9iYWxEYXRhVGl0bGUJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUhhc2gJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUpzb24JAARMAAAAAgUAAAAPZ2xvYmFsRGF0YU93bmVyCQAETAAAAAIFAAAAD2RhdGFXaGl0ZUxpc3RlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAA1jYWxsZXJBZGRyZXNzAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4FAAAAA25pbAkAAAIAAAABAgAAABxXcm9uZyBudW1iZXIgb2YgcGFydGljaXBhbnRzAwkBAAAAASEAAAABBQAAAAxjYWxsZXJJc0RhcHAEAAAAB3BheW1lbnQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAABmludm9rZQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAGYW1vdW50AwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAkBAAAABXZhbHVlAAAAAQgFAAAAB3BheW1lbnQAAAAGYW1vdW50AAAAAAAAAAAABAAAAA5wYXltZW50QXNzZXRJZAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQEAAAAFdmFsdWUAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAA1hY2NlcHRlZFRva2VuBAAAAAxjdXJyZW50UHJpY2UJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAAD3N0b3JhZ2VWZXJpZmllcgkAASwAAAACAgAAABJjZXJ0aWZpY2F0aW9uX2ZlZV8JAAJYAAAAAQkBAAAABXZhbHVlAAAAAQUAAAAOcGF5bWVudEFzc2V0SWQDCQAAZgAAAAIJAABoAAAAAgUAAAAMY3VycmVudFByaWNlCQAAZAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAABBQAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACAgAAACFUaGUgcHJpY2UgaXMgd3JvbmcsIGl0IHNob3VsZCBiZSAJAAGkAAAAAQkAAGgAAAACBQAAAAxjdXJyZW50UHJpY2UJAABkAAAAAgUAAAAOdG90YWxBZGRyZXNzZXMAAAAAAAAAAAEDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAAGCQAETAAAAAIFAAAAD2dsb2JhbERhdGFUaXRsZQkABEwAAAACBQAAAA5nbG9iYWxEYXRhSGFzaAkABEwAAAACBQAAAA5nbG9iYWxEYXRhSnNvbgkABEwAAAACBQAAAA9nbG9iYWxEYXRhT3duZXIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAQCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAUCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABAAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAFAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAAFCQAETAAAAAIFAAAAD2dsb2JhbERhdGFUaXRsZQkABEwAAAACBQAAAA5nbG9iYWxEYXRhSGFzaAkABEwAAAACBQAAAA5nbG9iYWxEYXRhSnNvbgkABEwAAAACBQAAAA9nbG9iYWxEYXRhT3duZXIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAQCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABAAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgUAAAADbmlsAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAABAkABEwAAAACBQAAAA9nbG9iYWxEYXRhVGl0bGUJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUhhc2gJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUpzb24JAARMAAAAAgUAAAAPZ2xvYmFsRGF0YU93bmVyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAABGJhbmsFAAAABmFtb3VudAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAEAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAADCQAETAAAAAIFAAAAD2dsb2JhbERhdGFUaXRsZQkABEwAAAACBQAAAA5nbG9iYWxEYXRhSGFzaAkABEwAAAACBQAAAA5nbG9iYWxEYXRhSnNvbgkABEwAAAACBQAAAA9nbG9iYWxEYXRhT3duZXIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAACCQAETAAAAAIFAAAAD2dsb2JhbERhdGFUaXRsZQkABEwAAAACBQAAAA5nbG9iYWxEYXRhSGFzaAkABEwAAAACBQAAAA5nbG9iYWxEYXRhSnNvbgkABEwAAAACBQAAAA9nbG9iYWxEYXRhT3duZXIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgUAAAADbmlsAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAAAQkABEwAAAACBQAAAA9nbG9iYWxEYXRhVGl0bGUJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUhhc2gJAARMAAAAAgUAAAAOZ2xvYmFsRGF0YUpzb24JAARMAAAAAgUAAAAPZ2xvYmFsRGF0YU93bmVyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAABGJhbmsFAAAABmFtb3VudAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwJAAACAAAAAQkAASwAAAACAgAAADJOZWVkcyAxIHRvIDYgcmVjaXBpZW50IGFkZHJlc3NlcywgY3VycmVudGx5IHNlbnQ6IAkAAaQAAAABBQAAAA50b3RhbEFkZHJlc3NlcwkAAAIAAAABAgAAAB5Zb3UgYXJlIG5vdCBhbGxvd2VkIHRvIGRvIHRoYXQAAAAGaW52b2tlAQAAAA1zaWduQWdyZWVtZW50AAAAAwAAAARoYXNoAAAAC2FncmVlbWVudElkAAAADHNpZ25lclB1YktleQQAAAAHcGF5bWVudAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAAGaW52b2tlAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAZhbW91bnQJAQAAAAV2YWx1ZQAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAQAAAACaWQJAQAAAAV2YWx1ZQAAAAEIBQAAAAZpbnZva2UAAAANdHJhbnNhY3Rpb25JZAQAAAAMY2FsbGVySXNEYXBwCQAAAAAAAAIFAAAABHRoaXMIBQAAAAZpbnZva2UAAAAGY2FsbGVyBAAAAAZzaWduZXIDBQAAAAxjYWxsZXJJc0RhcHAJAAQlAAAAAQkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQkAAlkAAAABBQAAAAxzaWduZXJQdWJLZXkJAAJYAAAAAQgIBQAAAAZpbnZva2UAAAAGY2FsbGVyAAAABWJ5dGVzBAAAABNzaWduaW5nUmVxdWVzdEV4aXN0CQEAAAAUY2hlY2tJZlBlbmRpbmdUb1NpZ24AAAABCQABLAAAAAIJAAEsAAAAAgUAAAAGc2lnbmVyAgAAAARfTUFfBQAAAAthZ3JlZW1lbnRJZAMJAQAAAAEhAAAAAQUAAAATc2lnbmluZ1JlcXVlc3RFeGlzdAkAAAIAAAABAgAAACNTb3JyeSB0aGVyZSBpcyBubyBwZW5kaW5nIHNpZ25hdHVyZQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAGc2lnbmVyAgAAAARfTUFfBQAAAAthZ3JlZW1lbnRJZAkAASwAAAACAgAAAAdTSUdORURfCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAABnNpZ25lcgAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgUAAAADbmlsAAAABmludm9rZQEAAAAPdXNkblNpZ25DcmVkaXRzAAAAAAQAAAAHcGF5bWVudAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAAGaW52b2tlAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAA1jYWxsZXJBZGRyZXNzCQACWAAAAAEICAUAAAAGaW52b2tlAAAABmNhbGxlcgAAAAVieXRlcwQAAAAHdG9rZW5JZAkBAAAABXZhbHVlAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAQAAAAGYW1vdW50CQEAAAAFdmFsdWUAAAABCAUAAAAHcGF5bWVudAAAAAZhbW91bnQEAAAAD251bWJlck9mQ3JlZGl0cwkAAGkAAAACCQAAaAAAAAIFAAAABmFtb3VudAAAAAAAAAAAAgAAAAAAAA9CQAQAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQkBAAAAEmNoZWNrSWZXaGl0ZUxpc3RlZAAAAAEFAAAADWNhbGxlckFkZHJlc3MDCQEAAAACIT0AAAACCQACWAAAAAEFAAAAB3Rva2VuSWQFAAAABnVzZG5JRAkAAAIAAAABAgAAABpPbmx5IFVTRE4gY2FuIGJlIGV4Y2hhbmdlZAMDCQEAAAACIT0AAAACCQAAagAAAAIFAAAABmFtb3VudAAAAAAAAA9CQAAAAAAAAAAAAAkBAAAAAiE9AAAAAgkAAGoAAAACBQAAAAZhbW91bnQAAAAAAAAPQkAAAAAAAAAHoSAHCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAMFlvdSBjYW4gb25seSBleGNoYW5nZSBtdWx0aXBsZSBvZiAwLjUsIHlvdSBzZW50OgkBAAAACWRyb3BSaWdodAAAAAIJAAGkAAAAAQUAAAAGYW1vdW50AAAAAAAAAAAGAgAAAAEuCQEAAAAJdGFrZVJpZ2h0AAAAAgkAAaQAAAABBQAAAAZhbW91bnQAAAAAAAAAAAYJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAARYWRkcl9XSElURUxJU1RFRF8FAAAADWNhbGxlckFkZHJlc3MJAABkAAAAAgUAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQUAAAAPbnVtYmVyT2ZDcmVkaXRzCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAABGJhbmsFAAAABmFtb3VudAUAAAAHdG9rZW5JZAUAAAADbmlsAAAAAQAAAAJ0eAEAAAAIdmVyaWZpZXIAAAAABAAAAAckbWF0Y2gwBQAAAAJ0eAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAXSW52b2tlU2NyaXB0VHJhbnNhY3Rpb24EAAAAA2ludgUAAAAHJG1hdGNoMAMDAwkAAAAAAAACCAUAAAADaW52AAAACGZ1bmN0aW9uAgAAABFmaWxlQ2VydGlmaWNhdGlvbgYJAAAAAAAAAggFAAAAA2ludgAAAAhmdW5jdGlvbgIAAAASZW1haWxDZXJ0aWZpY2F0aW9uBgkAAAAAAAACCAUAAAADaW52AAAACGZ1bmN0aW9uAgAAAA9jcmVhdGVBZ3JlZW1lbnQJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACQACWQAAAAEJAQAAAAhhc1N0cmluZwAAAAEJAAGRAAAAAggFAAAAA2ludgAAAARhcmdzAAAAAAAAAAAEAwkAAAAAAAACCAUAAAADaW52AAAACGZ1bmN0aW9uAgAAAA1zaWduQWdyZWVtZW50CQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAkAAlkAAAABCQEAAAAIYXNTdHJpbmcAAAABCQABkQAAAAIIBQAAAANpbnYAAAAEYXJncwAAAAAAAAAAAgMJAAAAAAAAAggFAAAAA2ludgAAAAhmdW5jdGlvbgIAAAATcmV2b2tlQ2VydGlmaWNhdGlvbgkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAJAAJZAAAAAQkBAAAACGFzU3RyaW5nAAAAAQkAAZEAAAACCAUAAAADaW52AAAABGFyZ3MAAAAAAAAAAAEJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5CQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleU1t6JE=",
    "height": 1722533,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: EgnLTvTXXb26voa7PBwQhiqrwehzkrVLYDfZuKSTG8RK
Next: 3DAuFUVADipvL6r2eJfDxhzbDpoBdynW7Q2KL5i3MnTS

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

Old	New		Differences
1		-	{-# STDLIB_VERSION 3 #-}
	1	+	{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let a = ~~extract~~(addressFromString("3N2s5RtaHPBenCsx2ECcoFRbYHx3noZhXW1"))
	4	+	let a = value(addressFromString("3N2s5RtaHPBenCsx2ECcoFRbYHx3noZhXW1"))
5	5
6	6		let b = "3N1E6tXddRoVaRfQ9dQ3vg5LaW2fsd8HKub"
7	7

118	118
119	119		@Callable(F)
120	120		func fileCertification (G,H,g,y,I) = {
121		-	let J = ~~extract~~(F.transactionId)
	121	+	let J = value(F.transactionId)
122	122		let K = e(G, g)
123	123		let L = l(g)
124	124		let M = (this == F.caller)

137	137		else if ((size(H) > 64))
138	138		then throw("Title is too long, 64 characters max.")
139	139		else if ((N > 0))
140		-	then ~~ScriptResult(WriteSet(~~[~~DataEntry~~(g, toBase58String(J)), ~~DataEntry~~((G + g), toBase58String(J)), ~~DataEntry~~((H + g), toBase58String(J)), ~~DataEntry~~(("addr_WHITELISTED_" + n), (N - 1)), ~~DataEntry~~(((("data_fc_" + toBase58String(J)) + "_") + n), y)]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(n), 0, c)]))
	140	+	then [StringEntry(g, toBase58String(J)), StringEntry((G + g), toBase58String(J)), StringEntry((H + g), toBase58String(J)), IntegerEntry(("addr_WHITELISTED_" + n), (N - 1)), StringEntry(((("data_fc_" + toBase58String(J)) + "_") + n), y), ScriptTransfer(addressFromStringValue(n), 0, c)]
141	141		else if (!(M))
142	142		then {
143		-	let O = ~~extract~~(F.~~payment~~)
144		-	let P = ~~extract~~(O.amount)
	143	+	let O = value(F.payments[0])
	144	+	let P = value(O.amount)
145	145		let Q = if (isDefined(O.assetId))
146		-	then ~~extract~~(O.assetId)
	146	+	then value(O.assetId)
147	147		else throw("Waves is not accepted as payment")
148		-	let R = getIntegerValue(a, ("certification_fee_" + toBase58String(~~extract~~(Q))))
	148	+	let R = getIntegerValue(a, ("certification_fee_" + toBase58String(value(Q))))
149	149		if ((c != Q))
150	150		then throw("This token is not accepted at the moment")
151	151		else if (if ((P != R))
152	152		then (0 >= N)
153	153		else false)
154	154		then throw("The price is wrong")
155		-	else ~~ScriptResult(WriteSet(~~[~~DataEntry~~(g, toBase58String(J)), ~~DataEntry~~((G + g), toBase58String(J)), ~~DataEntry~~((H + g), toBase58String(J)), ~~DataEntry~~(((("data_fc_" + toBase58String(J)) + "_") + n), y)]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(b), P, O.assetId)]))
	155	+	else [StringEntry(g, toBase58String(J)), StringEntry((G + g), toBase58String(J)), StringEntry((H + g), toBase58String(J)), StringEntry(((("data_fc_" + toBase58String(J)) + "_") + n), y), ScriptTransfer(addressFromStringValue(b), P, O.assetId)]
156	156		}
157	157		else throw("You are not allowed to do that")
158	158		}

161	161
162	162		@Callable(F)
163	163		func revokeCertification (S,I) = {
164		-	let J = ~~extract~~(F.transactionId)
	164	+	let J = value(F.transactionId)
165	165		let M = (this == F.caller)
166	166		let n = if (M)
167	167		then toString(addressFromPublicKey(fromBase58String(I)))

185	185		else "NONE"
186	186		}
187	187		let N = m(n)
	188	+	let U = (((dropRight(K, 1) + ",\"status\":\"REVOKED_") + toBase58String(J)) + "\"}")
188	189		if ((T != "NONE"))
189	190		then throw("This certification have already been revoked.")
190	191		else if ((K == "NONE"))
191	192		then throw("You cannot change the status of this certification.")
192		-	else {
193		-	let U = (((dropRight(K, 1) + ",\"status\":\"REVOKED_") + toBase58String(J)) + "\"}")
194		-	if ((N > 0))
195		-	then WriteSet([DataEntry(("addr_WHITELISTED_" + n), (N - 1)), DataEntry(("STATUS_FC_" + S), ("REVOKED_" + toBase58String(J))), DataEntry(((("data_fc_" + S) + "_") + n), U)])
196		-	else if (!(M))
197		-	then {
198		-	let O = extract(F.payment)
199		-	let P = extract(O.amount)
200		-	let Q = if (isDefined(O.assetId))
201		-	then extract(O.assetId)
202		-	else throw("Waves is not accepted as payment")
203		-	let R = getIntegerValue(a, ("certification_fee_" + toBase58String(extract(Q))))
204		-	if ((c != Q))
205		-	then throw("This token is not accepted at the moment")
206		-	else if (if ((P != R))
207		-	then (0 >= N)
208		-	else false)
209		-	then throw("The price is wrong")
210		-	else ScriptResult(WriteSet([DataEntry(("STATUS_FC_" + S), ("REVOKED_" + toBase58String(J))), DataEntry(((("data_fc_" + S) + "_") + n), U)]), TransferSet([ScriptTransfer(addressFromStringValue(b), P, O.assetId)]))
211		-	}
212		-	else throw("You are not allowed to do that")
213		-	}
	193	+	else if ((N > 0))
	194	+	then [IntegerEntry(("addr_WHITELISTED_" + n), (N - 1)), StringEntry(("STATUS_FC_" + S), ("REVOKED_" + toBase58String(J))), StringEntry(((("data_fc_" + S) + "_") + n), U)]
	195	+	else if (!(M))
	196	+	then {
	197	+	let O = value(F.payments[0])
	198	+	let P = value(O.amount)
	199	+	let Q = if (isDefined(O.assetId))
	200	+	then value(O.assetId)
	201	+	else throw("Waves is not accepted as payment")
	202	+	let R = getIntegerValue(a, ("certification_fee_" + toBase58String(value(Q))))
	203	+	if ((c != Q))
	204	+	then throw("This token is not accepted at the moment")
	205	+	else if (if ((P != R))
	206	+	then (0 >= N)
	207	+	else false)
	208	+	then throw("The price is wrong")
	209	+	else [StringEntry(("STATUS_FC_" + S), ("REVOKED_" + toBase58String(J))), StringEntry(((("data_fc_" + S) + "_") + n), U), ScriptTransfer(addressFromStringValue(b), P, O.assetId)]
	210	+	}
	211	+	else throw("You are not allowed to do that")
214	212		}
215	213
216	214
217	215
218	216		@Callable(F)
219	217		func emailCertification (k,H,g,y,I) = {
220		-	let J = ~~extract~~(F.transactionId)
	218	+	let J = value(F.transactionId)
221	219		let K = j(k, g)
222	220		let L = l(g)
223	221		let M = (this == F.caller)

236	234		else if ((size(H) > 64))
237	235		then throw("Title is too long, 64 characters max.")
238	236		else if ((N > 0))
239		-	then ~~ScriptResult(WriteSet(~~[~~DataEntry~~(g, toBase58String(J)), ~~DataEntry~~(((g + "@") + k), toBase58String(J)), ~~DataEntry~~((H + g), toBase58String(J)), ~~DataEntry~~(("addr_WHITELISTED_" + n), (N - 1)), ~~DataEntry~~(((("data_ec_" + toBase58String(J)) + "_") + n), y)]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(n), 0, c)]))
	237	+	then [StringEntry(g, toBase58String(J)), StringEntry(((g + "@") + k), toBase58String(J)), StringEntry((H + g), toBase58String(J)), IntegerEntry(("addr_WHITELISTED_" + n), (N - 1)), StringEntry(((("data_ec_" + toBase58String(J)) + "_") + n), y), ScriptTransfer(addressFromStringValue(n), 0, c)]
240	238		else if (!(M))
241	239		then {
242		-	let O = ~~extract~~(F.~~payment~~)
243		-	let P = ~~extract~~(O.amount)
	240	+	let O = value(F.payments[0])
	241	+	let P = value(O.amount)
244	242		let Q = if (isDefined(O.assetId))
245		-	then ~~extract~~(O.assetId)
	243	+	then value(O.assetId)
246	244		else throw("Waves is not accepted as payment")
247		-	let R = getIntegerValue(a, ("certification_fee_" + toBase58String(~~extract~~(Q))))
	245	+	let R = getIntegerValue(a, ("certification_fee_" + toBase58String(value(Q))))
248	246		if ((c != Q))
249	247		then throw("This token is not accepted at the moment")
250	248		else if (if ((P != R))
251	249		then (0 >= N)
252	250		else false)
253	251		then throw("The price is wrong")
254		-	else ~~ScriptResult(WriteSet(~~[~~DataEntry~~(g, toBase58String(J)), ~~DataEntry~~(((g + "@") + k), toBase58String(J)), ~~DataEntry~~((H + g), toBase58String(J)), ~~DataEntry~~(((("data_ec_" + toBase58String(J)) + "_") + n), y)]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(b), P, O.assetId)]))
	252	+	else [StringEntry(g, toBase58String(J)), StringEntry(((g + "@") + k), toBase58String(J)), StringEntry((H + g), toBase58String(J)), StringEntry(((("data_ec_" + toBase58String(J)) + "_") + n), y), ScriptTransfer(addressFromStringValue(b), P, O.assetId)]
255	253		}
256	254		else throw("You are not allowed to do that")
257	255		}

260	258
261	259		@Callable(F)
262	260		func createAgreement (G,H,V,W,I,g) = {
263		-	let J = ~~extract~~(F.transactionId)
	261	+	let J = value(F.transactionId)
264	262		let K = e(G, g)
265	263		let L = l(g)
266	264		let M = (this == F.caller)

271	269		let X = ((((A(V, "creator") + "\"") + n) + "\"") + B(V, "creator"))
272	270		let Y = split(W, ",")
273	271		let Z = size(Y)
274		-	let aa = ~~DataEntry~~((H + g), toBase58String(J))
275		-	let ab = ~~DataEntry~~((G + g), toBase58String(J))
276		-	let ac = ~~DataEntry~~(((("data_MA_" + toBase58String(J)) + "_") + n), X)
277		-	let ad = ~~DataEntry~~(((n + "_MA_") + toBase58String(J)), ("SIGNED_" + toBase58String(J)))
278		-	let ae = ~~DataEntry~~(("addr_WHITELISTED_" + n), (N - (Z + 1)))
	272	+	let aa = StringEntry((H + g), toBase58String(J))
	273	+	let ab = StringEntry((G + g), toBase58String(J))
	274	+	let ac = StringEntry(((("data_MA_" + toBase58String(J)) + "_") + n), X)
	275	+	let ad = StringEntry(((n + "_MA_") + toBase58String(J)), ("SIGNED_" + toBase58String(J)))
	276	+	let ae = IntegerEntry(("addr_WHITELISTED_" + n), (N - (Z + 1)))
279	277		if ((K != "NONE"))
280	278		then throw("This entry already exist")
281	279		else if ((L != "NONE"))

290	288		then if (((Z + 1) > N))
291	289		then throw("You don't have enough certification credit")
292	290		else if ((Z == 6))
293		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ae, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[3] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[4] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[5] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c), ScriptTransfer(addressFromStringValue(Y[4]), 0, c), ScriptTransfer(addressFromStringValue(Y[5]), 0, c)]))
	291	+	then [aa, ab, ac, ad, ae, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[3] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[4] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[5] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c), ScriptTransfer(addressFromStringValue(Y[4]), 0, c), ScriptTransfer(addressFromStringValue(Y[5]), 0, c)]
294	292		else if ((Z == 5))
295		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ae, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[3] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[4] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c), ScriptTransfer(addressFromStringValue(Y[4]), 0, c)]))
	293	+	then [aa, ab, ac, ad, ae, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[3] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[4] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c), ScriptTransfer(addressFromStringValue(Y[4]), 0, c)]
296	294		else if ((Z == 4))
297		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ae, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[3] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c)]))
	295	+	then [aa, ab, ac, ad, ae, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[3] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c)]
298	296		else if ((Z == 3))
299		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ae, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[2] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c)]))
	297	+	then [aa, ab, ac, ad, ae, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c)]
300	298		else if ((Z == 2))
301		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ae, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[1] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c)]))
	299	+	then [aa, ab, ac, ad, ae, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c)]
302	300		else if ((Z == 1))
303		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ae, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c)]))
	301	+	then [aa, ab, ac, ad, ae, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(n), 0, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c)]
304	302		else throw("Wrong number of participants")
305	303		else if (!(M))
306	304		then {
307		-	let O = ~~extract~~(F.~~payment~~)
	305	+	let O = value(F.payments[0])
308	306		let P = if (isDefined(O.amount))
309		-	then ~~extract~~(O.amount)
	307	+	then value(O.amount)
310	308		else 0
311	309		let Q = if (isDefined(O.assetId))
312		-	then ~~extract~~(O.assetId)
	310	+	then value(O.assetId)
313	311		else c
314		-	let R = getIntegerValue(a, ("certification_fee_" + toBase58String(~~extract~~(Q))))
	312	+	let R = getIntegerValue(a, ("certification_fee_" + toBase58String(value(Q))))
315	313		if (((R * (Z + 1)) > P))
316	314		then throw(("The price is wrong, it should be " + toString((R * (Z + 1)))))
317	315		else if ((Z == 6))
318		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[3] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[4] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[5] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c), ScriptTransfer(addressFromStringValue(Y[4]), 0, c), ScriptTransfer(addressFromStringValue(Y[5]), 0, c)]))
	316	+	then [aa, ab, ac, ad, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[3] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[4] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[5] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c), ScriptTransfer(addressFromStringValue(Y[4]), 0, c), ScriptTransfer(addressFromStringValue(Y[5]), 0, c)]
319	317		else if ((Z == 5))
320		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[3] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[4] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c), ScriptTransfer(addressFromStringValue(Y[4]), 0, c)]))
	318	+	then [aa, ab, ac, ad, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[3] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[4] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c), ScriptTransfer(addressFromStringValue(Y[4]), 0, c)]
321	319		else if ((Z == 4))
322		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[3] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c)]))
	320	+	then [aa, ab, ac, ad, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[3] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c), ScriptTransfer(addressFromStringValue(Y[3]), 0, c)]
323	321		else if ((Z == 3))
324		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[2] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c)]))
	322	+	then [aa, ab, ac, ad, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[2] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c), ScriptTransfer(addressFromStringValue(Y[2]), 0, c)]
325	323		else if ((Z == 2))
326		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ~~DataEntry~~(((Y[1] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c)]))
	324	+	then [aa, ab, ac, ad, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), StringEntry(((Y[1] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c), ScriptTransfer(addressFromStringValue(Y[1]), 0, c)]
327	325		else if ((Z == 1))
328		-	then ~~ScriptResult(WriteSet(~~[aa, ab, ac, ad, ~~DataEntry~~(((Y[0] + "_MA_") + toBase58String(J)), "PENDING")]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c)]))
	326	+	then [aa, ab, ac, ad, StringEntry(((Y[0] + "_MA_") + toBase58String(J)), "PENDING"), ScriptTransfer(addressFromStringValue(b), P, c), ScriptTransfer(addressFromStringValue(Y[0]), 0, c)]
329	327		else throw(("Needs 1 to 6 recipient addresses, currently sent: " + toString(Z)))
330	328		}
331	329		else throw("You are not allowed to do that")

335	333
336	334		@Callable(F)
337	335		func signAgreement (G,af,I) = {
338		-	let O = ~~extract~~(F.~~payment~~)
339		-	let P = ~~extract~~(O.amount)
340		-	let J = ~~extract~~(F.transactionId)
	336	+	let O = value(F.payments[0])
	337	+	let P = value(O.amount)
	338	+	let J = value(F.transactionId)
341	339		let M = (this == F.caller)
342	340		let ag = if (M)
343	341		then toString(addressFromPublicKey(fromBase58String(I)))

345	343		let ah = s(((ag + "_MA_") + af))
346	344		if (!(ah))
347	345		then throw("Sorry there is no pending signature")
348		-	else ~~ScriptResult(WriteSet(~~[~~DataEntry~~(((ag + "_MA_") + af), ("SIGNED_" + toBase58String(J)))]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(ag), 0, c)]))
	346	+	else [StringEntry(((ag + "_MA_") + af), ("SIGNED_" + toBase58String(J))), ScriptTransfer(addressFromStringValue(ag), 0, c)]
349	347		}
350	348
351	349
352	350
353	351		@Callable(F)
354	352		func usdnSignCredits () = {
355		-	let O = ~~extract~~(F.~~payment~~)
	353	+	let O = value(F.payments[0])
356	354		let n = toBase58String(F.caller.bytes)
357		-	let ai = ~~extract~~(O.assetId)
358		-	let P = ~~extract~~(O.amount)
	355	+	let ai = value(O.assetId)
	356	+	let P = value(O.amount)
359	357		let aj = ((P * 2) / 1000000)
360	358		let N = m(n)
361	359		if ((toBase58String(ai) != d))

364	362		then ((P % 1000000) != 500000)
365	363		else false)
366	364		then throw(((("You can only exchange multiple of 0.5, you sent:" + dropRight(toString(P), 6)) + ".") + takeRight(toString(P), 6)))
367		-	else ~~ScriptResult(WriteSet(~~[~~DataEntry~~(("addr_WHITELISTED_" + n), (N + aj))]), ~~TransferSet([~~ScriptTransfer(addressFromStringValue(b), P, ai)]))
	365	+	else [IntegerEntry(("addr_WHITELISTED_" + n), (N + aj)), ScriptTransfer(addressFromStringValue(b), P, ai)]
368	366		}
369	367
370	368

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

github/deemru/w8io/169f3d6 
378.05 ms ◑