w8 · tx · 6Pw···epz

tx · 6Pwbo6XCYEVXHwQFSgd52y96HPwXGJzgNyPmunPoTepz

3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB:  -0.01400000 Waves

2020.01.31 17:15 [878651] smart account 3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6Pwbo6XCYEVXHwQFSgd52y96HPwXGJzgNyPmunPoTepz",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1580480217499,
    "version": 1,
    "sender": "3NC28hSivrmsTUXaYD1x6L362J4ZpUnoTdB",
    "senderPublicKey": "Gd5NihbWQoWuTnSvq25TuV2BYZG4U1e9KDqZn9zBPix7",
    "proofs": [
        "2TDs68sV28u8MSk8azWRjjdaiHikxST1wuCCx2ZgVH6s1nNGXUJfitaXZpfdoUfKpNmQW3U29nsEpmnS9TAPodFS"
    ],
    "script": "base64:AAIDAAAAAAAAAB4IARIGCgQICAgIEgUKAwgICBIFCgMICAgSBAoCCAgAAAAKAAAAAAh2ZXJpZmllcgkBAAAAB2V4dHJhY3QAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzTjJzNVJ0YUhQQmVuQ3N4MkVDY29GUmJZSHgzbm9aaFhXMQAAAAAEYmFuawIAAAAjM04xRTZ0WGRkUm9WYVJmUTlkUTN2ZzVMYVcyZnNkOEhLdWIBAAAACmNoZWNrRW50cnkAAAACAAAABnByZWZpeAAAAAR1dWlkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAGcHJlZml4BQAAAAR1dWlkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWECAAAABE5PTkUBAAAACWNoZWNrVVVJRAAAAAEAAAAEdXVpZAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAAR1dWlkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWECAAAABE5PTkUBAAAAEmNoZWNrSWZXaGl0ZUxpc3RlZAAAAAEAAAANY2FsbGVyQWRkcmVzcwQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEWFkZHJfV0hJVEVMSVNURURfBQAAAA1jYWxsZXJBZGRyZXNzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAABAAAACGlzQWRyZXNzAAAAAQAAAARhZGRyAwMJAAAAAAAAAgkAATEAAAABBQAAAARhZGRyAAAAAAAAAAAjCQAAAAAAAAIJAAEvAAAAAgUAAAAEYWRkcgAAAAAAAAAAAgIAAAACM04HBgkAAAAAAAACCQABLwAAAAIFAAAABGFkZHIAAAAAAAAAAAICAAAAAjNNAQAAAAxjb3VudFBhcnRpZXMAAAACAAAAC2FjY3VtdWxhdG9yAAAABGFkZHIDCQAAZgAAAAIJAAExAAAAAQUAAAAEYWRkcgAAAAAAAAAAAAkAAGQAAAACBQAAAAthY2N1bXVsYXRvcgAAAAAAAAAAAQkAAGQAAAACBQAAAAthY2N1bXVsYXRvcgAAAAAAAAAAAAEAAAAUY2hlY2tJZlBlbmRpbmdUb1NpZ24AAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAMJAAAAAAAAAgUAAAABYQIAAAAHUEVORElORwYHBwEAAAAOZ2V0VmFsdWVTdHJpbmcAAAABAAAABGpzb24JAAEvAAAAAgkAATAAAAACBQAAAARqc29uAAAAAAAAAAABCQEAAAAFdmFsdWUAAAABCQAEswAAAAIJAAEwAAAAAgUAAAAEanNvbgAAAAAAAAAAAQIAAAABIgEAAAAIZ2V0VmFsdWUAAAACAAAABGpzb24AAAADa2V5BAAAAAhrZXlJbmRleAkBAAAABXZhbHVlAAAAAQkABLMAAAACBQAAAARqc29uCQABLAAAAAIJAAEsAAAAAgIAAAABIgUAAAADa2V5AgAAAAIiOgQAAAAEZGF0YQkAATAAAAACBQAAAARqc29uCQAAZAAAAAIJAABkAAAAAgUAAAAIa2V5SW5kZXgJAAExAAAAAQUAAAADa2V5AAAAAAAAAAADBAAAAAlqc29uVmFsdWUJAQAAAA5nZXRWYWx1ZVN0cmluZwAAAAEFAAAABGRhdGEFAAAACWpzb25WYWx1ZQAAAAQAAAAGaW52b2tlAQAAABFmaWxlQ2VydGlmaWNhdGlvbgAAAAQAAAAEaGFzaAAAAAV0aXRsZQAAAAR1dWlkAAAABGRhdGEEAAAAAmlkCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAZpbnZva2UAAAANdHJhbnNhY3Rpb25JZAQAAAAKZW50cnlFeGlzdAkBAAAACmNoZWNrRW50cnkAAAACBQAAAARoYXNoBQAAAAR1dWlkBAAAAAl1dWlkRXhpc3QJAQAAAAljaGVja1VVSUQAAAABBQAAAAR1dWlkBAAAAA1jYWxsZXJBZGRyZXNzCQACWAAAAAEICAUAAAAGaW52b2tlAAAABmNhbGxlcgAAAAVieXRlcwQAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQkBAAAAEmNoZWNrSWZXaGl0ZUxpc3RlZAAAAAEFAAAADWNhbGxlckFkZHJlc3MDCQEAAAACIT0AAAACBQAAAAplbnRyeUV4aXN0AgAAAAROT05FCQAAAgAAAAECAAAAGFRoaXMgZW50cnkgYWxyZWFkeSBleGlzdAMJAQAAAAIhPQAAAAIFAAAACXV1aWRFeGlzdAIAAAAETk9ORQkAAAIAAAABAgAAABdUaGlzIHV1aWQgYWxyZWFkeSBleGlzdAMJAABmAAAAAgkAATEAAAABBQAAAAR1dWlkAAAAAAAAAAAkCQAAAgAAAAECAAAAEFV1aWQgaXMgdG9vIGxvbmcDCQAAZgAAAAIJAAExAAAAAQUAAAAEaGFzaAAAAAAAAAAAQAkAAAIAAAABAgAAABBIYXNoIGlzIHRvbyBsb25nAwkAAGYAAAACCQABMQAAAAEFAAAABXRpdGxlAAAAAAAAAABACQAAAgAAAAECAAAAEVRpdGxlIGlzIHRvbyBsb25nAwkAAGYAAAACBQAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtAAAAAAAAAAAACQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAARoYXNoBQAAAAR1dWlkCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAABXRpdGxlBQAAAAR1dWlkCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAEWFkZHJfV0hJVEVMSVNURURfBQAAAA1jYWxsZXJBZGRyZXNzCQAAZQAAAAIFAAAAFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0AAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGRhdGFfZmNfCQACWAAAAAEFAAAAAmlkAgAAAAFfBQAAAA1jYWxsZXJBZGRyZXNzBQAAAARkYXRhBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAABmludm9rZQAAAAZjYWxsZXIAAAAAAAAHoSAFAAAABHVuaXQFAAAAA25pbAQAAAAHcGF5bWVudAkBAAAAB2V4dHJhY3QAAAABCAUAAAAGaW52b2tlAAAAB3BheW1lbnQEAAAABmFtb3VudAkBAAAAB2V4dHJhY3QAAAABCAUAAAAHcGF5bWVudAAAAAZhbW91bnQEAAAADnBheW1lbnRBc3NldElkAwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQJAQAAAAdleHRyYWN0AAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkAAAIAAAABAgAAACBXYXZlcyBpcyBub3QgYWNjZXB0ZWQgYXMgcGF5bWVudAQAAAANYWNjZXB0ZWRUb2tlbgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAh2ZXJpZmllcgkAASwAAAACAgAAABF3aGl0ZV9saXN0X3Rva2VuXwkAAlgAAAABCQEAAAAHZXh0cmFjdAAAAAEFAAAADnBheW1lbnRBc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEJAAACAAAAAQIAAAAoVGhpcyB0b2tlbiBpcyBub3QgYWNjZXB0ZWQgYXQgdGhlIG1vbWVudAQAAAAMY3VycmVudFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAh2ZXJpZmllcgkAASwAAAACAgAAABJjZXJ0aWZpY2F0aW9uX2ZlZV8JAAJYAAAAAQkBAAAAB2V4dHJhY3QAAAABBQAAAA5wYXltZW50QXNzZXRJZAMJAQAAAAIhPQAAAAIFAAAADWFjY2VwdGVkVG9rZW4CAAAAC1dISVRFTElTVEVECQAAAgAAAAECAAAAKFRoaXMgdG9rZW4gaXMgbm90IGFjY2VwdGVkIGF0IHRoZSBtb21lbnQDAwkBAAAAAiE9AAAAAgUAAAAGYW1vdW50BQAAAAxjdXJyZW50UHJpY2UJAABnAAAAAgAAAAAAAAAAAAUAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQcJAAACAAAAAQIAAAASVGhlIHByaWNlIGlzIHdyb25nCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAARoYXNoBQAAAAR1dWlkCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAABXRpdGxlBQAAAAR1dWlkCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhkYXRhX2ZjXwkAAlgAAAABBQAAAAJpZAIAAAABXwUAAAANY2FsbGVyQWRkcmVzcwUAAAAEZGF0YQUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50CAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAANuaWwAAAAGaW52b2tlAQAAABJlbWFpbENlcnRpZmljYXRpb24AAAADAAAACW1lc3NhZ2VpZAAAAAR1dWlkAAAABGRhdGEEAAAAAmlkCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAZpbnZva2UAAAANdHJhbnNhY3Rpb25JZAQAAAAKZW50cnlFeGlzdAkBAAAACmNoZWNrRW50cnkAAAACBQAAAAltZXNzYWdlaWQFAAAABHV1aWQEAAAACXV1aWRFeGlzdAkBAAAACWNoZWNrVVVJRAAAAAEFAAAABHV1aWQEAAAADWNhbGxlckFkZHJlc3MJAAJYAAAAAQgIBQAAAAZpbnZva2UAAAAGY2FsbGVyAAAABWJ5dGVzBAAAABZjYWxsZXJJc1doaXRlTGlzdGVkTnVtCQEAAAASY2hlY2tJZldoaXRlTGlzdGVkAAAAAQUAAAANY2FsbGVyQWRkcmVzcwMJAQAAAAIhPQAAAAIFAAAACmVudHJ5RXhpc3QCAAAABE5PTkUJAAACAAAAAQIAAAAYVGhpcyBlbnRyeSBhbHJlYWR5IGV4aXN0AwkBAAAAAiE9AAAAAgUAAAAJdXVpZEV4aXN0AgAAAAROT05FCQAAAgAAAAECAAAAF1RoaXMgdXVpZCBhbHJlYWR5IGV4aXN0AwkAAGYAAAACCQABMQAAAAEFAAAABHV1aWQAAAAAAAAAACQJAAACAAAAAQIAAAAQVXVpZCBpcyB0b28gbG9uZwMJAABmAAAAAgUAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQAAAAAAAAAAAAkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAJbWVzc2FnZWlkBQAAAAR1dWlkCQACWAAAAAEFAAAAAmlkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAAEWFkZHJfV0hJVEVMSVNURURfBQAAAA1jYWxsZXJBZGRyZXNzCQAAZQAAAAIFAAAAFmNhbGxlcklzV2hpdGVMaXN0ZWROdW0AAAAAAAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGRhdGFfZWNfCQACWAAAAAEFAAAAAmlkAgAAAAFfBQAAAA1jYWxsZXJBZGRyZXNzBQAAAARkYXRhBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAABmludm9rZQAAAAZjYWxsZXIAAAAAAAAHoSAFAAAABHVuaXQFAAAAA25pbAQAAAAHcGF5bWVudAkBAAAAB2V4dHJhY3QAAAABCAUAAAAGaW52b2tlAAAAB3BheW1lbnQEAAAABmFtb3VudAkBAAAAB2V4dHJhY3QAAAABCAUAAAAHcGF5bWVudAAAAAZhbW91bnQEAAAADnBheW1lbnRBc3NldElkAwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQJAQAAAAdleHRyYWN0AAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkAAAIAAAABAgAAACBXYXZlcyBpcyBub3QgYWNjZXB0ZWQgYXMgcGF5bWVudAQAAAANYWNjZXB0ZWRUb2tlbgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAh2ZXJpZmllcgkAASwAAAACAgAAABF3aGl0ZV9saXN0X3Rva2VuXwkAAlgAAAABCQEAAAAHZXh0cmFjdAAAAAEFAAAADnBheW1lbnRBc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEJAAACAAAAAQIAAAAoVGhpcyB0b2tlbiBpcyBub3QgYWNjZXB0ZWQgYXQgdGhlIG1vbWVudAQAAAAMY3VycmVudFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAh2ZXJpZmllcgkAASwAAAACAgAAABJjZXJ0aWZpY2F0aW9uX2ZlZV8JAAJYAAAAAQkBAAAAB2V4dHJhY3QAAAABBQAAAA5wYXltZW50QXNzZXRJZAMJAQAAAAIhPQAAAAIFAAAADWFjY2VwdGVkVG9rZW4CAAAAC1dISVRFTElTVEVECQAAAgAAAAECAAAAKFRoaXMgdG9rZW4gaXMgbm90IGFjY2VwdGVkIGF0IHRoZSBtb21lbnQDAwkBAAAAAiE9AAAAAgUAAAAGYW1vdW50BQAAAAxjdXJyZW50UHJpY2UJAABnAAAAAgAAAAAAAAAAAAUAAAAWY2FsbGVySXNXaGl0ZUxpc3RlZE51bQcJAAACAAAAAQIAAAASVGhlIHByaWNlIGlzIHdyb25nCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAEdXVpZAkAAlgAAAABBQAAAAJpZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAltZXNzYWdlaWQFAAAABHV1aWQJAAJYAAAAAQUAAAACaWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGRhdGFfZWNfCQACWAAAAAEFAAAAAmlkAgAAAAFfBQAAAA1jYWxsZXJBZGRyZXNzBQAAAARkYXRhBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAAA25pbAAAAAZpbnZva2UBAAAAD2NyZWF0ZUFncmVlbWVudAAAAAMAAAAEaGFzaAAAAAV0aXRsZQAAAAlhZGRyZXNzZXMEAAAAB3BheW1lbnQJAQAAAAdleHRyYWN0AAAAAQgFAAAABmludm9rZQAAAAdwYXltZW50BAAAAAZhbW91bnQJAQAAAAdleHRyYWN0AAAAAQgFAAAAB3BheW1lbnQAAAAGYW1vdW50BAAAAAJpZAkBAAAAB2V4dHJhY3QAAAABCAUAAAAGaW52b2tlAAAADXRyYW5zYWN0aW9uSWQEAAAADmFkZHJlc3Nlc0FycmF5CQAETAAAAAIJAQAAAAhnZXRWYWx1ZQAAAAIFAAAACWFkZHJlc3NlcwIAAAAIYWRkcmVzczEJAARMAAAAAgkBAAAACGdldFZhbHVlAAAAAgUAAAAJYWRkcmVzc2VzAgAAAAhhZGRyZXNzMgkABEwAAAACCQEAAAAIZ2V0VmFsdWUAAAACBQAAAAlhZGRyZXNzZXMCAAAACGFkZHJlc3MzCQAETAAAAAIJAQAAAAhnZXRWYWx1ZQAAAAIFAAAACWFkZHJlc3NlcwIAAAAIYWRkcmVzczQJAARMAAAAAgkBAAAACGdldFZhbHVlAAAAAgUAAAAJYWRkcmVzc2VzAgAAAAhhZGRyZXNzNQkABEwAAAACCQEAAAAIZ2V0VmFsdWUAAAACBQAAAAlhZGRyZXNzZXMCAAAACGFkZHJlc3M2BQAAAANuaWwEAAAADnRvdGFsQWRkcmVzc2VzBAAAAA0kbGlzdDc0MjU3NDY1BQAAAA5hZGRyZXNzZXNBcnJheQQAAAANJHNpemU3NDI1NzQ2NQkAAZAAAAABBQAAAA0kbGlzdDc0MjU3NDY1BAAAAA0kYWNjMDc0MjU3NDY1AAAAAAAAAAAAAwkAAAAAAAACBQAAAA0kc2l6ZTc0MjU3NDY1AAAAAAAAAAAABQAAAA0kYWNjMDc0MjU3NDY1BAAAAA0kYWNjMTc0MjU3NDY1CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzA3NDI1NzQ2NQkAAZEAAAACBQAAAA0kbGlzdDc0MjU3NDY1AAAAAAAAAAAAAwkAAAAAAAACBQAAAA0kc2l6ZTc0MjU3NDY1AAAAAAAAAAABBQAAAA0kYWNjMTc0MjU3NDY1BAAAAA0kYWNjMjc0MjU3NDY1CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzE3NDI1NzQ2NQkAAZEAAAACBQAAAA0kbGlzdDc0MjU3NDY1AAAAAAAAAAABAwkAAAAAAAACBQAAAA0kc2l6ZTc0MjU3NDY1AAAAAAAAAAACBQAAAA0kYWNjMjc0MjU3NDY1BAAAAA0kYWNjMzc0MjU3NDY1CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzI3NDI1NzQ2NQkAAZEAAAACBQAAAA0kbGlzdDc0MjU3NDY1AAAAAAAAAAACAwkAAAAAAAACBQAAAA0kc2l6ZTc0MjU3NDY1AAAAAAAAAAADBQAAAA0kYWNjMzc0MjU3NDY1BAAAAA0kYWNjNDc0MjU3NDY1CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzM3NDI1NzQ2NQkAAZEAAAACBQAAAA0kbGlzdDc0MjU3NDY1AAAAAAAAAAADAwkAAAAAAAACBQAAAA0kc2l6ZTc0MjU3NDY1AAAAAAAAAAAEBQAAAA0kYWNjNDc0MjU3NDY1BAAAAA0kYWNjNTc0MjU3NDY1CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzQ3NDI1NzQ2NQkAAZEAAAACBQAAAA0kbGlzdDc0MjU3NDY1AAAAAAAAAAAEAwkAAAAAAAACBQAAAA0kc2l6ZTc0MjU3NDY1AAAAAAAAAAAFBQAAAA0kYWNjNTc0MjU3NDY1BAAAAA0kYWNjNjc0MjU3NDY1CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzU3NDI1NzQ2NQkAAZEAAAACBQAAAA0kbGlzdDc0MjU3NDY1AAAAAAAAAAAFAwkAAAAAAAACBQAAAA0kc2l6ZTc0MjU3NDY1AAAAAAAAAAAGBQAAAA0kYWNjNjc0MjU3NDY1BAAAAA0kYWNjNzc0MjU3NDY1CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzY3NDI1NzQ2NQkAAZEAAAACBQAAAA0kbGlzdDc0MjU3NDY1AAAAAAAAAAAGCQAAAgAAAAECAAAAEkxpc3Qgc2l6ZSBleGNlZWQgNgQAAAAOcGF5bWVudEFzc2V0SWQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkBAAAAB2V4dHJhY3QAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQAAAgAAAAECAAAAIFdhdmVzIGlzIG5vdCBhY2NlcHRlZCBhcyBwYXltZW50BAAAAA1hY2NlcHRlZFRva2VuBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAACHZlcmlmaWVyCQABLAAAAAICAAAAEXdoaXRlX2xpc3RfdG9rZW5fCQACWAAAAAEJAQAAAAdleHRyYWN0AAAAAQUAAAAOcGF5bWVudEFzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQkAAAIAAAABAgAAAChUaGlzIHRva2VuIGlzIG5vdCBhY2NlcHRlZCBhdCB0aGUgbW9tZW50BAAAAAxjdXJyZW50UHJpY2UJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAACHZlcmlmaWVyCQABLAAAAAICAAAAEmNlcnRpZmljYXRpb25fZmVlXwkAAlgAAAABCQEAAAAHZXh0cmFjdAAAAAEFAAAADnBheW1lbnRBc3NldElkAwkBAAAAAiE9AAAAAgUAAAANYWNjZXB0ZWRUb2tlbgIAAAALV0hJVEVMSVNURUQJAAACAAAAAQIAAAAvT25seSBwYXltZW50cyBpbiBTSUdOIGFyZSBhbGxvd2VkIGF0IHRoZSBtb21lbnQDCQAAZgAAAAIJAABoAAAAAgUAAAAMY3VycmVudFByaWNlBQAAAA50b3RhbEFkZHJlc3NlcwUAAAAGYW1vdW50CQAAAgAAAAEJAAEsAAAAAgIAAAAhVGhlIHByaWNlIGlzIHdyb25nLCBpdCBzaG91bGQgYmUgCQABpAAAAAEJAABoAAAAAgUAAAAMY3VycmVudFByaWNlBQAAAA50b3RhbEFkZHJlc3NlcwMJAAAAAAAAAgUAAAAOdG90YWxBZGRyZXNzZXMAAAAAAAAAAAIJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACXRpdGxlX01BXwkAAlgAAAABBQAAAAJpZAUAAAAFdGl0bGUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIaGFzaF9NQV8JAAJYAAAAAQUAAAACaWQFAAAABGhhc2gJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIZGF0YV9NQV8JAAJYAAAAAQUAAAACaWQFAAAACWFkZHJlc3NlcwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAUAAAADbmlsAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAAAwkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAJdGl0bGVfTUFfCQACWAAAAAEFAAAAAmlkBQAAAAV0aXRsZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAhoYXNoX01BXwkAAlgAAAABBQAAAAJpZAUAAAAEaGFzaAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAhkYXRhX01BXwkAAlgAAAABBQAAAAJpZAUAAAAJYWRkcmVzc2VzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAIAAAAAAAAAAAAFAAAADnBheW1lbnRBc3NldElkBQAAAANuaWwDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAAECQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAl0aXRsZV9NQV8JAAJYAAAAAQUAAAACaWQFAAAABXRpdGxlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGhhc2hfTUFfCQACWAAAAAEFAAAAAmlkBQAAAARoYXNoCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGRhdGFfTUFfCQACWAAAAAEFAAAAAmlkBQAAAAlhZGRyZXNzZXMJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAIAAAAAAAAAAAAFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQFAAAAA25pbAMJAAAAAAAAAgUAAAAOdG90YWxBZGRyZXNzZXMAAAAAAAAAAAUJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACXRpdGxlX01BXwkAAlgAAAABBQAAAAJpZAUAAAAFdGl0bGUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIaGFzaF9NQV8JAAJYAAAAAQUAAAACaWQFAAAABGhhc2gJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIZGF0YV9NQV8JAAJYAAAAAQUAAAACaWQFAAAACWFkZHJlc3NlcwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAEAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAIAAAAAAAAAAAAFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAEAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAUAAAADbmlsAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAABgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAJdGl0bGVfTUFfCQACWAAAAAEFAAAAAmlkBQAAAAV0aXRsZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAhoYXNoX01BXwkAAlgAAAABBQAAAAJpZAUAAAAEaGFzaAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAhkYXRhX01BXwkAAlgAAAABBQAAAAJpZAUAAAAJYWRkcmVzc2VzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAQCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAFAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAIAAAAAAAAAAAAFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAEAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAUAAAAAAAAAAAAFAAAADnBheW1lbnRBc3NldElkBQAAAANuaWwJAAACAAAAAQkAASwAAAACAgAAAB5OZWVkcyAyIHRvIDYgcGFydGllcyBhZGRyZXNzZXMJAAGkAAAAAQUAAAAOdG90YWxBZGRyZXNzZXMAAAAGaW52b2tlAQAAAA1zaWduQWdyZWVtZW50AAAAAgAAAARoYXNoAAAAC2FncmVlbWVudElkBAAAAAdwYXltZW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAZpbnZva2UAAAAHcGF5bWVudAQAAAAGYW1vdW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAQAAAACaWQJAQAAAAdleHRyYWN0AAAAAQgFAAAABmludm9rZQAAAA10cmFuc2FjdGlvbklkBAAAAAZzaWduZXIJAAJYAAAAAQgIBQAAAAZpbnZva2UAAAAGY2FsbGVyAAAABWJ5dGVzBAAAABNzaWduaW5nUmVxdWVzdEV4aXN0CQEAAAAUY2hlY2tJZlBlbmRpbmdUb1NpZ24AAAABCQABLAAAAAIJAAEsAAAAAgUAAAAGc2lnbmVyAgAAAARfTUFfBQAAAAthZ3JlZW1lbnRJZAMJAQAAAAEhAAAAAQUAAAATc2lnbmluZ1JlcXVlc3RFeGlzdAkAAAIAAAABAgAAACNTb3JyeSB0aGVyZSBpcyBubyBwZW5kaW5nIHNpZ25hdHVyZQkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAZzaWduZXICAAAABF9NQV8FAAAAC2FncmVlbWVudElkCQABLAAAAAICAAAAB1NJR05FRF8JAAJYAAAAAQUAAAACaWQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAABnNpZ25lcgAAAAAAAAehIAUAAAAEdW5pdAUAAAADbmlsAAAAAB2efa0=",
    "chainId": 84,
    "height": 878651,
    "spentComplexity": 0
}

