tx · HdmBb4jvHbRBJ7L8348ggN49ZDn98SfuHv5qjFTqWUEz

3MrYoV4W5mu5ZP8rPspCXveMXusGstSPTjL:  -0.01400000 Waves

2020.01.31 12:44 [878354] smart account 3MrYoV4W5mu5ZP8rPspCXveMXusGstSPTjL > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HdmBb4jvHbRBJ7L8348ggN49ZDn98SfuHv5qjFTqWUEz",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1580463886574,
    "version": 1,
    "sender": "3MrYoV4W5mu5ZP8rPspCXveMXusGstSPTjL",
    "senderPublicKey": "f1NbgbpkRpbigsrHaDkWZAkPgcqd8GM5G5eNmqnTD6z",
    "proofs": [
        "3wX1cyNCeeAQK6dbLbw3JhFy34Q9bL7tVunZTRFB5LvYuWQ2a53vQmGmuHxjPHpeKA8D7YudZQCiwofzC48Df2oh"
    ],
    "script": "base64:AAIDAAAAAAAAAA8IARIFCgMICAgSBAoCCAgAAAAHAAAAAAh2ZXJpZmllcgkBAAAAB2V4dHJhY3QAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABAgAAACMzTjJzNVJ0YUhQQmVuQ3N4MkVDY29GUmJZSHgzbm9aaFhXMQAAAAAEYmFuawIAAAAjM04xRTZ0WGRkUm9WYVJmUTlkUTN2ZzVMYVcyZnNkOEhLdWIBAAAACGlzQWRyZXNzAAAAAQAAAARhZGRyAwMJAAAAAAAAAgkAATEAAAABBQAAAARhZGRyAAAAAAAAAAAjCQAAAAAAAAIJAAEvAAAAAgUAAAAEYWRkcgAAAAAAAAAAAgIAAAACM04HBgkAAAAAAAACCQABLwAAAAIFAAAABGFkZHIAAAAAAAAAAAICAAAAAjNNAQAAAAxjb3VudFBhcnRpZXMAAAACAAAAC2FjY3VtdWxhdG9yAAAABGFkZHIDCQAAZgAAAAIJAAExAAAAAQUAAAAEYWRkcgAAAAAAAAAAAAkAAGQAAAACBQAAAAthY2N1bXVsYXRvcgAAAAAAAAAAAQkAAGQAAAACBQAAAAthY2N1bXVsYXRvcgAAAAAAAAAAAAEAAAAUY2hlY2tJZlBlbmRpbmdUb1NpZ24AAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAMJAAAAAAAAAgUAAAABYQIAAAAHUEVORElORwYHBwEAAAAOZ2V0VmFsdWVTdHJpbmcAAAABAAAABGpzb24JAAEvAAAAAgkAATAAAAACBQAAAARqc29uAAAAAAAAAAABCQEAAAAFdmFsdWUAAAABCQAEswAAAAIJAAEwAAAAAgUAAAAEanNvbgAAAAAAAAAAAQIAAAABIgEAAAAIZ2V0VmFsdWUAAAACAAAABGpzb24AAAADa2V5BAAAAAhrZXlJbmRleAkBAAAABXZhbHVlAAAAAQkABLMAAAACBQAAAARqc29uCQABLAAAAAIJAAEsAAAAAgIAAAABIgUAAAADa2V5AgAAAAIiOgQAAAAEZGF0YQkAATAAAAACBQAAAARqc29uCQAAZAAAAAIJAABkAAAAAgUAAAAIa2V5SW5kZXgJAAExAAAAAQUAAAADa2V5AAAAAAAAAAADBAAAAAlqc29uVmFsdWUJAQAAAA5nZXRWYWx1ZVN0cmluZwAAAAEFAAAABGRhdGEFAAAACWpzb25WYWx1ZQAAAAIAAAAGaW52b2tlAQAAAA9jcmVhdGVBZ3JlZW1lbnQAAAADAAAABGhhc2gAAAAFdGl0bGUAAAAJYWRkcmVzc2VzBAAAAAdwYXltZW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAZpbnZva2UAAAAHcGF5bWVudAQAAAAGYW1vdW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAQAAAACaWQJAQAAAAdleHRyYWN0AAAAAQgFAAAABmludm9rZQAAAA10cmFuc2FjdGlvbklkBAAAAA5hZGRyZXNzZXNBcnJheQkABEwAAAACCQEAAAAIZ2V0VmFsdWUAAAACBQAAAAlhZGRyZXNzZXMCAAAACGFkZHJlc3MxCQAETAAAAAIJAQAAAAhnZXRWYWx1ZQAAAAIFAAAACWFkZHJlc3NlcwIAAAAIYWRkcmVzczIJAARMAAAAAgkBAAAACGdldFZhbHVlAAAAAgUAAAAJYWRkcmVzc2VzAgAAAAhhZGRyZXNzMwkABEwAAAACCQEAAAAIZ2V0VmFsdWUAAAACBQAAAAlhZGRyZXNzZXMCAAAACGFkZHJlc3M0CQAETAAAAAIJAQAAAAhnZXRWYWx1ZQAAAAIFAAAACWFkZHJlc3NlcwIAAAAIYWRkcmVzczUJAARMAAAAAgkBAAAACGdldFZhbHVlAAAAAgUAAAAJYWRkcmVzc2VzAgAAAAhhZGRyZXNzNgUAAAADbmlsBAAAAA50b3RhbEFkZHJlc3NlcwQAAAANJGxpc3QxNTAyMTU0MgUAAAAOYWRkcmVzc2VzQXJyYXkEAAAADSRzaXplMTUwMjE1NDIJAAGQAAAAAQUAAAANJGxpc3QxNTAyMTU0MgQAAAANJGFjYzAxNTAyMTU0MgAAAAAAAAAAAAMJAAAAAAAAAgUAAAANJHNpemUxNTAyMTU0MgAAAAAAAAAAAAUAAAANJGFjYzAxNTAyMTU0MgQAAAANJGFjYzExNTAyMTU0MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2MwMTUwMjE1NDIJAAGRAAAAAgUAAAANJGxpc3QxNTAyMTU0MgAAAAAAAAAAAAMJAAAAAAAAAgUAAAANJHNpemUxNTAyMTU0MgAAAAAAAAAAAQUAAAANJGFjYzExNTAyMTU0MgQAAAANJGFjYzIxNTAyMTU0MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2MxMTUwMjE1NDIJAAGRAAAAAgUAAAANJGxpc3QxNTAyMTU0MgAAAAAAAAAAAQMJAAAAAAAAAgUAAAANJHNpemUxNTAyMTU0MgAAAAAAAAAAAgUAAAANJGFjYzIxNTAyMTU0MgQAAAANJGFjYzMxNTAyMTU0MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2MyMTUwMjE1NDIJAAGRAAAAAgUAAAANJGxpc3QxNTAyMTU0MgAAAAAAAAAAAgMJAAAAAAAAAgUAAAANJHNpemUxNTAyMTU0MgAAAAAAAAAAAwUAAAANJGFjYzMxNTAyMTU0MgQAAAANJGFjYzQxNTAyMTU0MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2MzMTUwMjE1NDIJAAGRAAAAAgUAAAANJGxpc3QxNTAyMTU0MgAAAAAAAAAAAwMJAAAAAAAAAgUAAAANJHNpemUxNTAyMTU0MgAAAAAAAAAABAUAAAANJGFjYzQxNTAyMTU0MgQAAAANJGFjYzUxNTAyMTU0MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2M0MTUwMjE1NDIJAAGRAAAAAgUAAAANJGxpc3QxNTAyMTU0MgAAAAAAAAAABAMJAAAAAAAAAgUAAAANJHNpemUxNTAyMTU0MgAAAAAAAAAABQUAAAANJGFjYzUxNTAyMTU0MgQAAAANJGFjYzYxNTAyMTU0MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2M1MTUwMjE1NDIJAAGRAAAAAgUAAAANJGxpc3QxNTAyMTU0MgAAAAAAAAAABQMJAAAAAAAAAgUAAAANJHNpemUxNTAyMTU0MgAAAAAAAAAABgUAAAANJGFjYzYxNTAyMTU0MgQAAAANJGFjYzcxNTAyMTU0MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2M2MTUwMjE1NDIJAAGRAAAAAgUAAAANJGxpc3QxNTAyMTU0MgAAAAAAAAAABgkAAAIAAAABAgAAABJMaXN0IHNpemUgZXhjZWVkIDYEAAAADnBheW1lbnRBc3NldElkAwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQJAQAAAAdleHRyYWN0AAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkAAAIAAAABAgAAACBXYXZlcyBpcyBub3QgYWNjZXB0ZWQgYXMgcGF5bWVudAQAAAANYWNjZXB0ZWRUb2tlbgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAh2ZXJpZmllcgkAASwAAAACAgAAABF3aGl0ZV9saXN0X3Rva2VuXwkAAlgAAAABCQEAAAAHZXh0cmFjdAAAAAEFAAAADnBheW1lbnRBc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEJAAACAAAAAQIAAAAoVGhpcyB0b2tlbiBpcyBub3QgYWNjZXB0ZWQgYXQgdGhlIG1vbWVudAQAAAAMY3VycmVudFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAh2ZXJpZmllcgkAASwAAAACAgAAABJjZXJ0aWZpY2F0aW9uX2ZlZV8JAAJYAAAAAQkBAAAAB2V4dHJhY3QAAAABBQAAAA5wYXltZW50QXNzZXRJZAMJAQAAAAIhPQAAAAIFAAAADWFjY2VwdGVkVG9rZW4CAAAAC1dISVRFTElTVEVECQAAAgAAAAECAAAAL09ubHkgcGF5bWVudHMgaW4gU0lHTiBhcmUgYWxsb3dlZCBhdCB0aGUgbW9tZW50AwkAAGYAAAACCQAAaAAAAAIFAAAADGN1cnJlbnRQcmljZQUAAAAOdG90YWxBZGRyZXNzZXMFAAAABmFtb3VudAkAAAIAAAABCQABLAAAAAICAAAAIVRoZSBwcmljZSBpcyB3cm9uZywgaXQgc2hvdWxkIGJlIAkAAaQAAAABCQAAaAAAAAIFAAAADGN1cnJlbnRQcmljZQUAAAAOdG90YWxBZGRyZXNzZXMDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAAFCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAl0aXRsZV9NQV8JAAJYAAAAAQUAAAACaWQFAAAABXRpdGxlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGhhc2hfTUFfCQACWAAAAAEFAAAAAmlkBQAAAARoYXNoCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGRhdGFfTUFfCQACWAAAAAEFAAAAAmlkBQAAAAlhZGRyZXNzZXMJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA5wYXltZW50QXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMAAAAAAAAAAAAFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABAAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQFAAAAA25pbAMJAAAAAAAAAgUAAAAOdG90YWxBZGRyZXNzZXMAAAAAAAAAAAQJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACXRpdGxlX01BXwkAAlgAAAABBQAAAAJpZAUAAAAFdGl0bGUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIaGFzaF9NQV8JAAJYAAAAAQUAAAACaWQFAAAABGhhc2gJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIZGF0YV9NQV8JAAJYAAAAAQUAAAACaWQFAAAACWFkZHJlc3NlcwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAABGJhbmsFAAAABmFtb3VudAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAEAAAAAAAAAAAAFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAUAAAADbmlsAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAAAwkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAJdGl0bGVfTUFfCQACWAAAAAEFAAAAAmlkBQAAAAV0aXRsZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAhoYXNoX01BXwkAAlgAAAABBQAAAAJpZAUAAAAEaGFzaAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAhkYXRhX01BXwkAAlgAAAABBQAAAAJpZAUAAAAJYWRkcmVzc2VzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAAAAAAAAAAAABQAAAA5wYXltZW50QXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAIAAAAAAAAAAAAFAAAADnBheW1lbnRBc3NldElkBQAAAANuaWwDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAACCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAl0aXRsZV9NQV8JAAJYAAAAAQUAAAACaWQFAAAABXRpdGxlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGhhc2hfTUFfCQACWAAAAAEFAAAAAmlkBQAAAARoYXNoCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGRhdGFfTUFfCQACWAAAAAEFAAAAAmlkBQAAAAlhZGRyZXNzZXMJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA5wYXltZW50QXNzZXRJZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADnBheW1lbnRBc3NldElkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAAOcGF5bWVudEFzc2V0SWQFAAAAA25pbAkAAAIAAAABCQABLAAAAAICAAAAHk5lZWRzIDIgdG8gNiBwYXJ0aWVzIGFkZHJlc3NlcwkAAaQAAAABBQAAAA50b3RhbEFkZHJlc3NlcwAAAAZpbnZva2UBAAAADXNpZ25BZ3JlZW1lbnQAAAACAAAABGhhc2gAAAALYWdyZWVtZW50SWQEAAAAB3BheW1lbnQJAQAAAAdleHRyYWN0AAAAAQgFAAAABmludm9rZQAAAAdwYXltZW50BAAAAAZhbW91bnQJAQAAAAdleHRyYWN0AAAAAQgFAAAAB3BheW1lbnQAAAAGYW1vdW50BAAAAAJpZAkBAAAAB2V4dHJhY3QAAAABCAUAAAAGaW52b2tlAAAADXRyYW5zYWN0aW9uSWQEAAAABnNpZ25lcgkAAlgAAAABCAgFAAAABmludm9rZQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAE3NpZ25pbmdSZXF1ZXN0RXhpc3QJAQAAABRjaGVja0lmUGVuZGluZ1RvU2lnbgAAAAEJAAEsAAAAAgkAASwAAAACBQAAAAZzaWduZXICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQDBQAAABNzaWduaW5nUmVxdWVzdEV4aXN0CQAAAgAAAAECAAAAI1NvcnJ5IHRoZXJlIGlzIG5vIHBlbmRpbmcgc2lnbmF0dXJlCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAABnNpZ25lcgIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAGU0lHTkVEBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAZzaWduZXIAAAAAAAAHoSAFAAAABHVuaXQFAAAAA25pbAAAAADeUqsU",
    "chainId": 84,
    "height": 878354,
    "spentComplexity": 0
}

