w8 · tx · HSn···cEH

tx · HSnVGFGhdjo6ACxrxXjwtRqLFEJmaBbqriS6xUSp2cEH

3MrYoV4W5mu5ZP8rPspCXveMXusGstSPTjL:  -0.01400000 Waves

2020.01.31 11:47 [878295] smart account 3MrYoV4W5mu5ZP8rPspCXveMXusGstSPTjL > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HSnVGFGhdjo6ACxrxXjwtRqLFEJmaBbqriS6xUSp2cEH",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1580460467872,
    "version": 1,
    "sender": "3MrYoV4W5mu5ZP8rPspCXveMXusGstSPTjL",
    "senderPublicKey": "f1NbgbpkRpbigsrHaDkWZAkPgcqd8GM5G5eNmqnTD6z",
    "proofs": [
        "249SBvcKnocWpkocatT7KHZHdymNbVwnXQdcXaYnSqKhQiDBEAVYSXdFykBBNKWzVuXgsEsb33btct3E3TRufbxW"
    ],
    "script": "base64:AAIDAAAAAAAAAA8IARIFCgMICAgSBAoCCAgAAAAHAAAAAA1hY2NlcHRlZFRva2VuAQAAACDopWq8yndC8nBhMjVKT0WDubke5ZlnF8Nx6tkLoQSt6wAAAAAMY3VycmVudFByaWNlAAAAAAAO5rKAAAAAAARiYW5rAgAAACMzTXpZTGtRNnFDd3RieGFZUTJ5azFrZFV1ZHpiTmc0SmlURwEAAAAIaXNBZHJlc3MAAAABAAAABGFkZHIDCQAAAAAAAAIJAAExAAAAAQUAAAAEYWRkcgAAAAAAAAAAIwkAAAAAAAACCQABLwAAAAIFAAAABGFkZHIAAAAAAAAAAAICAAAAAjNOBwEAAAAMY291bnRQYXJ0aWVzAAAAAgAAAAthY2N1bXVsYXRvcgAAAARhZGRyAwkBAAAACGlzQWRyZXNzAAAAAQUAAAAEYWRkcgkAAGQAAAACBQAAAAthY2N1bXVsYXRvcgAAAAAAAAAAAQkAAGQAAAACBQAAAAthY2N1bXVsYXRvcgAAAAAAAAAAAAEAAAAOZ2V0VmFsdWVTdHJpbmcAAAABAAAABGpzb24JAAEvAAAAAgkAATAAAAACBQAAAARqc29uAAAAAAAAAAABCQEAAAAFdmFsdWUAAAABCQAEswAAAAIJAAEwAAAAAgUAAAAEanNvbgAAAAAAAAAAAQIAAAABIgEAAAAIZ2V0VmFsdWUAAAACAAAABGpzb24AAAADa2V5BAAAAAhrZXlJbmRleAkBAAAABXZhbHVlAAAAAQkABLMAAAACBQAAAARqc29uCQABLAAAAAIJAAEsAAAAAgIAAAABIgUAAAADa2V5AgAAAAIiOgQAAAAEZGF0YQkAATAAAAACBQAAAARqc29uCQAAZAAAAAIJAABkAAAAAgUAAAAIa2V5SW5kZXgJAAExAAAAAQUAAAADa2V5AAAAAAAAAAADBAAAAAlqc29uVmFsdWUJAQAAAA5nZXRWYWx1ZVN0cmluZwAAAAEFAAAABGRhdGEFAAAACWpzb25WYWx1ZQAAAAIAAAAGaW52b2tlAQAAAA9jcmVhdGVBZ3JlZW1lbnQAAAADAAAABGhhc2gAAAAFdGl0bGUAAAAJYWRkcmVzc2VzBAAAAAdwYXltZW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAZpbnZva2UAAAAHcGF5bWVudAQAAAAGYW1vdW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAQAAAACaWQJAQAAAAdleHRyYWN0AAAAAQgFAAAABmludm9rZQAAAA10cmFuc2FjdGlvbklkBAAAAA5hZGRyZXNzZXNBcnJheQkABEwAAAACCQEAAAAIZ2V0VmFsdWUAAAACBQAAAAlhZGRyZXNzZXMCAAAACGFkZHJlc3MxCQAETAAAAAIJAQAAAAhnZXRWYWx1ZQAAAAIFAAAACWFkZHJlc3NlcwIAAAAIYWRkcmVzczIJAARMAAAAAgkBAAAACGdldFZhbHVlAAAAAgUAAAAJYWRkcmVzc2VzAgAAAAhhZGRyZXNzMwkABEwAAAACCQEAAAAIZ2V0VmFsdWUAAAACBQAAAAlhZGRyZXNzZXMCAAAACGFkZHJlc3M0CQAETAAAAAIJAQAAAAhnZXRWYWx1ZQAAAAIFAAAACWFkZHJlc3NlcwIAAAAIYWRkcmVzczUJAARMAAAAAgkBAAAACGdldFZhbHVlAAAAAgUAAAAJYWRkcmVzc2VzAgAAAAhhZGRyZXNzNgUAAAADbmlsBAAAAA50b3RhbEFkZHJlc3NlcwQAAAANJGxpc3QxNDIyMTQ2MgUAAAAOYWRkcmVzc2VzQXJyYXkEAAAADSRzaXplMTQyMjE0NjIJAAGQAAAAAQUAAAANJGxpc3QxNDIyMTQ2MgQAAAANJGFjYzAxNDIyMTQ2MgAAAAAAAAAAAAMJAAAAAAAAAgUAAAANJHNpemUxNDIyMTQ2MgAAAAAAAAAAAAUAAAANJGFjYzAxNDIyMTQ2MgQAAAANJGFjYzExNDIyMTQ2MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2MwMTQyMjE0NjIJAAGRAAAAAgUAAAANJGxpc3QxNDIyMTQ2MgAAAAAAAAAAAAMJAAAAAAAAAgUAAAANJHNpemUxNDIyMTQ2MgAAAAAAAAAAAQUAAAANJGFjYzExNDIyMTQ2MgQAAAANJGFjYzIxNDIyMTQ2MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2MxMTQyMjE0NjIJAAGRAAAAAgUAAAANJGxpc3QxNDIyMTQ2MgAAAAAAAAAAAQMJAAAAAAAAAgUAAAANJHNpemUxNDIyMTQ2MgAAAAAAAAAAAgUAAAANJGFjYzIxNDIyMTQ2MgQAAAANJGFjYzMxNDIyMTQ2MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2MyMTQyMjE0NjIJAAGRAAAAAgUAAAANJGxpc3QxNDIyMTQ2MgAAAAAAAAAAAgMJAAAAAAAAAgUAAAANJHNpemUxNDIyMTQ2MgAAAAAAAAAAAwUAAAANJGFjYzMxNDIyMTQ2MgQAAAANJGFjYzQxNDIyMTQ2MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2MzMTQyMjE0NjIJAAGRAAAAAgUAAAANJGxpc3QxNDIyMTQ2MgAAAAAAAAAAAwMJAAAAAAAAAgUAAAANJHNpemUxNDIyMTQ2MgAAAAAAAAAABAUAAAANJGFjYzQxNDIyMTQ2MgQAAAANJGFjYzUxNDIyMTQ2MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2M0MTQyMjE0NjIJAAGRAAAAAgUAAAANJGxpc3QxNDIyMTQ2MgAAAAAAAAAABAMJAAAAAAAAAgUAAAANJHNpemUxNDIyMTQ2MgAAAAAAAAAABQUAAAANJGFjYzUxNDIyMTQ2MgQAAAANJGFjYzYxNDIyMTQ2MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2M1MTQyMjE0NjIJAAGRAAAAAgUAAAANJGxpc3QxNDIyMTQ2MgAAAAAAAAAABQMJAAAAAAAAAgUAAAANJHNpemUxNDIyMTQ2MgAAAAAAAAAABgUAAAANJGFjYzYxNDIyMTQ2MgQAAAANJGFjYzcxNDIyMTQ2MgkBAAAADGNvdW50UGFydGllcwAAAAIFAAAADSRhY2M2MTQyMjE0NjIJAAGRAAAAAgUAAAANJGxpc3QxNDIyMTQ2MgAAAAAAAAAABgkAAAIAAAABAgAAABJMaXN0IHNpemUgZXhjZWVkIDYEAAAAE2FncmVlbWVudERhdGFPYmplY3QJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAABntpZDogJwkAAlgAAAABBQAAAAJpZAIAAAALJywgdGl0bGU6ICcFAAAABXRpdGxlAgAAAAknIGhhc2g6ICcFAAAABGhhc2gCAAAADicsIGFkZHJlc3MxOiAnCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAgAAAA4nLCBhZGRyZXNzMjogJwkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQIAAAAOJywgYWRkcmVzczM6ICcJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAICAAAADicsIGFkZHJlc3M0OiAnCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAgAAAA4nLCBhZGRyZXNzNTogJwkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABAIAAAAOJywgYWRkcmVzczY6ICcJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAUCAAAAAid9BAAAAA5wYXltZW50QXNzZXRJZAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAgV2F2ZXMgaXMgbm90IGFjY2VwdGVkIGFzIHBheW1lbnQDCQEAAAACIT0AAAACBQAAAA5wYXltZW50QXNzZXRJZAUAAAANYWNjZXB0ZWRUb2tlbgkAAAIAAAABAgAAAC9Pbmx5IHBheW1lbnRzIGluIFNJR04gYXJlIGFsbG93ZWQgYXQgdGhlIG1vbWVudAMJAABmAAAAAgkAAGgAAAACBQAAAAxjdXJyZW50UHJpY2UFAAAADnRvdGFsQWRkcmVzc2VzBQAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACAgAAACFUaGUgcHJpY2UgaXMgd3JvbmcsIGl0IHNob3VsZCBiZSAJAAGkAAAAAQkAAGgAAAACBQAAAAxjdXJyZW50UHJpY2UFAAAADnRvdGFsQWRkcmVzc2VzAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAABgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAJdGl0bGVfTUFfCQACWAAAAAEFAAAAAmlkBQAAAAV0aXRsZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAhoYXNoX01BXwkAAlgAAAABBQAAAAJpZAUAAAAEaGFzaAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAhkYXRhX01BXwkAAlgAAAABBQAAAAJpZAUAAAATYWdyZWVtZW50RGF0YU9iamVjdAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAEAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABQIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAEAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAQAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAFAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAAFCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAl0aXRsZV9NQV8JAAJYAAAAAQUAAAACaWQFAAAABXRpdGxlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGhhc2hfTUFfCQACWAAAAAEFAAAAAmlkBQAAAARoYXNoCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGRhdGFfTUFfCQACWAAAAAEFAAAAAmlkBQAAABNhZ3JlZW1lbnREYXRhT2JqZWN0CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAQCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAABGJhbmsFAAAABmFtb3VudAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAEAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAAECQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAl0aXRsZV9NQV8JAAJYAAAAAQUAAAACaWQFAAAABXRpdGxlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGhhc2hfTUFfCQACWAAAAAEFAAAAAmlkBQAAAARoYXNoCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGRhdGFfTUFfCQACWAAAAAEFAAAAAmlkBQAAABNhZ3JlZW1lbnREYXRhT2JqZWN0CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAEAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgUAAAADbmlsAwkAAAAAAAACBQAAAA50b3RhbEFkZHJlc3NlcwAAAAAAAAAAAwkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAJdGl0bGVfTUFfCQACWAAAAAEFAAAAAmlkBQAAAAV0aXRsZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAhoYXNoX01BXwkAAlgAAAABBQAAAAJpZAUAAAAEaGFzaAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAhkYXRhX01BXwkAAlgAAAABBQAAAAJpZAUAAAATYWdyZWVtZW50RGF0YU9iamVjdAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAEAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAACCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAl0aXRsZV9NQV8JAAJYAAAAAQUAAAACaWQFAAAABXRpdGxlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGhhc2hfTUFfCQACWAAAAAEFAAAAAmlkBQAAAARoYXNoCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGRhdGFfTUFfCQACWAAAAAEFAAAAAmlkBQAAABNhZ3JlZW1lbnREYXRhT2JqZWN0CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAABGJhbmsFAAAABmFtb3VudAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAAAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwJAAACAAAAAQIAAAAeTmVlZHMgMiB0byA2IHBhcnRpZXMgYWRkcmVzc2VzAAAABmludm9rZQEAAAANc2lnbkFncmVlbWVudAAAAAIAAAAEaGFzaAAAAAthZ3JlZW1lbnRJZAQAAAAHcGF5bWVudAkBAAAAB2V4dHJhY3QAAAABCAUAAAAGaW52b2tlAAAAB3BheW1lbnQEAAAABmFtb3VudAkBAAAAB2V4dHJhY3QAAAABCAUAAAAHcGF5bWVudAAAAAZhbW91bnQEAAAAAmlkCQEAAAAHZXh0cmFjdAAAAAEIBQAAAAZpbnZva2UAAAANdHJhbnNhY3Rpb25JZAQAAAAGc2lnbmVyCQACWAAAAAEICAUAAAAGaW52b2tlAAAABmNhbGxlcgAAAAVieXRlcwQAAAATc2lnbmluZ1JlcXVlc3RFeGlzdAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIJAAEsAAAAAgUAAAAGc2lnbmVyAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXMFAAAAByRtYXRjaDAFAAAAAXMJAAACAAAAAQIAAAApVGhlcmUgaXMgbm8gY29ycmVzcG9uZGluZyBzaWduaW5nIHJlcXVlc3QEAAAADnBheW1lbnRBc3NldElkAwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQJAQAAAAdleHRyYWN0AAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkAAAIAAAABAgAAACBXYXZlcyBpcyBub3QgYWNjZXB0ZWQgYXMgcGF5bWVudAMJAQAAAAIhPQAAAAIFAAAADnBheW1lbnRBc3NldElkBQAAAA1hY2NlcHRlZFRva2VuCQAAAgAAAAECAAAAL09ubHkgcGF5bWVudHMgaW4gU0lHTiBhcmUgYWxsb3dlZCBhdCB0aGUgbW9tZW50AwkBAAAAAiE9AAAAAgUAAAAGYW1vdW50BQAAAAxjdXJyZW50UHJpY2UJAAACAAAAAQIAAAASVGhlIHByaWNlIGlzIHdyb25nCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIFAAAABnNpZ25lcgIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAGU0lHTkVEBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQFAAAADWFjY2VwdGVkVG9rZW4FAAAAA25pbAAAAAApayoq",
    "chainId": 84,
    "height": 878295,
    "spentComplexity": 0
}