View: original | compacted
Prev: 6Un94hdcteHYjTYtM4MuNwwNWvJVevqBRfrDZ8jSZXCQ
Next: 5qMD6qYEK8HYE1JrSKTKToHTa1XNUquTPVNFiHniikN1

Diff: 
Old New Differences
27 27      case _ => 
28 28          0
29 29  }
30 + 
31 + 
32 + func isAdress (addr) = if (if ((size(addr) == 35))
33 +     then (take(addr, 2) == "3N")
34 +     else false)
35 +     then true
36 +     else (take(addr, 2) == "3M")
37 + 
38 + 
39 + func countParties (accumulator,addr) = if ((size(addr) > 0))
40 +     then (accumulator + 1)
41 +     else (accumulator + 0)
42 + 
43 + 
44 + func checkIfPendingToSign (key) = match getString(this, key) {
45 +     case a: String => 
46 +         if ((a == "PENDING"))
47 +             then true
48 +             else false
49 +     case _ => 
50 +         false
51 + }
52 + 
53 + 
54 + func getValueString (json) = take(drop(json, 1), value(indexOf(drop(json, 1), "\"")))
55 + 
56 + 
57 + func getValue (json,key) = {
58 +     let keyIndex = value(indexOf(json, (("\"" + key) + "\":")))
59 +     let data = drop(json, ((keyIndex + size(key)) + 3))
60 +     let jsonValue = getValueString(data)
61 +     jsonValue
62 +     }
30 63  
31 64  
32 65  @Callable(invoke)
112 145      }
113 146  
114 147  
148 + 
149 + @Callable(invoke)
150 + func createAgreement (hash,title,addresses) = {
151 +     let payment = extract(invoke.payment)
152 +     let amount = extract(payment.amount)
153 +     let id = extract(invoke.transactionId)
154 +     let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
155 +     let totalAddresses = {
156 +         let $list74257465 = addressesArray
157 +         let $size74257465 = size($list74257465)
158 +         let $acc074257465 = 0
159 +         if (($size74257465 == 0))
160 +             then $acc074257465
161 +             else {
162 +                 let $acc174257465 = countParties($acc074257465, $list74257465[0])
163 +                 if (($size74257465 == 1))
164 +                     then $acc174257465
165 +                     else {
166 +                         let $acc274257465 = countParties($acc174257465, $list74257465[1])
167 +                         if (($size74257465 == 2))
168 +                             then $acc274257465
169 +                             else {
170 +                                 let $acc374257465 = countParties($acc274257465, $list74257465[2])
171 +                                 if (($size74257465 == 3))
172 +                                     then $acc374257465
173 +                                     else {
174 +                                         let $acc474257465 = countParties($acc374257465, $list74257465[3])
175 +                                         if (($size74257465 == 4))
176 +                                             then $acc474257465
177 +                                             else {
178 +                                                 let $acc574257465 = countParties($acc474257465, $list74257465[4])
179 +                                                 if (($size74257465 == 5))
180 +                                                     then $acc574257465
181 +                                                     else {
182 +                                                         let $acc674257465 = countParties($acc574257465, $list74257465[5])
183 +                                                         if (($size74257465 == 6))
184 +                                                             then $acc674257465
185 +                                                             else {
186 +                                                                 let $acc774257465 = countParties($acc674257465, $list74257465[6])
187 +                                                                 throw("List size exceed 6")
188 +                                                                 }
189 +                                                         }
190 +                                                 }
191 +                                         }
192 +                                 }
193 +                         }
194 +                 }
195 +         }
196 +     let paymentAssetId = if (isDefined(payment.assetId))
197 +         then extract(payment.assetId)
198 +         else throw("Waves is not accepted as payment")
199 +     let acceptedToken =     match getString(verifier, ("white_list_token_" + toBase58String(extract(paymentAssetId)))) {
200 +         case a: String => 
201 +             a
202 +         case _ => 
203 +             throw("This token is not accepted at the moment")
204 +     }
205 +     let currentPrice = getIntegerValue(verifier, ("certification_fee_" + toBase58String(extract(paymentAssetId))))
206 +     if ((acceptedToken != "WHITELISTED"))
207 +         then throw("Only payments in SIGN are allowed at the moment")
208 +         else if (((currentPrice * totalAddresses) > amount))
209 +             then throw(("The price is wrong, it should be " + toString((currentPrice * totalAddresses))))
210 +             else if ((totalAddresses == 2))
211 +                 then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId)]))
212 +                 else if ((totalAddresses == 3))
213 +                     then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId)]))
214 +                     else if ((totalAddresses == 4))
215 +                         then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId)]))
216 +                         else if ((totalAddresses == 5))
217 +                             then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[4] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, paymentAssetId)]))
218 +                             else if ((totalAddresses == 6))
219 +                                 then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[4] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[5] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[5]), 0, paymentAssetId)]))
220 +                                 else throw(("Needs 2 to 6 parties addresses" + toString(totalAddresses)))
221 +     }
222 + 
223 + 
224 + 
225 + @Callable(invoke)
226 + func signAgreement (hash,agreementId) = {
227 +     let payment = extract(invoke.payment)
228 +     let amount = extract(payment.amount)
229 +     let id = extract(invoke.transactionId)
230 +     let signer = toBase58String(invoke.caller.bytes)
231 +     let signingRequestExist = checkIfPendingToSign(((signer + "_MA_") + agreementId))
232 +     if (!(signingRequestExist))
233 +         then throw("Sorry there is no pending signature")
234 +         else ScriptResult(WriteSet([DataEntry(((signer + "_MA_") + agreementId), ("SIGNED_" + toBase58String(id)))]), TransferSet([ScriptTransfer(addressFromStringValue(signer), 500000, unit)]))
235 +     }
236 + 
237 + 
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let verifier = extract(addressFromString("3N2s5RtaHPBenCsx2ECcoFRbYHx3noZhXW1"))
5 5  
6 6  let bank = "3N1E6tXddRoVaRfQ9dQ3vg5LaW2fsd8HKub"
7 7  
8 8  func checkEntry (prefix,uuid) = match getString(this, (prefix + uuid)) {
9 9      case a: String => 
10 10          a
11 11      case _ => 
12 12          "NONE"
13 13  }
14 14  
15 15  
16 16  func checkUUID (uuid) = match getString(this, uuid) {
17 17      case a: String => 
18 18          a
19 19      case _ => 
20 20          "NONE"
21 21  }
22 22  
23 23  
24 24  func checkIfWhiteListed (callerAddress) = match getInteger(this, ("addr_WHITELISTED_" + callerAddress)) {
25 25      case a: Int => 
26 26          a
27 27      case _ => 
28 28          0
29 29  }
30 + 
31 + 
32 + func isAdress (addr) = if (if ((size(addr) == 35))
33 +     then (take(addr, 2) == "3N")
34 +     else false)
35 +     then true
36 +     else (take(addr, 2) == "3M")
37 + 
38 + 
39 + func countParties (accumulator,addr) = if ((size(addr) > 0))
40 +     then (accumulator + 1)
41 +     else (accumulator + 0)
42 + 
43 + 
44 + func checkIfPendingToSign (key) = match getString(this, key) {
45 +     case a: String => 
46 +         if ((a == "PENDING"))
47 +             then true
48 +             else false
49 +     case _ => 
50 +         false
51 + }
52 + 
53 + 
54 + func getValueString (json) = take(drop(json, 1), value(indexOf(drop(json, 1), "\"")))
55 + 
56 + 
57 + func getValue (json,key) = {
58 +     let keyIndex = value(indexOf(json, (("\"" + key) + "\":")))
59 +     let data = drop(json, ((keyIndex + size(key)) + 3))
60 +     let jsonValue = getValueString(data)
61 +     jsonValue
62 +     }
30 63  
31 64  
32 65  @Callable(invoke)
33 66  func fileCertification (hash,title,uuid,data) = {
34 67      let id = extract(invoke.transactionId)
35 68      let entryExist = checkEntry(hash, uuid)
36 69      let uuidExist = checkUUID(uuid)
37 70      let callerAddress = toBase58String(invoke.caller.bytes)
38 71      let callerIsWhiteListedNum = checkIfWhiteListed(callerAddress)
39 72      if ((entryExist != "NONE"))
40 73          then throw("This entry already exist")
41 74          else if ((uuidExist != "NONE"))
42 75              then throw("This uuid already exist")
43 76              else if ((size(uuid) > 36))
44 77                  then throw("Uuid is too long")
45 78                  else if ((size(hash) > 64))
46 79                      then throw("Hash is too long")
47 80                      else if ((size(title) > 64))
48 81                          then throw("Title is too long")
49 82                          else if ((callerIsWhiteListedNum > 0))
50 83                              then ScriptResult(WriteSet([DataEntry(uuid, toBase58String(id)), DataEntry((hash + uuid), toBase58String(id)), DataEntry((title + uuid), toBase58String(id)), DataEntry(("addr_WHITELISTED_" + callerAddress), (callerIsWhiteListedNum - 1)), DataEntry(((("data_fc_" + toBase58String(id)) + "_") + callerAddress), data)]), TransferSet([ScriptTransfer(invoke.caller, 500000, unit)]))
51 84                              else {
52 85                                  let payment = extract(invoke.payment)
53 86                                  let amount = extract(payment.amount)
54 87                                  let paymentAssetId = if (isDefined(payment.assetId))
55 88                                      then extract(payment.assetId)
56 89                                      else throw("Waves is not accepted as payment")
57 90                                  let acceptedToken =                                 match getString(verifier, ("white_list_token_" + toBase58String(extract(paymentAssetId)))) {
58 91                                      case a: String => 
59 92                                          a
60 93                                      case _ => 
61 94                                          throw("This token is not accepted at the moment")
62 95                                  }
63 96                                  let currentPrice = getIntegerValue(verifier, ("certification_fee_" + toBase58String(extract(paymentAssetId))))
64 97                                  if ((acceptedToken != "WHITELISTED"))
65 98                                      then throw("This token is not accepted at the moment")
66 99                                      else if (if ((amount != currentPrice))
67 100                                          then (0 >= callerIsWhiteListedNum)
68 101                                          else false)
69 102                                          then throw("The price is wrong")
70 103                                          else ScriptResult(WriteSet([DataEntry(uuid, toBase58String(id)), DataEntry((hash + uuid), toBase58String(id)), DataEntry((title + uuid), toBase58String(id)), DataEntry(((("data_fc_" + toBase58String(id)) + "_") + callerAddress), data)]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, payment.assetId)]))
71 104                                  }
72 105      }
73 106  
74 107  
75 108  
76 109  @Callable(invoke)
77 110  func emailCertification (messageid,uuid,data) = {
78 111      let id = extract(invoke.transactionId)
79 112      let entryExist = checkEntry(messageid, uuid)
80 113      let uuidExist = checkUUID(uuid)
81 114      let callerAddress = toBase58String(invoke.caller.bytes)
82 115      let callerIsWhiteListedNum = checkIfWhiteListed(callerAddress)
83 116      if ((entryExist != "NONE"))
84 117          then throw("This entry already exist")
85 118          else if ((uuidExist != "NONE"))
86 119              then throw("This uuid already exist")
87 120              else if ((size(uuid) > 36))
88 121                  then throw("Uuid is too long")
89 122                  else if ((callerIsWhiteListedNum > 0))
90 123                      then ScriptResult(WriteSet([DataEntry(uuid, toBase58String(id)), DataEntry((messageid + uuid), toBase58String(id)), DataEntry(("addr_WHITELISTED_" + callerAddress), (callerIsWhiteListedNum - 1)), DataEntry(((("data_ec_" + toBase58String(id)) + "_") + callerAddress), data)]), TransferSet([ScriptTransfer(invoke.caller, 500000, unit)]))
91 124                      else {
92 125                          let payment = extract(invoke.payment)
93 126                          let amount = extract(payment.amount)
94 127                          let paymentAssetId = if (isDefined(payment.assetId))
95 128                              then extract(payment.assetId)
96 129                              else throw("Waves is not accepted as payment")
97 130                          let acceptedToken =                         match getString(verifier, ("white_list_token_" + toBase58String(extract(paymentAssetId)))) {
98 131                              case a: String => 
99 132                                  a
100 133                              case _ => 
101 134                                  throw("This token is not accepted at the moment")
102 135                          }
103 136                          let currentPrice = getIntegerValue(verifier, ("certification_fee_" + toBase58String(extract(paymentAssetId))))
104 137                          if ((acceptedToken != "WHITELISTED"))
105 138                              then throw("This token is not accepted at the moment")
106 139                              else if (if ((amount != currentPrice))
107 140                                  then (0 >= callerIsWhiteListedNum)
108 141                                  else false)
109 142                                  then throw("The price is wrong")
110 143                                  else ScriptResult(WriteSet([DataEntry(uuid, toBase58String(id)), DataEntry((messageid + uuid), toBase58String(id)), DataEntry(((("data_ec_" + toBase58String(id)) + "_") + callerAddress), data)]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, payment.assetId)]))
111 144                          }
112 145      }
113 146  
114 147  
148 + 
149 + @Callable(invoke)
150 + func createAgreement (hash,title,addresses) = {
151 +     let payment = extract(invoke.payment)
152 +     let amount = extract(payment.amount)
153 +     let id = extract(invoke.transactionId)
154 +     let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
155 +     let totalAddresses = {
156 +         let $list74257465 = addressesArray
157 +         let $size74257465 = size($list74257465)
158 +         let $acc074257465 = 0
159 +         if (($size74257465 == 0))
160 +             then $acc074257465
161 +             else {
162 +                 let $acc174257465 = countParties($acc074257465, $list74257465[0])
163 +                 if (($size74257465 == 1))
164 +                     then $acc174257465
165 +                     else {
166 +                         let $acc274257465 = countParties($acc174257465, $list74257465[1])
167 +                         if (($size74257465 == 2))
168 +                             then $acc274257465
169 +                             else {
170 +                                 let $acc374257465 = countParties($acc274257465, $list74257465[2])
171 +                                 if (($size74257465 == 3))
172 +                                     then $acc374257465
173 +                                     else {
174 +                                         let $acc474257465 = countParties($acc374257465, $list74257465[3])
175 +                                         if (($size74257465 == 4))
176 +                                             then $acc474257465
177 +                                             else {
178 +                                                 let $acc574257465 = countParties($acc474257465, $list74257465[4])
179 +                                                 if (($size74257465 == 5))
180 +                                                     then $acc574257465
181 +                                                     else {
182 +                                                         let $acc674257465 = countParties($acc574257465, $list74257465[5])
183 +                                                         if (($size74257465 == 6))
184 +                                                             then $acc674257465
185 +                                                             else {
186 +                                                                 let $acc774257465 = countParties($acc674257465, $list74257465[6])
187 +                                                                 throw("List size exceed 6")
188 +                                                                 }
189 +                                                         }
190 +                                                 }
191 +                                         }
192 +                                 }
193 +                         }
194 +                 }
195 +         }
196 +     let paymentAssetId = if (isDefined(payment.assetId))
197 +         then extract(payment.assetId)
198 +         else throw("Waves is not accepted as payment")
199 +     let acceptedToken =     match getString(verifier, ("white_list_token_" + toBase58String(extract(paymentAssetId)))) {
200 +         case a: String => 
201 +             a
202 +         case _ => 
203 +             throw("This token is not accepted at the moment")
204 +     }
205 +     let currentPrice = getIntegerValue(verifier, ("certification_fee_" + toBase58String(extract(paymentAssetId))))
206 +     if ((acceptedToken != "WHITELISTED"))
207 +         then throw("Only payments in SIGN are allowed at the moment")
208 +         else if (((currentPrice * totalAddresses) > amount))
209 +             then throw(("The price is wrong, it should be " + toString((currentPrice * totalAddresses))))
210 +             else if ((totalAddresses == 2))
211 +                 then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId)]))
212 +                 else if ((totalAddresses == 3))
213 +                     then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId)]))
214 +                     else if ((totalAddresses == 4))
215 +                         then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId)]))
216 +                         else if ((totalAddresses == 5))
217 +                             then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[4] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, paymentAssetId)]))
218 +                             else if ((totalAddresses == 6))
219 +                                 then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[4] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[5] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[5]), 0, paymentAssetId)]))
220 +                                 else throw(("Needs 2 to 6 parties addresses" + toString(totalAddresses)))
221 +     }
222 + 
223 + 
224 + 
225 + @Callable(invoke)
226 + func signAgreement (hash,agreementId) = {
227 +     let payment = extract(invoke.payment)
228 +     let amount = extract(payment.amount)
229 +     let id = extract(invoke.transactionId)
230 +     let signer = toBase58String(invoke.caller.bytes)
231 +     let signingRequestExist = checkIfPendingToSign(((signer + "_MA_") + agreementId))
232 +     if (!(signingRequestExist))
233 +         then throw("Sorry there is no pending signature")
234 +         else ScriptResult(WriteSet([DataEntry(((signer + "_MA_") + agreementId), ("SIGNED_" + toBase58String(id)))]), TransferSet([ScriptTransfer(addressFromStringValue(signer), 500000, unit)]))
235 +     }
236 + 
237 +