View: original | compacted
Prev: 6NZgQj1w47GjxNBB8NuCDG4XDCj6RqxHVDriZQavcGhT
Next: F898v8TCrdgj48CH6ntwgGCjvcNitv47d9NMs2obVegQ

Diff: 

OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let a = base58'Gf9t8FA4H3ssoZPCwrg3KwUFCci8zuUFP9ssRsUY3s6a'
4+let a = extract(addressFromString("3N2s5RtaHPBenCsx2ECcoFRbYHx3noZhXW1"))
55 
6-let b = 250000000
6+let b = "3N1E6tXddRoVaRfQ9dQ3vg5LaW2fsd8HKub"
77 
8-let c = "3MzYLkQ6qCwtbxaYQ2yk1kdUudzbNg4JiTG"
9-
10-func d (e) = if (if ((size(e) == 35))
11-    then (take(e, 2) == "3N")
8+func c (d) = if (if ((size(d) == 35))
9+    then (take(d, 2) == "3N")
1210     else false)
1311     then true
14-    else (take(e, 2) == "3M")
12+    else (take(d, 2) == "3M")
1513 
1614 
17-func f (g,e) = if ((size(e) > 0))
18-    then (g + 1)
19-    else (g + 0)
15+func e (f,d) = if ((size(d) > 0))
16+    then (f + 1)
17+    else (f + 0)
2018 
2119 
22-func h (i) = take(drop(i, 1), value(indexOf(drop(i, 1), "\"")))
23-
24-
25-func j (i,k) = {
26-    let l = value(indexOf(i, (("\"" + k) + "\":")))
27-    let m = drop(i, ((l + size(k)) + 3))
28-    let n = h(m)
29-    n
20+func g (h) = {
21+    let i = getString(this, h)
22+    if ($isInstanceOf(i, "String"))
23+        then {
24+            let j = i
25+            if ((j == "PENDING"))
26+                then true
27+                else false
28+            }
29+        else false
3030     }
3131 
3232 
33-@Callable(o)
34-func createAgreement (p,q,r) = {
35-    let s = extract(o.payment)
36-    let t = extract(s.amount)
37-    let u = extract(o.transactionId)
38-    let v = j(r, "address1")
39-    let w = j(r, "address2")
40-    let x = j(r, "address3")
41-    let y = j(r, "address4")
42-    let z = j(r, "address5")
43-    let A = j(r, "address6")
44-    let B = [v, w, x, y, z, A]
45-    let C = {
46-        let D = B
47-        let E = size(D)
48-        let F = 0
49-        if ((E == 0))
50-            then F
33+func k (l) = take(drop(l, 1), value(indexOf(drop(l, 1), "\"")))
34+
35+
36+func m (l,h) = {
37+    let n = value(indexOf(l, (("\"" + h) + "\":")))
38+    let o = drop(l, ((n + size(h)) + 3))
39+    let p = k(o)
40+    p
41+    }
42+
43+
44+@Callable(q)
45+func createAgreement (r,s,t) = {
46+    let u = extract(q.payment)
47+    let v = extract(u.amount)
48+    let w = extract(q.transactionId)
49+    let x = [m(t, "address1"), m(t, "address2"), m(t, "address3"), m(t, "address4"), m(t, "address5"), m(t, "address6")]
50+    let y = {
51+        let z = x
52+        let A = size(z)
53+        let B = 0
54+        if ((A == 0))
55+            then B
5156             else {
52-                let G = f(F, D[0])
53-                if ((E == 1))
54-                    then G
57+                let C = e(B, z[0])
58+                if ((A == 1))
59+                    then C
5560                     else {
56-                        let H = f(G, D[1])
57-                        if ((E == 2))
58-                            then H
61+                        let D = e(C, z[1])
62+                        if ((A == 2))
63+                            then D
5964                             else {
60-                                let I = f(H, D[2])
61-                                if ((E == 3))
62-                                    then I
65+                                let E = e(D, z[2])
66+                                if ((A == 3))
67+                                    then E
6368                                     else {
64-                                        let J = f(I, D[3])
65-                                        if ((E == 4))
66-                                            then J
69+                                        let F = e(E, z[3])
70+                                        if ((A == 4))
71+                                            then F
6772                                             else {
68-                                                let K = f(J, D[4])
69-                                                if ((E == 5))
70-                                                    then K
73+                                                let G = e(F, z[4])
74+                                                if ((A == 5))
75+                                                    then G
7176                                                     else {
72-                                                        let L = f(K, D[5])
73-                                                        if ((E == 6))
74-                                                            then L
77+                                                        let H = e(G, z[5])
78+                                                        if ((A == 6))
79+                                                            then H
7580                                                             else {
76-                                                                let M = f(L, D[6])
81+                                                                let I = e(H, z[6])
7782                                                                 throw("List size exceed 6")
7883                                                                 }
7984                                                         }
8388                         }
8489                 }
8590         }
86-    let N = (((((((((((((((((("{id: '" + toBase58String(u)) + "', title: '") + q) + "' hash: '") + p) + "', address1: '") + B[0]) + "', address2: '") + B[1]) + "', address3: '") + B[2]) + "', address4: '") + B[3]) + "', address5: '") + B[4]) + "', address6: '") + B[5]) + "'}")
87-    let O = if (isDefined(s.assetId))
88-        then extract(s.assetId)
91+    let J = if (isDefined(u.assetId))
92+        then extract(u.assetId)
8993         else throw("Waves is not accepted as payment")
90-    if ((O != a))
94+    let K = {
95+        let i = getString(a, ("white_list_token_" + toBase58String(extract(J))))
96+        if ($isInstanceOf(i, "String"))
97+            then {
98+                let j = i
99+                j
100+                }
101+            else throw("This token is not accepted at the moment")
102+        }
103+    let L = getIntegerValue(a, ("certification_fee_" + toBase58String(extract(J))))
104+    if ((K != "WHITELISTED"))
91105         then throw("Only payments in SIGN are allowed at the moment")
92-        else if (((b * C) > t))
93-            then throw(("The price is wrong, it should be " + toString((b * C))))
94-            else if ((C == 6))
95-                then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(u)), q), DataEntry(("hash_MA_" + toBase58String(u)), p), DataEntry(("data_MA_" + toBase58String(u)), N), DataEntry(((B[0] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[1] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[2] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[3] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[4] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[5] + "_MA_") + toBase58String(u)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a), ScriptTransfer(addressFromStringValue(B[0]), 0, a), ScriptTransfer(addressFromStringValue(B[1]), 0, a), ScriptTransfer(addressFromStringValue(B[2]), 0, a), ScriptTransfer(addressFromStringValue(B[3]), 0, a), ScriptTransfer(addressFromStringValue(B[4]), 0, a), ScriptTransfer(addressFromStringValue(B[5]), 0, a)]))
96-                else if ((C == 5))
97-                    then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(u)), q), DataEntry(("hash_MA_" + toBase58String(u)), p), DataEntry(("data_MA_" + toBase58String(u)), N), DataEntry(((B[0] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[1] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[2] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[3] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[4] + "_MA_") + toBase58String(u)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a), ScriptTransfer(addressFromStringValue(B[0]), 0, a), ScriptTransfer(addressFromStringValue(B[1]), 0, a), ScriptTransfer(addressFromStringValue(B[2]), 0, a), ScriptTransfer(addressFromStringValue(B[3]), 0, a), ScriptTransfer(addressFromStringValue(B[4]), 0, a)]))
98-                    else if ((C == 4))
99-                        then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(u)), q), DataEntry(("hash_MA_" + toBase58String(u)), p), DataEntry(("data_MA_" + toBase58String(u)), N), DataEntry(((B[0] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[1] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[2] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[3] + "_MA_") + toBase58String(u)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a), ScriptTransfer(addressFromStringValue(B[0]), 0, a), ScriptTransfer(addressFromStringValue(B[1]), 0, a), ScriptTransfer(addressFromStringValue(B[2]), 0, a), ScriptTransfer(addressFromStringValue(B[3]), 0, a)]))
100-                        else if ((C == 3))
101-                            then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(u)), q), DataEntry(("hash_MA_" + toBase58String(u)), p), DataEntry(("data_MA_" + toBase58String(u)), N), DataEntry(((B[0] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[1] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[2] + "_MA_") + toBase58String(u)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a), ScriptTransfer(addressFromStringValue(B[0]), 0, a), ScriptTransfer(addressFromStringValue(B[1]), 0, a), ScriptTransfer(addressFromStringValue(B[2]), 0, a)]))
102-                            else if ((C == 2))
103-                                then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(u)), q), DataEntry(("hash_MA_" + toBase58String(u)), p), DataEntry(("data_MA_" + toBase58String(u)), N), DataEntry(((B[0] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[1] + "_MA_") + toBase58String(u)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a), ScriptTransfer(addressFromStringValue(B[0]), 0, a), ScriptTransfer(addressFromStringValue(B[1]), 0, a)]))
104-                                else throw(("Needs 2 to 6 parties addresses" + toString(C)))
106+        else if (((L * y) > v))
107+            then throw(("The price is wrong, it should be " + toString((L * y))))
108+            else if ((y == 5))
109+                then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(w)), s), DataEntry(("hash_MA_" + toBase58String(w)), r), DataEntry(("data_MA_" + toBase58String(w)), t), DataEntry(((x[0] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[1] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[2] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[3] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[4] + "_MA_") + toBase58String(w)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(b), v, J), ScriptTransfer(addressFromStringValue(x[0]), 0, J), ScriptTransfer(addressFromStringValue(x[1]), 0, J), ScriptTransfer(addressFromStringValue(x[2]), 0, J), ScriptTransfer(addressFromStringValue(x[3]), 0, J), ScriptTransfer(addressFromStringValue(x[4]), 0, J)]))
110+                else if ((y == 4))
111+                    then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(w)), s), DataEntry(("hash_MA_" + toBase58String(w)), r), DataEntry(("data_MA_" + toBase58String(w)), t), DataEntry(((x[0] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[1] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[2] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[3] + "_MA_") + toBase58String(w)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(b), v, J), ScriptTransfer(addressFromStringValue(x[0]), 0, J), ScriptTransfer(addressFromStringValue(x[1]), 0, J), ScriptTransfer(addressFromStringValue(x[2]), 0, J), ScriptTransfer(addressFromStringValue(x[3]), 0, J)]))
112+                    else if ((y == 3))
113+                        then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(w)), s), DataEntry(("hash_MA_" + toBase58String(w)), r), DataEntry(("data_MA_" + toBase58String(w)), t), DataEntry(((x[0] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[1] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[2] + "_MA_") + toBase58String(w)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(b), v, J), ScriptTransfer(addressFromStringValue(x[0]), 0, J), ScriptTransfer(addressFromStringValue(x[1]), 0, J), ScriptTransfer(addressFromStringValue(x[2]), 0, J)]))
114+                        else if ((y == 2))
115+                            then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(w)), s), DataEntry(("hash_MA_" + toBase58String(w)), r), DataEntry(("data_MA_" + toBase58String(w)), t), DataEntry(((x[0] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[1] + "_MA_") + toBase58String(w)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(b), v, J), ScriptTransfer(addressFromStringValue(x[0]), 0, J), ScriptTransfer(addressFromStringValue(x[1]), 0, J)]))
116+                            else throw(("Needs 2 to 6 parties addresses" + toString(y)))
105117     }
106118 
107119 
108120 
109-@Callable(o)
110-func signAgreement (p,P) = {
111-    let s = extract(o.payment)
112-    let t = extract(s.amount)
113-    let u = extract(o.transactionId)
114-    let Q = toBase58String(o.caller.bytes)
115-    let R = {
116-        let S = getString(this, ((Q + "_MA_") + toBase58String(u)))
117-        if ($isInstanceOf(S, "String"))
118-            then {
119-                let T = S
120-                T
121-                }
122-            else throw("There is no corresponding signing request")
123-        }
124-    let O = if (isDefined(s.assetId))
125-        then extract(s.assetId)
126-        else throw("Waves is not accepted as payment")
127-    if ((O != a))
128-        then throw("Only payments in SIGN are allowed at the moment")
129-        else if ((t != b))
130-            then throw("The price is wrong")
131-            else ScriptResult(WriteSet([DataEntry(((Q + "_MA_") + toBase58String(u)), "SIGNED")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a)]))
121+@Callable(q)
122+func signAgreement (r,M) = {
123+    let u = extract(q.payment)
124+    let v = extract(u.amount)
125+    let w = extract(q.transactionId)
126+    let N = toBase58String(q.caller.bytes)
127+    let O = g(((N + "_MA_") + toBase58String(w)))
128+    if (O)
129+        then throw("Sorry there is no pending signature")
130+        else ScriptResult(WriteSet([DataEntry(((N + "_MA_") + toBase58String(w)), "SIGNED")]), TransferSet([ScriptTransfer(addressFromStringValue(N), 500000, unit)]))
132131     }
133132 
134133 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 3 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let a = base58'Gf9t8FA4H3ssoZPCwrg3KwUFCci8zuUFP9ssRsUY3s6a'
4+let a = extract(addressFromString("3N2s5RtaHPBenCsx2ECcoFRbYHx3noZhXW1"))
55 
6-let b = 250000000
6+let b = "3N1E6tXddRoVaRfQ9dQ3vg5LaW2fsd8HKub"
77 
8-let c = "3MzYLkQ6qCwtbxaYQ2yk1kdUudzbNg4JiTG"
9-
10-func d (e) = if (if ((size(e) == 35))
11-    then (take(e, 2) == "3N")
8+func c (d) = if (if ((size(d) == 35))
9+    then (take(d, 2) == "3N")
1210     else false)
1311     then true
14-    else (take(e, 2) == "3M")
12+    else (take(d, 2) == "3M")
1513 
1614 
17-func f (g,e) = if ((size(e) > 0))
18-    then (g + 1)
19-    else (g + 0)
15+func e (f,d) = if ((size(d) > 0))
16+    then (f + 1)
17+    else (f + 0)
2018 
2119 
22-func h (i) = take(drop(i, 1), value(indexOf(drop(i, 1), "\"")))
23-
24-
25-func j (i,k) = {
26-    let l = value(indexOf(i, (("\"" + k) + "\":")))
27-    let m = drop(i, ((l + size(k)) + 3))
28-    let n = h(m)
29-    n
20+func g (h) = {
21+    let i = getString(this, h)
22+    if ($isInstanceOf(i, "String"))
23+        then {
24+            let j = i
25+            if ((j == "PENDING"))
26+                then true
27+                else false
28+            }
29+        else false
3030     }
3131 
3232 
33-@Callable(o)
34-func createAgreement (p,q,r) = {
35-    let s = extract(o.payment)
36-    let t = extract(s.amount)
37-    let u = extract(o.transactionId)
38-    let v = j(r, "address1")
39-    let w = j(r, "address2")
40-    let x = j(r, "address3")
41-    let y = j(r, "address4")
42-    let z = j(r, "address5")
43-    let A = j(r, "address6")
44-    let B = [v, w, x, y, z, A]
45-    let C = {
46-        let D = B
47-        let E = size(D)
48-        let F = 0
49-        if ((E == 0))
50-            then F
33+func k (l) = take(drop(l, 1), value(indexOf(drop(l, 1), "\"")))
34+
35+
36+func m (l,h) = {
37+    let n = value(indexOf(l, (("\"" + h) + "\":")))
38+    let o = drop(l, ((n + size(h)) + 3))
39+    let p = k(o)
40+    p
41+    }
42+
43+
44+@Callable(q)
45+func createAgreement (r,s,t) = {
46+    let u = extract(q.payment)
47+    let v = extract(u.amount)
48+    let w = extract(q.transactionId)
49+    let x = [m(t, "address1"), m(t, "address2"), m(t, "address3"), m(t, "address4"), m(t, "address5"), m(t, "address6")]
50+    let y = {
51+        let z = x
52+        let A = size(z)
53+        let B = 0
54+        if ((A == 0))
55+            then B
5156             else {
52-                let G = f(F, D[0])
53-                if ((E == 1))
54-                    then G
57+                let C = e(B, z[0])
58+                if ((A == 1))
59+                    then C
5560                     else {
56-                        let H = f(G, D[1])
57-                        if ((E == 2))
58-                            then H
61+                        let D = e(C, z[1])
62+                        if ((A == 2))
63+                            then D
5964                             else {
60-                                let I = f(H, D[2])
61-                                if ((E == 3))
62-                                    then I
65+                                let E = e(D, z[2])
66+                                if ((A == 3))
67+                                    then E
6368                                     else {
64-                                        let J = f(I, D[3])
65-                                        if ((E == 4))
66-                                            then J
69+                                        let F = e(E, z[3])
70+                                        if ((A == 4))
71+                                            then F
6772                                             else {
68-                                                let K = f(J, D[4])
69-                                                if ((E == 5))
70-                                                    then K
73+                                                let G = e(F, z[4])
74+                                                if ((A == 5))
75+                                                    then G
7176                                                     else {
72-                                                        let L = f(K, D[5])
73-                                                        if ((E == 6))
74-                                                            then L
77+                                                        let H = e(G, z[5])
78+                                                        if ((A == 6))
79+                                                            then H
7580                                                             else {
76-                                                                let M = f(L, D[6])
81+                                                                let I = e(H, z[6])
7782                                                                 throw("List size exceed 6")
7883                                                                 }
7984                                                         }
8085                                                 }
8186                                         }
8287                                 }
8388                         }
8489                 }
8590         }
86-    let N = (((((((((((((((((("{id: '" + toBase58String(u)) + "', title: '") + q) + "' hash: '") + p) + "', address1: '") + B[0]) + "', address2: '") + B[1]) + "', address3: '") + B[2]) + "', address4: '") + B[3]) + "', address5: '") + B[4]) + "', address6: '") + B[5]) + "'}")
87-    let O = if (isDefined(s.assetId))
88-        then extract(s.assetId)
91+    let J = if (isDefined(u.assetId))
92+        then extract(u.assetId)
8993         else throw("Waves is not accepted as payment")
90-    if ((O != a))
94+    let K = {
95+        let i = getString(a, ("white_list_token_" + toBase58String(extract(J))))
96+        if ($isInstanceOf(i, "String"))
97+            then {
98+                let j = i
99+                j
100+                }
101+            else throw("This token is not accepted at the moment")
102+        }
103+    let L = getIntegerValue(a, ("certification_fee_" + toBase58String(extract(J))))
104+    if ((K != "WHITELISTED"))
91105         then throw("Only payments in SIGN are allowed at the moment")
92-        else if (((b * C) > t))
93-            then throw(("The price is wrong, it should be " + toString((b * C))))
94-            else if ((C == 6))
95-                then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(u)), q), DataEntry(("hash_MA_" + toBase58String(u)), p), DataEntry(("data_MA_" + toBase58String(u)), N), DataEntry(((B[0] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[1] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[2] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[3] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[4] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[5] + "_MA_") + toBase58String(u)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a), ScriptTransfer(addressFromStringValue(B[0]), 0, a), ScriptTransfer(addressFromStringValue(B[1]), 0, a), ScriptTransfer(addressFromStringValue(B[2]), 0, a), ScriptTransfer(addressFromStringValue(B[3]), 0, a), ScriptTransfer(addressFromStringValue(B[4]), 0, a), ScriptTransfer(addressFromStringValue(B[5]), 0, a)]))
96-                else if ((C == 5))
97-                    then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(u)), q), DataEntry(("hash_MA_" + toBase58String(u)), p), DataEntry(("data_MA_" + toBase58String(u)), N), DataEntry(((B[0] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[1] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[2] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[3] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[4] + "_MA_") + toBase58String(u)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a), ScriptTransfer(addressFromStringValue(B[0]), 0, a), ScriptTransfer(addressFromStringValue(B[1]), 0, a), ScriptTransfer(addressFromStringValue(B[2]), 0, a), ScriptTransfer(addressFromStringValue(B[3]), 0, a), ScriptTransfer(addressFromStringValue(B[4]), 0, a)]))
98-                    else if ((C == 4))
99-                        then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(u)), q), DataEntry(("hash_MA_" + toBase58String(u)), p), DataEntry(("data_MA_" + toBase58String(u)), N), DataEntry(((B[0] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[1] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[2] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[3] + "_MA_") + toBase58String(u)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a), ScriptTransfer(addressFromStringValue(B[0]), 0, a), ScriptTransfer(addressFromStringValue(B[1]), 0, a), ScriptTransfer(addressFromStringValue(B[2]), 0, a), ScriptTransfer(addressFromStringValue(B[3]), 0, a)]))
100-                        else if ((C == 3))
101-                            then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(u)), q), DataEntry(("hash_MA_" + toBase58String(u)), p), DataEntry(("data_MA_" + toBase58String(u)), N), DataEntry(((B[0] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[1] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[2] + "_MA_") + toBase58String(u)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a), ScriptTransfer(addressFromStringValue(B[0]), 0, a), ScriptTransfer(addressFromStringValue(B[1]), 0, a), ScriptTransfer(addressFromStringValue(B[2]), 0, a)]))
102-                            else if ((C == 2))
103-                                then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(u)), q), DataEntry(("hash_MA_" + toBase58String(u)), p), DataEntry(("data_MA_" + toBase58String(u)), N), DataEntry(((B[0] + "_MA_") + toBase58String(u)), "PENDING"), DataEntry(((B[1] + "_MA_") + toBase58String(u)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a), ScriptTransfer(addressFromStringValue(B[0]), 0, a), ScriptTransfer(addressFromStringValue(B[1]), 0, a)]))
104-                                else throw(("Needs 2 to 6 parties addresses" + toString(C)))
106+        else if (((L * y) > v))
107+            then throw(("The price is wrong, it should be " + toString((L * y))))
108+            else if ((y == 5))
109+                then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(w)), s), DataEntry(("hash_MA_" + toBase58String(w)), r), DataEntry(("data_MA_" + toBase58String(w)), t), DataEntry(((x[0] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[1] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[2] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[3] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[4] + "_MA_") + toBase58String(w)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(b), v, J), ScriptTransfer(addressFromStringValue(x[0]), 0, J), ScriptTransfer(addressFromStringValue(x[1]), 0, J), ScriptTransfer(addressFromStringValue(x[2]), 0, J), ScriptTransfer(addressFromStringValue(x[3]), 0, J), ScriptTransfer(addressFromStringValue(x[4]), 0, J)]))
110+                else if ((y == 4))
111+                    then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(w)), s), DataEntry(("hash_MA_" + toBase58String(w)), r), DataEntry(("data_MA_" + toBase58String(w)), t), DataEntry(((x[0] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[1] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[2] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[3] + "_MA_") + toBase58String(w)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(b), v, J), ScriptTransfer(addressFromStringValue(x[0]), 0, J), ScriptTransfer(addressFromStringValue(x[1]), 0, J), ScriptTransfer(addressFromStringValue(x[2]), 0, J), ScriptTransfer(addressFromStringValue(x[3]), 0, J)]))
112+                    else if ((y == 3))
113+                        then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(w)), s), DataEntry(("hash_MA_" + toBase58String(w)), r), DataEntry(("data_MA_" + toBase58String(w)), t), DataEntry(((x[0] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[1] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[2] + "_MA_") + toBase58String(w)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(b), v, J), ScriptTransfer(addressFromStringValue(x[0]), 0, J), ScriptTransfer(addressFromStringValue(x[1]), 0, J), ScriptTransfer(addressFromStringValue(x[2]), 0, J)]))
114+                        else if ((y == 2))
115+                            then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(w)), s), DataEntry(("hash_MA_" + toBase58String(w)), r), DataEntry(("data_MA_" + toBase58String(w)), t), DataEntry(((x[0] + "_MA_") + toBase58String(w)), "PENDING"), DataEntry(((x[1] + "_MA_") + toBase58String(w)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(b), v, J), ScriptTransfer(addressFromStringValue(x[0]), 0, J), ScriptTransfer(addressFromStringValue(x[1]), 0, J)]))
116+                            else throw(("Needs 2 to 6 parties addresses" + toString(y)))
105117     }
106118 
107119 
108120 
109-@Callable(o)
110-func signAgreement (p,P) = {
111-    let s = extract(o.payment)
112-    let t = extract(s.amount)
113-    let u = extract(o.transactionId)
114-    let Q = toBase58String(o.caller.bytes)
115-    let R = {
116-        let S = getString(this, ((Q + "_MA_") + toBase58String(u)))
117-        if ($isInstanceOf(S, "String"))
118-            then {
119-                let T = S
120-                T
121-                }
122-            else throw("There is no corresponding signing request")
123-        }
124-    let O = if (isDefined(s.assetId))
125-        then extract(s.assetId)
126-        else throw("Waves is not accepted as payment")
127-    if ((O != a))
128-        then throw("Only payments in SIGN are allowed at the moment")
129-        else if ((t != b))
130-            then throw("The price is wrong")
131-            else ScriptResult(WriteSet([DataEntry(((Q + "_MA_") + toBase58String(u)), "SIGNED")]), TransferSet([ScriptTransfer(addressFromStringValue(c), t, a)]))
121+@Callable(q)
122+func signAgreement (r,M) = {
123+    let u = extract(q.payment)
124+    let v = extract(u.amount)
125+    let w = extract(q.transactionId)
126+    let N = toBase58String(q.caller.bytes)
127+    let O = g(((N + "_MA_") + toBase58String(w)))
128+    if (O)
129+        then throw("Sorry there is no pending signature")
130+        else ScriptResult(WriteSet([DataEntry(((N + "_MA_") + toBase58String(w)), "SIGNED")]), TransferSet([ScriptTransfer(addressFromStringValue(N), 500000, unit)]))
132131     }
133132 
134133 
github/deemru/w8io/169f3d6 
82.85 ms ◑