View: original | compacted
Prev: 91ZxfUu29HHB8svjmzJZkRsWrEqRvzuMTTEUSFERjZeS
Next: GuQTiXH3pxZTUx2pg2HjJMUZYt3eLk7Migbnv77XwufT

Diff: 
Old New Differences
14 14  
15 15  func countParties (accumulator,addr) = if (isAdress(addr))
16 16      then (accumulator + 1)
17 -     else throw(addr)
17 +     else (accumulator + 0)
18 18  
19 19  
20 20  func getValueString (json) = take(drop(json, 1), value(indexOf(drop(json, 1), "\"")))
35 35      let id = extract(invoke.transactionId)
36 36      let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
37 37      let totalAddresses = {
38 -         let $list14031443 = addressesArray
39 -         let $size14031443 = size($list14031443)
40 -         let $acc014031443 = 0
41 -         if (($size14031443 == 0))
42 -             then $acc014031443
38 +         let $list14221462 = addressesArray
39 +         let $size14221462 = size($list14221462)
40 +         let $acc014221462 = 0
41 +         if (($size14221462 == 0))
42 +             then $acc014221462
43 43              else {
44 -                 let $acc114031443 = countParties($acc014031443, $list14031443[0])
45 -                 if (($size14031443 == 1))
46 -                     then $acc114031443
44 +                 let $acc114221462 = countParties($acc014221462, $list14221462[0])
45 +                 if (($size14221462 == 1))
46 +                     then $acc114221462
47 47                      else {
48 -                         let $acc214031443 = countParties($acc114031443, $list14031443[1])
49 -                         if (($size14031443 == 2))
50 -                             then $acc214031443
48 +                         let $acc214221462 = countParties($acc114221462, $list14221462[1])
49 +                         if (($size14221462 == 2))
50 +                             then $acc214221462
51 51                              else {
52 -                                 let $acc314031443 = countParties($acc214031443, $list14031443[2])
53 -                                 if (($size14031443 == 3))
54 -                                     then $acc314031443
52 +                                 let $acc314221462 = countParties($acc214221462, $list14221462[2])
53 +                                 if (($size14221462 == 3))
54 +                                     then $acc314221462
55 55                                      else {
56 -                                         let $acc414031443 = countParties($acc314031443, $list14031443[3])
57 -                                         if (($size14031443 == 4))
58 -                                             then $acc414031443
56 +                                         let $acc414221462 = countParties($acc314221462, $list14221462[3])
57 +                                         if (($size14221462 == 4))
58 +                                             then $acc414221462
59 59                                              else {
60 -                                                 let $acc514031443 = countParties($acc414031443, $list14031443[4])
61 -                                                 if (($size14031443 == 5))
62 -                                                     then $acc514031443
60 +                                                 let $acc514221462 = countParties($acc414221462, $list14221462[4])
61 +                                                 if (($size14221462 == 5))
62 +                                                     then $acc514221462
63 63                                                      else {
64 -                                                         let $acc614031443 = countParties($acc514031443, $list14031443[5])
65 -                                                         if (($size14031443 == 6))
66 -                                                             then $acc614031443
64 +                                                         let $acc614221462 = countParties($acc514221462, $list14221462[5])
65 +                                                         if (($size14221462 == 6))
66 +                                                             then $acc614221462
67 67                                                              else {
68 -                                                                 let $acc714031443 = countParties($acc614031443, $list14031443[6])
68 +                                                                 let $acc714221462 = countParties($acc614221462, $list14221462[6])
69 69                                                                  throw("List size exceed 6")
70 70                                                                  }
71 71                                                          }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let acceptedToken = base58'Gf9t8FA4H3ssoZPCwrg3KwUFCci8zuUFP9ssRsUY3s6a'
5 5  
6 6  let currentPrice = 250000000
7 7  
8 8  let bank = "3MzYLkQ6qCwtbxaYQ2yk1kdUudzbNg4JiTG"
9 9  
10 10  func isAdress (addr) = if ((size(addr) == 35))
11 11      then (take(addr, 2) == "3N")
12 12      else false
13 13  
14 14  
15 15  func countParties (accumulator,addr) = if (isAdress(addr))
16 16      then (accumulator + 1)
17 -     else throw(addr)
17 +     else (accumulator + 0)
18 18  
19 19  
20 20  func getValueString (json) = take(drop(json, 1), value(indexOf(drop(json, 1), "\"")))
21 21  
22 22  
23 23  func getValue (json,key) = {
24 24      let keyIndex = value(indexOf(json, (("\"" + key) + "\":")))
25 25      let data = drop(json, ((keyIndex + size(key)) + 3))
26 26      let jsonValue = getValueString(data)
27 27      jsonValue
28 28      }
29 29  
30 30  
31 31  @Callable(invoke)
32 32  func createAgreement (hash,title,addresses) = {
33 33      let payment = extract(invoke.payment)
34 34      let amount = extract(payment.amount)
35 35      let id = extract(invoke.transactionId)
36 36      let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
37 37      let totalAddresses = {
38 -         let $list14031443 = addressesArray
39 -         let $size14031443 = size($list14031443)
40 -         let $acc014031443 = 0
41 -         if (($size14031443 == 0))
42 -             then $acc014031443
38 +         let $list14221462 = addressesArray
39 +         let $size14221462 = size($list14221462)
40 +         let $acc014221462 = 0
41 +         if (($size14221462 == 0))
42 +             then $acc014221462
43 43              else {
44 -                 let $acc114031443 = countParties($acc014031443, $list14031443[0])
45 -                 if (($size14031443 == 1))
46 -                     then $acc114031443
44 +                 let $acc114221462 = countParties($acc014221462, $list14221462[0])
45 +                 if (($size14221462 == 1))
46 +                     then $acc114221462
47 47                      else {
48 -                         let $acc214031443 = countParties($acc114031443, $list14031443[1])
49 -                         if (($size14031443 == 2))
50 -                             then $acc214031443
48 +                         let $acc214221462 = countParties($acc114221462, $list14221462[1])
49 +                         if (($size14221462 == 2))
50 +                             then $acc214221462
51 51                              else {
52 -                                 let $acc314031443 = countParties($acc214031443, $list14031443[2])
53 -                                 if (($size14031443 == 3))
54 -                                     then $acc314031443
52 +                                 let $acc314221462 = countParties($acc214221462, $list14221462[2])
53 +                                 if (($size14221462 == 3))
54 +                                     then $acc314221462
55 55                                      else {
56 -                                         let $acc414031443 = countParties($acc314031443, $list14031443[3])
57 -                                         if (($size14031443 == 4))
58 -                                             then $acc414031443
56 +                                         let $acc414221462 = countParties($acc314221462, $list14221462[3])
57 +                                         if (($size14221462 == 4))
58 +                                             then $acc414221462
59 59                                              else {
60 -                                                 let $acc514031443 = countParties($acc414031443, $list14031443[4])
61 -                                                 if (($size14031443 == 5))
62 -                                                     then $acc514031443
60 +                                                 let $acc514221462 = countParties($acc414221462, $list14221462[4])
61 +                                                 if (($size14221462 == 5))
62 +                                                     then $acc514221462
63 63                                                      else {
64 -                                                         let $acc614031443 = countParties($acc514031443, $list14031443[5])
65 -                                                         if (($size14031443 == 6))
66 -                                                             then $acc614031443
64 +                                                         let $acc614221462 = countParties($acc514221462, $list14221462[5])
65 +                                                         if (($size14221462 == 6))
66 +                                                             then $acc614221462
67 67                                                              else {
68 -                                                                 let $acc714031443 = countParties($acc614031443, $list14031443[6])
68 +                                                                 let $acc714221462 = countParties($acc614221462, $list14221462[6])
69 69                                                                  throw("List size exceed 6")
70 70                                                                  }
71 71                                                          }
72 72                                                  }
73 73                                          }
74 74                                  }
75 75                          }
76 76                  }
77 77          }
78 78      let agreementDataObject = (((((((((((((((((("{id: '" + toBase58String(id)) + "', title: '") + title) + "' hash: '") + hash) + "', address1: '") + addressesArray[0]) + "', address2: '") + addressesArray[1]) + "', address3: '") + addressesArray[2]) + "', address4: '") + addressesArray[3]) + "', address5: '") + addressesArray[4]) + "', address6: '") + addressesArray[5]) + "'}")
79 79      let paymentAssetId = if (isDefined(payment.assetId))
80 80          then extract(payment.assetId)
81 81          else throw("Waves is not accepted as payment")
82 82      if ((paymentAssetId != acceptedToken))
83 83          then throw("Only payments in SIGN are allowed at the moment")
84 84          else if (((currentPrice * totalAddresses) > amount))
85 85              then throw(("The price is wrong, it should be " + toString((currentPrice * totalAddresses))))
86 86              else if ((totalAddresses == 6))
87 87                  then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), agreementDataObject), 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, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[5]), 0, acceptedToken)]))
88 88                  else if ((totalAddresses == 5))
89 89                      then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), agreementDataObject), 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, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, acceptedToken)]))
90 90                      else if ((totalAddresses == 4))
91 91                          then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), agreementDataObject), 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, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, acceptedToken)]))
92 92                          else if ((totalAddresses == 3))
93 93                              then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), agreementDataObject), 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, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, acceptedToken)]))
94 94                              else if ((totalAddresses == 2))
95 95                                  then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), agreementDataObject), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken)]))
96 96                                  else throw("Needs 2 to 6 parties addresses")
97 97      }
98 98  
99 99  
100 100  
101 101  @Callable(invoke)
102 102  func signAgreement (hash,agreementId) = {
103 103      let payment = extract(invoke.payment)
104 104      let amount = extract(payment.amount)
105 105      let id = extract(invoke.transactionId)
106 106      let signer = toBase58String(invoke.caller.bytes)
107 107      let signingRequestExist =     match getString(this, ((signer + "_MA_") + toBase58String(id))) {
108 108          case s: String => 
109 109              s
110 110          case _ => 
111 111              throw("There is no corresponding signing request")
112 112      }
113 113      let paymentAssetId = if (isDefined(payment.assetId))
114 114          then extract(payment.assetId)
115 115          else throw("Waves is not accepted as payment")
116 116      if ((paymentAssetId != acceptedToken))
117 117          then throw("Only payments in SIGN are allowed at the moment")
118 118          else if ((amount != currentPrice))
119 119              then throw("The price is wrong")
120 120              else ScriptResult(WriteSet([DataEntry(((signer + "_MA_") + toBase58String(id)), "SIGNED")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, acceptedToken)]))
121 121      }
122 122  
123 123