Old	New		Differences
27	27		case _ =>
28	28		0
29	29		}
	30	+
	31	+
	32	+	func isAdress (addr) = if (if ((size(addr) == 35))
	33	+	then (take(addr, 2) == "3N")
	34	+	else false)
	35	+	then true
	36	+	else (take(addr, 2) == "3M")
	37	+
	38	+
	39	+	func countParties (accumulator,addr) = if ((size(addr) > 0))
	40	+	then (accumulator + 1)
	41	+	else (accumulator + 0)
	42	+
	43	+
	44	+	func checkIfPendingToSign (key) = match getString(this, key) {
	45	+	case a: String =>
	46	+	if ((a == "PENDING"))
	47	+	then true
	48	+	else false
	49	+	case _ =>
	50	+	false
	51	+	}
	52	+
	53	+
	54	+	func getValueString (json) = take(drop(json, 1), value(indexOf(drop(json, 1), "\"")))
	55	+
	56	+
	57	+	func getValue (json,key) = {
	58	+	let keyIndex = value(indexOf(json, (("\"" + key) + "\":")))
	59	+	let data = drop(json, ((keyIndex + size(key)) + 3))
	60	+	let jsonValue = getValueString(data)
	61	+	jsonValue
	62	+	}
30	63
31	64
32	65		@Callable(invoke)

112	145		}
113	146
114	147
	148	+
	149	+	@Callable(invoke)
	150	+	func createAgreement (hash,title,addresses) = {
	151	+	let payment = extract(invoke.payment)
	152	+	let amount = extract(payment.amount)
	153	+	let id = extract(invoke.transactionId)
	154	+	let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
	155	+	let totalAddresses = {
	156	+	let $list74257465 = addressesArray
	157	+	let $size74257465 = size($list74257465)
	158	+	let $acc074257465 = 0
	159	+	if (($size74257465 == 0))
	160	+	then $acc074257465
	161	+	else {
	162	+	let $acc174257465 = countParties($acc074257465, $list74257465[0])
	163	+	if (($size74257465 == 1))
	164	+	then $acc174257465
	165	+	else {
	166	+	let $acc274257465 = countParties($acc174257465, $list74257465[1])
	167	+	if (($size74257465 == 2))
	168	+	then $acc274257465
	169	+	else {
	170	+	let $acc374257465 = countParties($acc274257465, $list74257465[2])
	171	+	if (($size74257465 == 3))
	172	+	then $acc374257465
	173	+	else {
	174	+	let $acc474257465 = countParties($acc374257465, $list74257465[3])
	175	+	if (($size74257465 == 4))
	176	+	then $acc474257465
	177	+	else {
	178	+	let $acc574257465 = countParties($acc474257465, $list74257465[4])
	179	+	if (($size74257465 == 5))
	180	+	then $acc574257465
	181	+	else {
	182	+	let $acc674257465 = countParties($acc574257465, $list74257465[5])
	183	+	if (($size74257465 == 6))
	184	+	then $acc674257465
	185	+	else {
	186	+	let $acc774257465 = countParties($acc674257465, $list74257465[6])
	187	+	throw("List size exceed 6")
	188	+	}
	189	+	}
	190	+	}
	191	+	}
	192	+	}
	193	+	}
	194	+	}
	195	+	}
	196	+	let paymentAssetId = if (isDefined(payment.assetId))
	197	+	then extract(payment.assetId)
	198	+	else throw("Waves is not accepted as payment")
	199	+	let acceptedToken = match getString(verifier, ("white_list_token_" + toBase58String(extract(paymentAssetId)))) {
	200	+	case a: String =>
	201	+	a
	202	+	case _ =>
	203	+	throw("This token is not accepted at the moment")
	204	+	}
	205	+	let currentPrice = getIntegerValue(verifier, ("certification_fee_" + toBase58String(extract(paymentAssetId))))
	206	+	if ((acceptedToken != "WHITELISTED"))
	207	+	then throw("Only payments in SIGN are allowed at the moment")
	208	+	else if (((currentPrice * totalAddresses) > amount))
	209	+	then throw(("The price is wrong, it should be " + toString((currentPrice * totalAddresses))))
	210	+	else if ((totalAddresses == 2))
	211	+	then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId)]))
	212	+	else if ((totalAddresses == 3))
	213	+	then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId)]))
	214	+	else if ((totalAddresses == 4))
	215	+	then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId)]))
	216	+	else if ((totalAddresses == 5))
	217	+	then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[4] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, paymentAssetId)]))
	218	+	else if ((totalAddresses == 6))
	219	+	then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[4] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[5] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[5]), 0, paymentAssetId)]))
	220	+	else throw(("Needs 2 to 6 parties addresses" + toString(totalAddresses)))
	221	+	}
	222	+
	223	+
	224	+
	225	+	@Callable(invoke)
	226	+	func signAgreement (hash,agreementId) = {
	227	+	let payment = extract(invoke.payment)
	228	+	let amount = extract(payment.amount)
	229	+	let id = extract(invoke.transactionId)
	230	+	let signer = toBase58String(invoke.caller.bytes)
	231	+	let signingRequestExist = checkIfPendingToSign(((signer + "_MA_") + agreementId))
	232	+	if (!(signingRequestExist))
	233	+	then throw("Sorry there is no pending signature")
	234	+	else ScriptResult(WriteSet([DataEntry(((signer + "_MA_") + agreementId), ("SIGNED_" + toBase58String(id)))]), TransferSet([ScriptTransfer(addressFromStringValue(signer), 500000, unit)]))
	235	+	}
	236	+
	237	+

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let verifier = extract(addressFromString("3N2s5RtaHPBenCsx2ECcoFRbYHx3noZhXW1"))
5	5
6	6		let bank = "3N1E6tXddRoVaRfQ9dQ3vg5LaW2fsd8HKub"
7	7
8	8		func checkEntry (prefix,uuid) = match getString(this, (prefix + uuid)) {
9	9		case a: String =>
10	10		a
11	11		case _ =>
12	12		"NONE"
13	13		}
14	14
15	15
16	16		func checkUUID (uuid) = match getString(this, uuid) {
17	17		case a: String =>
18	18		a
19	19		case _ =>
20	20		"NONE"
21	21		}
22	22
23	23
24	24		func checkIfWhiteListed (callerAddress) = match getInteger(this, ("addr_WHITELISTED_" + callerAddress)) {
25	25		case a: Int =>
26	26		a
27	27		case _ =>
28	28		0
29	29		}
	30	+
	31	+
	32	+	func isAdress (addr) = if (if ((size(addr) == 35))
	33	+	then (take(addr, 2) == "3N")
	34	+	else false)
	35	+	then true
	36	+	else (take(addr, 2) == "3M")
	37	+
	38	+
	39	+	func countParties (accumulator,addr) = if ((size(addr) > 0))
	40	+	then (accumulator + 1)
	41	+	else (accumulator + 0)
	42	+
	43	+
	44	+	func checkIfPendingToSign (key) = match getString(this, key) {
	45	+	case a: String =>
	46	+	if ((a == "PENDING"))
	47	+	then true
	48	+	else false
	49	+	case _ =>
	50	+	false
	51	+	}
	52	+
	53	+
	54	+	func getValueString (json) = take(drop(json, 1), value(indexOf(drop(json, 1), "\"")))
	55	+
	56	+
	57	+	func getValue (json,key) = {
	58	+	let keyIndex = value(indexOf(json, (("\"" + key) + "\":")))
	59	+	let data = drop(json, ((keyIndex + size(key)) + 3))
	60	+	let jsonValue = getValueString(data)
	61	+	jsonValue
	62	+	}