Old	New		Differences
14	14
15	15		func countParties (accumulator,addr) = if (isAdress(addr))
16	16		then (accumulator + 1)
17		-	else ~~throw~~(~~addr~~)
	17	+	else (accumulator + 0)
18	18
19	19
20	20		func getValueString (json) = take(drop(json, 1), value(indexOf(drop(json, 1), "\"")))

35	35		let id = extract(invoke.transactionId)
36	36		let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
37	37		let totalAddresses = {
38		-	let $~~list14031443~~ = addressesArray
39		-	let $~~size14031443~~ = size($~~list14031443~~)
40		-	let $~~acc014031443~~ = 0
41		-	if (($~~size14031443~~ == 0))
42		-	then $~~acc014031443~~
	38	+	let $list14221462 = addressesArray
	39	+	let $size14221462 = size($list14221462)
	40	+	let $acc014221462 = 0
	41	+	if (($size14221462 == 0))
	42	+	then $acc014221462
43	43		else {
44		-	let $~~acc114031443~~ = countParties($~~acc014031443~~, $~~list14031443~~[0])
45		-	if (($~~size14031443~~ == 1))
46		-	then $~~acc114031443~~
	44	+	let $acc114221462 = countParties($acc014221462, $list14221462[0])
	45	+	if (($size14221462 == 1))
	46	+	then $acc114221462
47	47		else {
48		-	let $~~acc214031443~~ = countParties($~~acc114031443~~, $~~list14031443~~[1])
49		-	if (($~~size14031443~~ == 2))
50		-	then $~~acc214031443~~
	48	+	let $acc214221462 = countParties($acc114221462, $list14221462[1])
	49	+	if (($size14221462 == 2))
	50	+	then $acc214221462
51	51		else {
52		-	let $~~acc314031443~~ = countParties($~~acc214031443~~, $~~list14031443~~[2])
53		-	if (($~~size14031443~~ == 3))
54		-	then $~~acc314031443~~
	52	+	let $acc314221462 = countParties($acc214221462, $list14221462[2])
	53	+	if (($size14221462 == 3))
	54	+	then $acc314221462
55	55		else {
56		-	let $~~acc414031443~~ = countParties($~~acc314031443~~, $~~list14031443~~[3])
57		-	if (($~~size14031443~~ == 4))
58		-	then $~~acc414031443~~
	56	+	let $acc414221462 = countParties($acc314221462, $list14221462[3])
	57	+	if (($size14221462 == 4))
	58	+	then $acc414221462
59	59		else {
60		-	let $~~acc514031443~~ = countParties($~~acc414031443~~, $~~list14031443~~[4])
61		-	if (($~~size14031443~~ == 5))
62		-	then $~~acc514031443~~
	60	+	let $acc514221462 = countParties($acc414221462, $list14221462[4])
	61	+	if (($size14221462 == 5))
	62	+	then $acc514221462
63	63		else {
64		-	let $~~acc614031443~~ = countParties($~~acc514031443~~, $~~list14031443~~[5])
65		-	if (($~~size14031443~~ == 6))
66		-	then $~~acc614031443~~
	64	+	let $acc614221462 = countParties($acc514221462, $list14221462[5])
	65	+	if (($size14221462 == 6))
	66	+	then $acc614221462
67	67		else {
68		-	let $~~acc714031443~~ = countParties($~~acc614031443~~, $~~list14031443~~[6])
	68	+	let $acc714221462 = countParties($acc614221462, $list14221462[6])
69	69		throw("List size exceed 6")
70	70		}
71	71		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let acceptedToken = base58'Gf9t8FA4H3ssoZPCwrg3KwUFCci8zuUFP9ssRsUY3s6a'
5	5
6	6		let currentPrice = 250000000
7	7
8	8		let bank = "3MzYLkQ6qCwtbxaYQ2yk1kdUudzbNg4JiTG"
9	9
10	10		func isAdress (addr) = if ((size(addr) == 35))
11	11		then (take(addr, 2) == "3N")
12	12		else false
13	13
14	14
15	15		func countParties (accumulator,addr) = if (isAdress(addr))
16	16		then (accumulator + 1)
17		-	else ~~throw~~(~~addr~~)
	17	+	else (accumulator + 0)
18	18
19	19
20	20		func getValueString (json) = take(drop(json, 1), value(indexOf(drop(json, 1), "\"")))
21	21
22	22
23	23		func getValue (json,key) = {
24	24		let keyIndex = value(indexOf(json, (("\"" + key) + "\":")))
25	25		let data = drop(json, ((keyIndex + size(key)) + 3))
26	26		let jsonValue = getValueString(data)
27	27		jsonValue
28	28		}
29	29
30	30
31	31		@Callable(invoke)
32	32		func createAgreement (hash,title,addresses) = {
33	33		let payment = extract(invoke.payment)
34	34		let amount = extract(payment.amount)
35	35		let id = extract(invoke.transactionId)
36	36		let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
37	37		let totalAddresses = {
38		-	let $~~list14031443~~ = addressesArray
39		-	let $~~size14031443~~ = size($~~list14031443~~)
40		-	let $~~acc014031443~~ = 0
41		-	if (($~~size14031443~~ == 0))
42		-	then $~~acc014031443~~
	38	+	let $list14221462 = addressesArray
	39	+	let $size14221462 = size($list14221462)
	40	+	let $acc014221462 = 0
	41	+	if (($size14221462 == 0))
	42	+	then $acc014221462
43	43		else {
44		-	let $~~acc114031443~~ = countParties($~~acc014031443~~, $~~list14031443~~[0])
45		-	if (($~~size14031443~~ == 1))
46		-	then $~~acc114031443~~
	44	+	let $acc114221462 = countParties($acc014221462, $list14221462[0])
	45	+	if (($size14221462 == 1))
	46	+	then $acc114221462
47	47		else {
48		-	let $~~acc214031443~~ = countParties($~~acc114031443~~, $~~list14031443~~[1])
49		-	if (($~~size14031443~~ == 2))
50		-	then $~~acc214031443~~
	48	+	let $acc214221462 = countParties($acc114221462, $list14221462[1])
	49	+	if (($size14221462 == 2))
	50	+	then $acc214221462
51	51		else {
52		-	let $~~acc314031443~~ = countParties($~~acc214031443~~, $~~list14031443~~[2])
53		-	if (($~~size14031443~~ == 3))
54		-	then $~~acc314031443~~
	52	+	let $acc314221462 = countParties($acc214221462, $list14221462[2])
	53	+	if (($size14221462 == 3))
	54	+	then $acc314221462
55	55		else {
56		-	let $~~acc414031443~~ = countParties($~~acc314031443~~, $~~list14031443~~[3])
57		-	if (($~~size14031443~~ == 4))
58		-	then $~~acc414031443~~
	56	+	let $acc414221462 = countParties($acc314221462, $list14221462[3])
	57	+	if (($size14221462 == 4))
	58	+	then $acc414221462
59	59		else {
60		-	let $~~acc514031443~~ = countParties($~~acc414031443~~, $~~list14031443~~[4])
61		-	if (($~~size14031443~~ == 5))
62		-	then $~~acc514031443~~
	60	+	let $acc514221462 = countParties($acc414221462, $list14221462[4])
	61	+	if (($size14221462 == 5))
	62	+	then $acc514221462
63	63		else {
64		-	let $~~acc614031443~~ = countParties($~~acc514031443~~, $~~list14031443~~[5])
65		-	if (($~~size14031443~~ == 6))
66		-	then $~~acc614031443~~
	64	+	let $acc614221462 = countParties($acc514221462, $list14221462[5])
	65	+	if (($size14221462 == 6))
	66	+	then $acc614221462
67	67		else {
68		-	let $~~acc714031443~~ = countParties($~~acc614031443~~, $~~list14031443~~[6])
	68	+	let $acc714221462 = countParties($acc614221462, $list14221462[6])
69	69		throw("List size exceed 6")
70	70		}
71	71		}
72	72		}
73	73		}
74	74		}
75	75		}
76	76		}
77	77		}
78	78		let agreementDataObject = (((((((((((((((((("{id: '" + toBase58String(id)) + "', title: '") + title) + "' hash: '") + hash) + "', address1: '") + addressesArray[0]) + "', address2: '") + addressesArray[1]) + "', address3: '") + addressesArray[2]) + "', address4: '") + addressesArray[3]) + "', address5: '") + addressesArray[4]) + "', address6: '") + addressesArray[5]) + "'}")
79	79		let paymentAssetId = if (isDefined(payment.assetId))
80	80		then extract(payment.assetId)
81	81		else throw("Waves is not accepted as payment")
82	82		if ((paymentAssetId != acceptedToken))
83	83		then throw("Only payments in SIGN are allowed at the moment")
84	84		else if (((currentPrice * totalAddresses) > amount))
85	85		then throw(("The price is wrong, it should be " + toString((currentPrice * totalAddresses))))
86	86		else if ((totalAddresses == 6))
87	87		then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), agreementDataObject), 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, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[5]), 0, acceptedToken)]))
88	88		else if ((totalAddresses == 5))
89	89		then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), agreementDataObject), 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, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[4]), 0, acceptedToken)]))
90	90		else if ((totalAddresses == 4))
91	91		then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), agreementDataObject), 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, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[3]), 0, acceptedToken)]))
92	92		else if ((totalAddresses == 3))
93	93		then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), agreementDataObject), 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, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, acceptedToken)]))
94	94		else if ((totalAddresses == 2))
95	95		then ScriptResult(WriteSet([DataEntry(("title_MA_" + toBase58String(id)), title), DataEntry(("hash_MA_" + toBase58String(id)), hash), DataEntry(("data_MA_" + toBase58String(id)), agreementDataObject), DataEntry(((addressesArray[0] + "_MA_") + toBase58String(id)), "PENDING"), DataEntry(((addressesArray[1] + "_MA_") + toBase58String(id)), "PENDING")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken)]))
96	96		else throw("Needs 2 to 6 parties addresses")
97	97		}
98	98
99	99
100	100
101	101		@Callable(invoke)
102	102		func signAgreement (hash,agreementId) = {
103	103		let payment = extract(invoke.payment)
104	104		let amount = extract(payment.amount)
105	105		let id = extract(invoke.transactionId)
106	106		let signer = toBase58String(invoke.caller.bytes)
107	107		let signingRequestExist = match getString(this, ((signer + "_MA_") + toBase58String(id))) {
108	108		case s: String =>
109	109		s
110	110		case _ =>
111	111		throw("There is no corresponding signing request")
112	112		}
113	113		let paymentAssetId = if (isDefined(payment.assetId))
114	114		then extract(payment.assetId)
115	115		else throw("Waves is not accepted as payment")
116	116		if ((paymentAssetId != acceptedToken))
117	117		then throw("Only payments in SIGN are allowed at the moment")
118	118		else if ((amount != currentPrice))
119	119		then throw("The price is wrong")
120	120		else ScriptResult(WriteSet([DataEntry(((signer + "_MA_") + toBase58String(id)), "SIGNED")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, acceptedToken)]))
121	121		}
122	122
123	123

github/deemru/w8io/169f3d6 
68.18 ms ◑