30	63
31	64
32	65		@Callable(invoke)
33	66		func fileCertification (hash,title,uuid,data) = {
34	67		let id = extract(invoke.transactionId)
35	68		let entryExist = checkEntry(hash, uuid)
36	69		let uuidExist = checkUUID(uuid)
37	70		let callerAddress = toBase58String(invoke.caller.bytes)
38	71		let callerIsWhiteListedNum = checkIfWhiteListed(callerAddress)
39	72		if ((entryExist != "NONE"))
40	73		then throw("This entry already exist")
41	74		else if ((uuidExist != "NONE"))
42	75		then throw("This uuid already exist")
43	76		else if ((size(uuid) > 36))
44	77		then throw("Uuid is too long")
45	78		else if ((size(hash) > 64))
46	79		then throw("Hash is too long")
47	80		else if ((size(title) > 64))
48	81		then throw("Title is too long")
49	82		else if ((callerIsWhiteListedNum > 0))
50	83		then ScriptResult(WriteSet([DataEntry(uuid, toBase58String(id)), DataEntry((hash + uuid), toBase58String(id)), DataEntry((title + uuid), toBase58String(id)), DataEntry(("addr_WHITELISTED_" + callerAddress), (callerIsWhiteListedNum - 1)), DataEntry(((("data_fc_" + toBase58String(id)) + "_") + callerAddress), data)]), TransferSet([ScriptTransfer(invoke.caller, 500000, unit)]))
51	84		else {
52	85		let payment = extract(invoke.payment)
53	86		let amount = extract(payment.amount)
54	87		let paymentAssetId = if (isDefined(payment.assetId))
55	88		then extract(payment.assetId)
56	89		else throw("Waves is not accepted as payment")
57	90		let acceptedToken = match getString(verifier, ("white_list_token_" + toBase58String(extract(paymentAssetId)))) {
58	91		case a: String =>
59	92		a
60	93		case _ =>
61	94		throw("This token is not accepted at the moment")
62	95		}
63	96		let currentPrice = getIntegerValue(verifier, ("certification_fee_" + toBase58String(extract(paymentAssetId))))
64	97		if ((acceptedToken != "WHITELISTED"))
65	98		then throw("This token is not accepted at the moment")
66	99		else if (if ((amount != currentPrice))
67	100		then (0 >= callerIsWhiteListedNum)
68	101		else false)
69	102		then throw("The price is wrong")
70	103		else ScriptResult(WriteSet([DataEntry(uuid, toBase58String(id)), DataEntry((hash + uuid), toBase58String(id)), DataEntry((title + uuid), toBase58String(id)), DataEntry(((("data_fc_" + toBase58String(id)) + "_") + callerAddress), data)]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, payment.assetId)]))
71	104		}
72	105		}
73	106
74	107
75	108
76	109		@Callable(invoke)
77	110		func emailCertification (messageid,uuid,data) = {
78	111		let id = extract(invoke.transactionId)
79	112		let entryExist = checkEntry(messageid, uuid)
80	113		let uuidExist = checkUUID(uuid)
81	114		let callerAddress = toBase58String(invoke.caller.bytes)
82	115		let callerIsWhiteListedNum = checkIfWhiteListed(callerAddress)
83	116		if ((entryExist != "NONE"))
84	117		then throw("This entry already exist")
85	118		else if ((uuidExist != "NONE"))
86	119		then throw("This uuid already exist")
87	120		else if ((size(uuid) > 36))
88	121		then throw("Uuid is too long")
89	122		else if ((callerIsWhiteListedNum > 0))
90	123		then ScriptResult(WriteSet([DataEntry(uuid, toBase58String(id)), DataEntry((messageid + uuid), toBase58String(id)), DataEntry(("addr_WHITELISTED_" + callerAddress), (callerIsWhiteListedNum - 1)), DataEntry(((("data_ec_" + toBase58String(id)) + "_") + callerAddress), data)]), TransferSet([ScriptTransfer(invoke.caller, 500000, unit)]))
91	124		else {
92	125		let payment = extract(invoke.payment)
93	126		let amount = extract(payment.amount)
94	127		let paymentAssetId = if (isDefined(payment.assetId))
95	128		then extract(payment.assetId)
96	129		else throw("Waves is not accepted as payment")
97	130		let acceptedToken = match getString(verifier, ("white_list_token_" + toBase58String(extract(paymentAssetId)))) {
98	131		case a: String =>
99	132		a
100	133		case _ =>
101	134		throw("This token is not accepted at the moment")
102	135		}
103	136		let currentPrice = getIntegerValue(verifier, ("certification_fee_" + toBase58String(extract(paymentAssetId))))
104	137		if ((acceptedToken != "WHITELISTED"))
105	138		then throw("This token is not accepted at the moment")
106	139		else if (if ((amount != currentPrice))
107	140		then (0 >= callerIsWhiteListedNum)
108	141		else false)
109	142		then throw("The price is wrong")
110	143		else ScriptResult(WriteSet([DataEntry(uuid, toBase58String(id)), DataEntry((messageid + uuid), toBase58String(id)), DataEntry(((("data_ec_" + toBase58String(id)) + "_") + callerAddress), data)]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, payment.assetId)]))
111	144		}
112	145		}
113	146
114	147
	148	+
	149	+	@Callable(invoke)
	150	+	func createAgreement (hash,title,addresses) = {
	151	+	let payment = extract(invoke.payment)
	152	+	let amount = extract(payment.amount)
	153	+	let id = extract(invoke.transactionId)
	154	+	let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
	155	+	let totalAddresses = {
	156	+	let $list74257465 = addressesArray
	157	+	let $size74257465 = size($list74257465)
	158	+	let $acc074257465 = 0
	159	+	if (($size74257465 == 0))
	160	+	then $acc074257465
	161	+	else {
	162	+	let $acc174257465 = countParties($acc074257465, $list74257465[0])
	163	+	if (($size74257465 == 1))
	164	+	then $acc174257465
	165	+	else {
	166	+	let $acc274257465 = countParties($acc174257465, $list74257465[1])
	167	+	if (($size74257465 == 2))
	168	+	then $acc274257465
	169	+	else {
	170	+	let $acc374257465 = countParties($acc274257465, $list74257465[2])
	171	+	if (($size74257465 == 3))
	172	+	then $acc374257465
	173	+	else {
	174	+	let $acc474257465 = countParties($acc374257465, $list74257465[3])
	175	+	if (($size74257465 == 4))
	176	+	then $acc474257465
	177	+	else {
	178	+	let $acc574257465 = countParties($acc474257465, $list74257465[4])
	179	+	if (($size74257465 == 5))
	180	+	then $acc574257465
	181	+	else {
	182	+	let $acc674257465 = countParties($acc574257465, $list74257465[5])
	183	+	if (($size74257465 == 6))
	184	+	then $acc674257465
	185	+	else {
	186	+	let $acc774257465 = countParties($acc674257465, $list74257465[6])
	187	+	throw("List size exceed 6")
	188	+	}
	189	+	}
	190	+	}
	191	+	}
	192	+	}
	193	+	}
	194	+	}
	195	+	}
	196	+	let paymentAssetId = if (isDefined(payment.assetId))
	197	+	then extract(payment.assetId)
	198	+	else throw("Waves is not accepted as payment")
	199	+	let acceptedToken = match getString(verifier, ("white_list_token_" + toBase58String(extract(paymentAssetId)))) {
	200	+	case a: String =>
	201	+	a
	202	+	case _ =>
	203	+	throw("This token is not accepted at the moment")
	204	+	}
	205	+	let currentPrice = getIntegerValue(verifier, ("certification_fee_" + toBase58String(extract(paymentAssetId))))
	206	+	if ((acceptedToken != "WHITELISTED"))
	207	+	then throw("Only payments in SIGN are allowed at the moment")
	208	+	else if (((currentPrice * totalAddresses) > amount))
	209	+	then throw(("The price is wrong, it should be " + toString((currentPrice * totalAddresses))))
	210	+	else if ((totalAddresses == 2))
	211	+	then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId)]))
	212	+	else if ((totalAddresses == 3))
	213	+	then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId)]))
	214	+	else if ((totalAddresses == 4))
	215	+	then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId)]))
	216	+	else if ((totalAddresses == 5))
	217	+	then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[4] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, paymentAssetId)]))
	218	+	else if ((totalAddresses == 6))
	219	+	then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), addresses), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[2] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[3] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[4] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[5] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, paymentAssetId), ScriptTransfer(addressFromStringValue(addressesArray[5]), 0, paymentAssetId)]))
	220	+	else throw(("Needs 2 to 6 parties addresses" + toString(totalAddresses)))
	221	+	}
	222	+
	223	+
	224	+
	225	+	@Callable(invoke)
	226	+	func signAgreement (hash,agreementId) = {
	227	+	let payment = extract(invoke.payment)
	228	+	let amount = extract(payment.amount)
	229	+	let id = extract(invoke.transactionId)
	230	+	let signer = toBase58String(invoke.caller.bytes)
	231	+	let signingRequestExist = checkIfPendingToSign(((signer + "_MA_") + agreementId))
	232	+	if (!(signingRequestExist))
	233	+	then throw("Sorry there is no pending signature")
	234	+	else ScriptResult(WriteSet([DataEntry(((signer + "_MA_") + agreementId), ("SIGNED_" + toBase58String(id)))]), TransferSet([ScriptTransfer(addressFromStringValue(signer), 500000, unit)]))
	235	+	}
	236	+
	237	+

github/deemru/w8io/026f985 
43.04 ms ◑