w8 · tx · BZK···izE

tx · BZKPs751HudaDGvm2tDsQk8KGgQnZrpGCySvm4C9dizE

3MrYoV4W5mu5ZP8rPspCXveMXusGstSPTjL:  -0.01400000 Waves

2020.01.31 11:34 [878283] smart account 3MrYoV4W5mu5ZP8rPspCXveMXusGstSPTjL > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BZKPs751HudaDGvm2tDsQk8KGgQnZrpGCySvm4C9dizE",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1580459711377,
    "version": 1,
    "sender": "3MrYoV4W5mu5ZP8rPspCXveMXusGstSPTjL",
    "senderPublicKey": "f1NbgbpkRpbigsrHaDkWZAkPgcqd8GM5G5eNmqnTD6z",
    "proofs": [
        "3MkXBZ42S4GNnSMPwPqjoK2sStFHLNLMcaGQc2Lj6yQVwUaUXAH2R4M9V1FBNosHBNb9Yg68rqnsbqw7fTgWudPp"
    ],
    "script": "base64:AAIDAAAAAAAAAA8IARIFCgMICAgSBAoCCAgAAAAGAAAAAA1hY2NlcHRlZFRva2VuAQAAACDopWq8yndC8nBhMjVKT0WDubke5ZlnF8Nx6tkLoQSt6wAAAAAMY3VycmVudFByaWNlAAAAAAAO5rKAAAAAAARiYW5rAgAAACMzTXpZTGtRNnFDd3RieGFZUTJ5azFrZFV1ZHpiTmc0SmlURwEAAAAIaXNBZHJlc3MAAAABAAAABGFkZHIDCQAAAAAAAAIJAAExAAAAAQUAAAAEYWRkcgAAAAAAAAAAIwkAAAAAAAACCQABLwAAAAIFAAAABGFkZHIAAAAAAAAAAAICAAAAAjNOBwEAAAAMY291bnRQYXJ0aWVzAAAAAgAAAAthY2N1bXVsYXRvcgAAAARhZGRyAwkBAAAACGlzQWRyZXNzAAAAAQUAAAAEYWRkcgkAAGQAAAACBQAAAAthY2N1bXVsYXRvcgAAAAAAAAAAAQkAAGQAAAACBQAAAAthY2N1bXVsYXRvcgAAAAAAAAAAAAEAAAAIZ2V0VmFsdWUAAAACAAAABGpzb24AAAADa2V5BAAAAAhrZXlJbmRleAkBAAAABXZhbHVlAAAAAQkABLMAAAACBQAAAARqc29uCQABLAAAAAIJAAEsAAAAAgIAAAABIgUAAAADa2V5AgAAAAIiOgQAAAAEZGF0YQkAATAAAAACBQAAAARqc29uCQAAZAAAAAIJAABkAAAAAgUAAAAIa2V5SW5kZXgJAAExAAAAAQUAAAADa2V5AAAAAAAAAAADBQAAAARkYXRhAAAAAgAAAAZpbnZva2UBAAAAD2NyZWF0ZUFncmVlbWVudAAAAAMAAAAEaGFzaAAAAAV0aXRsZQAAAAlhZGRyZXNzZXMEAAAAB3BheW1lbnQJAQAAAAdleHRyYWN0AAAAAQgFAAAABmludm9rZQAAAAdwYXltZW50BAAAAAZhbW91bnQJAQAAAAdleHRyYWN0AAAAAQgFAAAAB3BheW1lbnQAAAAGYW1vdW50BAAAAAJpZAkBAAAAB2V4dHJhY3QAAAABCAUAAAAGaW52b2tlAAAADXRyYW5zYWN0aW9uSWQEAAAADmFkZHJlc3Nlc0FycmF5CQAETAAAAAIJAQAAAAhnZXRWYWx1ZQAAAAIFAAAACWFkZHJlc3NlcwIAAAAIYWRkcmVzczEJAARMAAAAAgkBAAAACGdldFZhbHVlAAAAAgUAAAAJYWRkcmVzc2VzAgAAAAhhZGRyZXNzMgkABEwAAAACCQEAAAAIZ2V0VmFsdWUAAAACBQAAAAlhZGRyZXNzZXMCAAAACGFkZHJlc3MzCQAETAAAAAIJAQAAAAhnZXRWYWx1ZQAAAAIFAAAACWFkZHJlc3NlcwIAAAAIYWRkcmVzczQJAARMAAAAAgkBAAAACGdldFZhbHVlAAAAAgUAAAAJYWRkcmVzc2VzAgAAAAhhZGRyZXNzNQkABEwAAAACCQEAAAAIZ2V0VmFsdWUAAAACBQAAAAlhZGRyZXNzZXMCAAAACGFkZHJlc3M2BQAAAANuaWwEAAAADnRvdGFsQWRkcmVzc2VzBAAAAA0kbGlzdDExNDkxMTg5BQAAAA5hZGRyZXNzZXNBcnJheQQAAAANJHNpemUxMTQ5MTE4OQkAAZAAAAABBQAAAA0kbGlzdDExNDkxMTg5BAAAAA0kYWNjMDExNDkxMTg5AAAAAAAAAAAAAwkAAAAAAAACBQAAAA0kc2l6ZTExNDkxMTg5AAAAAAAAAAAABQAAAA0kYWNjMDExNDkxMTg5BAAAAA0kYWNjMTExNDkxMTg5CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzAxMTQ5MTE4OQkAAZEAAAACBQAAAA0kbGlzdDExNDkxMTg5AAAAAAAAAAAAAwkAAAAAAAACBQAAAA0kc2l6ZTExNDkxMTg5AAAAAAAAAAABBQAAAA0kYWNjMTExNDkxMTg5BAAAAA0kYWNjMjExNDkxMTg5CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzExMTQ5MTE4OQkAAZEAAAACBQAAAA0kbGlzdDExNDkxMTg5AAAAAAAAAAABAwkAAAAAAAACBQAAAA0kc2l6ZTExNDkxMTg5AAAAAAAAAAACBQAAAA0kYWNjMjExNDkxMTg5BAAAAA0kYWNjMzExNDkxMTg5CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzIxMTQ5MTE4OQkAAZEAAAACBQAAAA0kbGlzdDExNDkxMTg5AAAAAAAAAAACAwkAAAAAAAACBQAAAA0kc2l6ZTExNDkxMTg5AAAAAAAAAAADBQAAAA0kYWNjMzExNDkxMTg5BAAAAA0kYWNjNDExNDkxMTg5CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzMxMTQ5MTE4OQkAAZEAAAACBQAAAA0kbGlzdDExNDkxMTg5AAAAAAAAAAADAwkAAAAAAAACBQAAAA0kc2l6ZTExNDkxMTg5AAAAAAAAAAAEBQAAAA0kYWNjNDExNDkxMTg5BAAAAA0kYWNjNTExNDkxMTg5CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzQxMTQ5MTE4OQkAAZEAAAACBQAAAA0kbGlzdDExNDkxMTg5AAAAAAAAAAAEAwkAAAAAAAACBQAAAA0kc2l6ZTExNDkxMTg5AAAAAAAAAAAFBQAAAA0kYWNjNTExNDkxMTg5BAAAAA0kYWNjNjExNDkxMTg5CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzUxMTQ5MTE4OQkAAZEAAAACBQAAAA0kbGlzdDExNDkxMTg5AAAAAAAAAAAFAwkAAAAAAAACBQAAAA0kc2l6ZTExNDkxMTg5AAAAAAAAAAAGBQAAAA0kYWNjNjExNDkxMTg5BAAAAA0kYWNjNzExNDkxMTg5CQEAAAAMY291bnRQYXJ0aWVzAAAAAgUAAAANJGFjYzYxMTQ5MTE4OQkAAZEAAAACBQAAAA0kbGlzdDExNDkxMTg5AAAAAAAAAAAGCQAAAgAAAAECAAAAEkxpc3Qgc2l6ZSBleGNlZWQgNgQAAAATYWdyZWVtZW50RGF0YU9iamVjdAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAGe2lkOiAnCQACWAAAAAEFAAAAAmlkAgAAAAsnLCB0aXRsZTogJwUAAAAFdGl0bGUCAAAACScgaGFzaDogJwUAAAAEaGFzaAIAAAAOJywgYWRkcmVzczE6ICcJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAACAAAADicsIGFkZHJlc3MyOiAnCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAABAgAAAA4nLCBhZGRyZXNzMzogJwkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAgIAAAAOJywgYWRkcmVzczQ6ICcJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAMCAAAADicsIGFkZHJlc3M1OiAnCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAEAgAAAA4nLCBhZGRyZXNzNjogJwkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABQIAAAACJ30EAAAADnBheW1lbnRBc3NldElkAwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQJAQAAAAdleHRyYWN0AAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkAAAIAAAABAgAAACBXYXZlcyBpcyBub3QgYWNjZXB0ZWQgYXMgcGF5bWVudAMJAQAAAAIhPQAAAAIFAAAADnBheW1lbnRBc3NldElkBQAAAA1hY2NlcHRlZFRva2VuCQAAAgAAAAECAAAAL09ubHkgcGF5bWVudHMgaW4gU0lHTiBhcmUgYWxsb3dlZCBhdCB0aGUgbW9tZW50AwkAAGYAAAACCQAAaAAAAAIFAAAADGN1cnJlbnRQcmljZQUAAAAOdG90YWxBZGRyZXNzZXMFAAAABmFtb3VudAkAAAIAAAABCQABLAAAAAICAAAAIVRoZSBwcmljZSBpcyB3cm9uZywgaXQgc2hvdWxkIGJlIAkAAaQAAAABCQAAaAAAAAIFAAAADGN1cnJlbnRQcmljZQUAAAAOdG90YWxBZGRyZXNzZXMDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAAGCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAl0aXRsZV9NQV8JAAJYAAAAAQUAAAACaWQFAAAABXRpdGxlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGhhc2hfTUFfCQACWAAAAAEFAAAAAmlkBQAAAARoYXNoCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGRhdGFfTUFfCQACWAAAAAEFAAAAAmlkBQAAABNhZ3JlZW1lbnREYXRhT2JqZWN0CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAQCAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAFAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAIAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABAAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAUAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4FAAAAA25pbAMJAAAAAAAAAgUAAAAOdG90YWxBZGRyZXNzZXMAAAAAAAAAAAUJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACXRpdGxlX01BXwkAAlgAAAABBQAAAAJpZAUAAAAFdGl0bGUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIaGFzaF9NQV8JAAJYAAAAAQUAAAACaWQFAAAABGhhc2gJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIZGF0YV9NQV8JAAJYAAAAAQUAAAACaWQFAAAAE2FncmVlbWVudERhdGFPYmplY3QJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAABAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAEAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAwAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAQAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4FAAAAA25pbAMJAAAAAAAAAgUAAAAOdG90YWxBZGRyZXNzZXMAAAAAAAAAAAQJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACXRpdGxlX01BXwkAAlgAAAABBQAAAAJpZAUAAAAFdGl0bGUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIaGFzaF9NQV8JAAJYAAAAAQUAAAACaWQFAAAABGhhc2gJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIZGF0YV9NQV8JAAJYAAAAAQUAAAACaWQFAAAAE2FncmVlbWVudERhdGFPYmplY3QJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAIAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAADAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuBQAAAANuaWwDCQAAAAAAAAIFAAAADnRvdGFsQWRkcmVzc2VzAAAAAAAAAAADCQEAAAAMU2NyaXB0UmVzdWx0AAAAAgkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAAl0aXRsZV9NQV8JAAJYAAAAAQUAAAACaWQFAAAABXRpdGxlCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGhhc2hfTUFfCQACWAAAAAEFAAAAAmlkBQAAAARoYXNoCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACGRhdGFfTUFfCQACWAAAAAEFAAAAAmlkBQAAABNhZ3JlZW1lbnREYXRhT2JqZWN0CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAECAAAABF9NQV8JAAJYAAAAAQUAAAACaWQCAAAAB1BFTkRJTkcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAACAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAARiYW5rBQAAAAZhbW91bnQFAAAADWFjY2VwdGVkVG9rZW4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAAAAAAAAAAAABQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAIAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4FAAAAA25pbAMJAAAAAAAAAgUAAAAOdG90YWxBZGRyZXNzZXMAAAAAAAAAAAIJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAACXRpdGxlX01BXwkAAlgAAAABBQAAAAJpZAUAAAAFdGl0bGUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIaGFzaF9NQV8JAAJYAAAAAQUAAAACaWQFAAAABGhhc2gJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgIAAAAIZGF0YV9NQV8JAAJYAAAAAQUAAAACaWQFAAAAE2FncmVlbWVudERhdGFPYmplY3QJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABkQAAAAIFAAAADmFkZHJlc3Nlc0FycmF5AAAAAAAAAAAAAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAdQRU5ESU5HCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAQIAAAAEX01BXwkAAlgAAAABBQAAAAJpZAIAAAAHUEVORElORwUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQUAAAAEYmFuawUAAAAGYW1vdW50BQAAAA1hY2NlcHRlZFRva2VuCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABxAZXh0clVzZXIoYWRkcmVzc0Zyb21TdHJpbmcpAAAAAQkAAZEAAAACBQAAAA5hZGRyZXNzZXNBcnJheQAAAAAAAAAAAAAAAAAAAAAAAAUAAAANYWNjZXB0ZWRUb2tlbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEJAAGRAAAAAgUAAAAOYWRkcmVzc2VzQXJyYXkAAAAAAAAAAAEAAAAAAAAAAAAFAAAADWFjY2VwdGVkVG9rZW4FAAAAA25pbAkAAAIAAAABAgAAAB5OZWVkcyAyIHRvIDYgcGFydGllcyBhZGRyZXNzZXMAAAAGaW52b2tlAQAAAA1zaWduQWdyZWVtZW50AAAAAgAAAARoYXNoAAAAC2FncmVlbWVudElkBAAAAAdwYXltZW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAZpbnZva2UAAAAHcGF5bWVudAQAAAAGYW1vdW50CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAQAAAACaWQJAQAAAAdleHRyYWN0AAAAAQgFAAAABmludm9rZQAAAA10cmFuc2FjdGlvbklkBAAAAAZzaWduZXIJAAJYAAAAAQgIBQAAAAZpbnZva2UAAAAGY2FsbGVyAAAABWJ5dGVzBAAAABNzaWduaW5nUmVxdWVzdEV4aXN0BAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACBQAAAAZzaWduZXICAAAABF9NQV8JAAJYAAAAAQUAAAACaWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABcwUAAAAHJG1hdGNoMAUAAAABcwkAAAIAAAABAgAAAClUaGVyZSBpcyBubyBjb3JyZXNwb25kaW5nIHNpZ25pbmcgcmVxdWVzdAQAAAAOcGF5bWVudEFzc2V0SWQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkBAAAAB2V4dHJhY3QAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQAAAgAAAAECAAAAIFdhdmVzIGlzIG5vdCBhY2NlcHRlZCBhcyBwYXltZW50AwkBAAAAAiE9AAAAAgUAAAAOcGF5bWVudEFzc2V0SWQFAAAADWFjY2VwdGVkVG9rZW4JAAACAAAAAQIAAAAvT25seSBwYXltZW50cyBpbiBTSUdOIGFyZSBhbGxvd2VkIGF0IHRoZSBtb21lbnQDCQEAAAACIT0AAAACBQAAAAZhbW91bnQFAAAADGN1cnJlbnRQcmljZQkAAAIAAAABAgAAABJUaGUgcHJpY2UgaXMgd3JvbmcJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAGc2lnbmVyAgAAAARfTUFfCQACWAAAAAEFAAAAAmlkAgAAAAZTSUdORUQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAcQGV4dHJVc2VyKGFkZHJlc3NGcm9tU3RyaW5nKQAAAAEFAAAABGJhbmsFAAAABmFtb3VudAUAAAANYWNjZXB0ZWRUb2tlbgUAAAADbmlsAAAAACccqTE=",
    "chainId": 84,
    "height": 878283,
    "spentComplexity": 0
}

View: original | compacted
Prev: Ev6hgabguv79trndXe9YP7vkRTqLjc6NWUSPXFLfxub7
Next: 8bj9Kt8uaZYTmSgJyosjUVqsSmxSC2LSUc2TVDiEBn7A

Diff: 
Old New Differences
17 17      else (accumulator + 0)
18 18  
19 19  
20 + func getValue (json,key) = {
21 +     let keyIndex = value(indexOf(json, (("\"" + key) + "\":")))
22 +     let data = drop(json, ((keyIndex + size(key)) + 3))
23 +     data
24 +     }
25 + 
26 + 
20 27  @Callable(invoke)
21 28  func createAgreement (hash,title,addresses) = {
22 29      let payment = extract(invoke.payment)
23 30      let amount = extract(payment.amount)
24 31      let id = extract(invoke.transactionId)
25 -     let addressesArray = split(addresses, "|")
32 +     let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
26 33      let totalAddresses = {
27 -         let $list789829 = addressesArray
28 -         let $size789829 = size($list789829)
29 -         let $acc0789829 = 0
30 -         if (($size789829 == 0))
31 -             then $acc0789829
34 +         let $list11491189 = addressesArray
35 +         let $size11491189 = size($list11491189)
36 +         let $acc011491189 = 0
37 +         if (($size11491189 == 0))
38 +             then $acc011491189
32 39              else {
33 -                 let $acc1789829 = countParties($acc0789829, $list789829[0])
34 -                 if (($size789829 == 1))
35 -                     then $acc1789829
40 +                 let $acc111491189 = countParties($acc011491189, $list11491189[0])
41 +                 if (($size11491189 == 1))
42 +                     then $acc111491189
36 43                      else {
37 -                         let $acc2789829 = countParties($acc1789829, $list789829[1])
38 -                         if (($size789829 == 2))
39 -                             then $acc2789829
44 +                         let $acc211491189 = countParties($acc111491189, $list11491189[1])
45 +                         if (($size11491189 == 2))
46 +                             then $acc211491189
40 47                              else {
41 -                                 let $acc3789829 = countParties($acc2789829, $list789829[2])
42 -                                 if (($size789829 == 3))
43 -                                     then $acc3789829
48 +                                 let $acc311491189 = countParties($acc211491189, $list11491189[2])
49 +                                 if (($size11491189 == 3))
50 +                                     then $acc311491189
44 51                                      else {
45 -                                         let $acc4789829 = countParties($acc3789829, $list789829[3])
46 -                                         if (($size789829 == 4))
47 -                                             then $acc4789829
52 +                                         let $acc411491189 = countParties($acc311491189, $list11491189[3])
53 +                                         if (($size11491189 == 4))
54 +                                             then $acc411491189
48 55                                              else {
49 -                                                 let $acc5789829 = countParties($acc4789829, $list789829[4])
50 -                                                 if (($size789829 == 5))
51 -                                                     then $acc5789829
56 +                                                 let $acc511491189 = countParties($acc411491189, $list11491189[4])
57 +                                                 if (($size11491189 == 5))
58 +                                                     then $acc511491189
52 59                                                      else {
53 -                                                         let $acc6789829 = countParties($acc5789829, $list789829[5])
54 -                                                         if (($size789829 == 6))
55 -                                                             then $acc6789829
60 +                                                         let $acc611491189 = countParties($acc511491189, $list11491189[5])
61 +                                                         if (($size11491189 == 6))
62 +                                                             then $acc611491189
56 63                                                              else {
57 -                                                                 let $acc7789829 = countParties($acc6789829, $list789829[6])
64 +                                                                 let $acc711491189 = countParties($acc611491189, $list11491189[6])
58 65                                                                  throw("List size exceed 6")
59 66                                                                  }
60 67                                                          }
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 17      else (accumulator + 0)
18 18  
19 19  
20 + func getValue (json,key) = {
21 +     let keyIndex = value(indexOf(json, (("\"" + key) + "\":")))
22 +     let data = drop(json, ((keyIndex + size(key)) + 3))
23 +     data
24 +     }
25 + 
26 + 
20 27  @Callable(invoke)
21 28  func createAgreement (hash,title,addresses) = {
22 29      let payment = extract(invoke.payment)
23 30      let amount = extract(payment.amount)
24 31      let id = extract(invoke.transactionId)
25 -     let addressesArray = split(addresses, "|")
32 +     let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
26 33      let totalAddresses = {
27 -         let $list789829 = addressesArray
28 -         let $size789829 = size($list789829)
29 -         let $acc0789829 = 0
30 -         if (($size789829 == 0))
31 -             then $acc0789829
34 +         let $list11491189 = addressesArray
35 +         let $size11491189 = size($list11491189)
36 +         let $acc011491189 = 0
37 +         if (($size11491189 == 0))
38 +             then $acc011491189
32 39              else {
33 -                 let $acc1789829 = countParties($acc0789829, $list789829[0])
34 -                 if (($size789829 == 1))
35 -                     then $acc1789829
40 +                 let $acc111491189 = countParties($acc011491189, $list11491189[0])
41 +                 if (($size11491189 == 1))
42 +                     then $acc111491189
36 43                      else {
37 -                         let $acc2789829 = countParties($acc1789829, $list789829[1])
38 -                         if (($size789829 == 2))
39 -                             then $acc2789829
44 +                         let $acc211491189 = countParties($acc111491189, $list11491189[1])
45 +                         if (($size11491189 == 2))
46 +                             then $acc211491189
40 47                              else {
41 -                                 let $acc3789829 = countParties($acc2789829, $list789829[2])
42 -                                 if (($size789829 == 3))
43 -                                     then $acc3789829
48 +                                 let $acc311491189 = countParties($acc211491189, $list11491189[2])
49 +                                 if (($size11491189 == 3))
50 +                                     then $acc311491189
44 51                                      else {
45 -                                         let $acc4789829 = countParties($acc3789829, $list789829[3])
46 -                                         if (($size789829 == 4))
47 -                                             then $acc4789829
52 +                                         let $acc411491189 = countParties($acc311491189, $list11491189[3])
53 +                                         if (($size11491189 == 4))
54 +                                             then $acc411491189
48 55                                              else {
49 -                                                 let $acc5789829 = countParties($acc4789829, $list789829[4])
50 -                                                 if (($size789829 == 5))
51 -                                                     then $acc5789829
56 +                                                 let $acc511491189 = countParties($acc411491189, $list11491189[4])
57 +                                                 if (($size11491189 == 5))
58 +                                                     then $acc511491189
52 59                                                      else {
53 -                                                         let $acc6789829 = countParties($acc5789829, $list789829[5])
54 -                                                         if (($size789829 == 6))
55 -                                                             then $acc6789829
60 +                                                         let $acc611491189 = countParties($acc511491189, $list11491189[5])
61 +                                                         if (($size11491189 == 6))
62 +                                                             then $acc611491189
56 63                                                              else {
57 -                                                                 let $acc7789829 = countParties($acc6789829, $list789829[6])
64 +                                                                 let $acc711491189 = countParties($acc611491189, $list11491189[6])
58 65                                                                  throw("List size exceed 6")
59 66                                                                  }
60 67                                                          }
61 68                                                  }
62 69                                          }
63 70                                  }
64 71                          }
65 72                  }
66 73          }
67 74      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]) + "'}")
68 75      let paymentAssetId = if (isDefined(payment.assetId))
69 76          then extract(payment.assetId)
70 77          else throw("Waves is not accepted as payment")
71 78      if ((paymentAssetId != acceptedToken))
72 79          then throw("Only payments in SIGN are allowed at the moment")
73 80          else if (((currentPrice * totalAddresses) > amount))
74 81              then throw(("The price is wrong, it should be " + toString((currentPrice * totalAddresses))))
75 82              else if ((totalAddresses == 6))
76 83                  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)]))
77 84                  else if ((totalAddresses == 5))
78 85                      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)]))
79 86                      else if ((totalAddresses == 4))
80 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")]), 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)]))
81 88                          else if ((totalAddresses == 3))
82 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")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, acceptedToken)]))
83 90                              else if ((totalAddresses == 2))
84 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")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken)]))
85 92                                  else throw("Needs 2 to 6 parties addresses")
86 93      }
87 94  
88 95  
89 96  
90 97  @Callable(invoke)
91 98  func signAgreement (hash,agreementId) = {
92 99      let payment = extract(invoke.payment)
93 100      let amount = extract(payment.amount)
94 101      let id = extract(invoke.transactionId)
95 102      let signer = toBase58String(invoke.caller.bytes)
96 103      let signingRequestExist =     match getString(this, ((signer + "_MA_") + toBase58String(id))) {
97 104          case s: String => 
98 105              s
99 106          case _ => 
100 107              throw("There is no corresponding signing request")
101 108      }
102 109      let paymentAssetId = if (isDefined(payment.assetId))
103 110          then extract(payment.assetId)
104 111          else throw("Waves is not accepted as payment")
105 112      if ((paymentAssetId != acceptedToken))
106 113          then throw("Only payments in SIGN are allowed at the moment")
107 114          else if ((amount != currentPrice))
108 115              then throw("The price is wrong")
109 116              else ScriptResult(WriteSet([DataEntry(((signer + "_MA_") + toBase58String(id)), "SIGNED")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, acceptedToken)]))
110 117      }
111 118  
112 119

Old	New		Differences
17	17		else (accumulator + 0)
18	18
19	19
	20	+	func getValue (json,key) = {
	21	+	let keyIndex = value(indexOf(json, (("\"" + key) + "\":")))
	22	+	let data = drop(json, ((keyIndex + size(key)) + 3))
	23	+	data
	24	+	}
	25	+
	26	+
20	27		@Callable(invoke)
21	28		func createAgreement (hash,title,addresses) = {
22	29		let payment = extract(invoke.payment)
23	30		let amount = extract(payment.amount)
24	31		let id = extract(invoke.transactionId)
25		-	let addressesArray = ~~split~~(addresses, "\|")
	32	+	let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
26	33		let totalAddresses = {
27		-	let $~~list789829~~ = addressesArray
28		-	let $~~size789829~~ = size($~~list789829~~)
29		-	let $~~acc0789829~~ = 0
30		-	if (($~~size789829~~ == 0))
31		-	then $~~acc0789829~~
	34	+	let $list11491189 = addressesArray
	35	+	let $size11491189 = size($list11491189)
	36	+	let $acc011491189 = 0
	37	+	if (($size11491189 == 0))
	38	+	then $acc011491189
32	39		else {
33		-	let $~~acc1789829~~ = countParties($~~acc0789829~~, $~~list789829~~[0])
34		-	if (($~~size789829~~ == 1))
35		-	then $~~acc1789829~~
	40	+	let $acc111491189 = countParties($acc011491189, $list11491189[0])
	41	+	if (($size11491189 == 1))
	42	+	then $acc111491189
36	43		else {
37		-	let $~~acc2789829~~ = countParties($~~acc1789829~~, $~~list789829~~[1])
38		-	if (($~~size789829~~ == 2))
39		-	then $~~acc2789829~~
	44	+	let $acc211491189 = countParties($acc111491189, $list11491189[1])
	45	+	if (($size11491189 == 2))
	46	+	then $acc211491189
40	47		else {
41		-	let $~~acc3789829~~ = countParties($~~acc2789829~~, $~~list789829~~[2])
42		-	if (($~~size789829~~ == 3))
43		-	then $~~acc3789829~~
	48	+	let $acc311491189 = countParties($acc211491189, $list11491189[2])
	49	+	if (($size11491189 == 3))
	50	+	then $acc311491189
44	51		else {
45		-	let $~~acc4789829~~ = countParties($~~acc3789829~~, $~~list789829~~[3])
46		-	if (($~~size789829~~ == 4))
47		-	then $~~acc4789829~~
	52	+	let $acc411491189 = countParties($acc311491189, $list11491189[3])
	53	+	if (($size11491189 == 4))
	54	+	then $acc411491189
48	55		else {
49		-	let $~~acc5789829~~ = countParties($~~acc4789829~~, $~~list789829~~[4])
50		-	if (($~~size789829~~ == 5))
51		-	then $~~acc5789829~~
	56	+	let $acc511491189 = countParties($acc411491189, $list11491189[4])
	57	+	if (($size11491189 == 5))
	58	+	then $acc511491189
52	59		else {
53		-	let $~~acc6789829~~ = countParties($~~acc5789829~~, $~~list789829~~[5])
54		-	if (($~~size789829~~ == 6))
55		-	then $~~acc6789829~~
	60	+	let $acc611491189 = countParties($acc511491189, $list11491189[5])
	61	+	if (($size11491189 == 6))
	62	+	then $acc611491189
56	63		else {
57		-	let $~~acc7789829~~ = countParties($~~acc6789829~~, $~~list789829~~[6])
	64	+	let $acc711491189 = countParties($acc611491189, $list11491189[6])
58	65		throw("List size exceed 6")
59	66		}
60	67		}

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	17		else (accumulator + 0)
18	18
19	19
	20	+	func getValue (json,key) = {
	21	+	let keyIndex = value(indexOf(json, (("\"" + key) + "\":")))
	22	+	let data = drop(json, ((keyIndex + size(key)) + 3))
	23	+	data
	24	+	}
	25	+
	26	+
20	27		@Callable(invoke)
21	28		func createAgreement (hash,title,addresses) = {
22	29		let payment = extract(invoke.payment)
23	30		let amount = extract(payment.amount)
24	31		let id = extract(invoke.transactionId)
25		-	let addressesArray = ~~split~~(addresses, "\|")
	32	+	let addressesArray = [getValue(addresses, "address1"), getValue(addresses, "address2"), getValue(addresses, "address3"), getValue(addresses, "address4"), getValue(addresses, "address5"), getValue(addresses, "address6")]
26	33		let totalAddresses = {
27		-	let $~~list789829~~ = addressesArray
28		-	let $~~size789829~~ = size($~~list789829~~)
29		-	let $~~acc0789829~~ = 0
30		-	if (($~~size789829~~ == 0))
31		-	then $~~acc0789829~~
	34	+	let $list11491189 = addressesArray
	35	+	let $size11491189 = size($list11491189)
	36	+	let $acc011491189 = 0
	37	+	if (($size11491189 == 0))
	38	+	then $acc011491189
32	39		else {
33		-	let $~~acc1789829~~ = countParties($~~acc0789829~~, $~~list789829~~[0])
34		-	if (($~~size789829~~ == 1))
35		-	then $~~acc1789829~~
	40	+	let $acc111491189 = countParties($acc011491189, $list11491189[0])
	41	+	if (($size11491189 == 1))
	42	+	then $acc111491189
36	43		else {
37		-	let $~~acc2789829~~ = countParties($~~acc1789829~~, $~~list789829~~[1])
38		-	if (($~~size789829~~ == 2))
39		-	then $~~acc2789829~~
	44	+	let $acc211491189 = countParties($acc111491189, $list11491189[1])
	45	+	if (($size11491189 == 2))
	46	+	then $acc211491189
40	47		else {
41		-	let $~~acc3789829~~ = countParties($~~acc2789829~~, $~~list789829~~[2])
42		-	if (($~~size789829~~ == 3))
43		-	then $~~acc3789829~~
	48	+	let $acc311491189 = countParties($acc211491189, $list11491189[2])
	49	+	if (($size11491189 == 3))
	50	+	then $acc311491189
44	51		else {
45		-	let $~~acc4789829~~ = countParties($~~acc3789829~~, $~~list789829~~[3])
46		-	if (($~~size789829~~ == 4))
47		-	then $~~acc4789829~~
	52	+	let $acc411491189 = countParties($acc311491189, $list11491189[3])
	53	+	if (($size11491189 == 4))
	54	+	then $acc411491189
48	55		else {
49		-	let $~~acc5789829~~ = countParties($~~acc4789829~~, $~~list789829~~[4])
50		-	if (($~~size789829~~ == 5))
51		-	then $~~acc5789829~~
	56	+	let $acc511491189 = countParties($acc411491189, $list11491189[4])
	57	+	if (($size11491189 == 5))
	58	+	then $acc511491189
52	59		else {
53		-	let $~~acc6789829~~ = countParties($~~acc5789829~~, $~~list789829~~[5])
54		-	if (($~~size789829~~ == 6))
55		-	then $~~acc6789829~~
	60	+	let $acc611491189 = countParties($acc511491189, $list11491189[5])
	61	+	if (($size11491189 == 6))
	62	+	then $acc611491189
56	63		else {
57		-	let $~~acc7789829~~ = countParties($~~acc6789829~~, $~~list789829~~[6])
	64	+	let $acc711491189 = countParties($acc611491189, $list11491189[6])
58	65		throw("List size exceed 6")
59	66		}
60	67		}
61	68		}
62	69		}
63	70		}
64	71		}
65	72		}
66	73		}
67	74		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]) + "'}")
68	75		let paymentAssetId = if (isDefined(payment.assetId))
69	76		then extract(payment.assetId)
70	77		else throw("Waves is not accepted as payment")
71	78		if ((paymentAssetId != acceptedToken))
72	79		then throw("Only payments in SIGN are allowed at the moment")
73	80		else if (((currentPrice * totalAddresses) > amount))
74	81		then throw(("The price is wrong, it should be " + toString((currentPrice * totalAddresses))))
75	82		else if ((totalAddresses == 6))
76	83		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)]))
77	84		else if ((totalAddresses == 5))
78	85		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)]))
79	86		else if ((totalAddresses == 4))
80	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")]), 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)]))
81	88		else if ((totalAddresses == 3))
82	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")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[2]), 0, acceptedToken)]))
83	90		else if ((totalAddresses == 2))
84	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")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[0]), 0, acceptedToken), ScriptTransfer(addressFromStringValue(addressesArray[1]), 0, acceptedToken)]))
85	92		else throw("Needs 2 to 6 parties addresses")
86	93		}
87	94
88	95
89	96
90	97		@Callable(invoke)
91	98		func signAgreement (hash,agreementId) = {
92	99		let payment = extract(invoke.payment)
93	100		let amount = extract(payment.amount)
94	101		let id = extract(invoke.transactionId)
95	102		let signer = toBase58String(invoke.caller.bytes)
96	103		let signingRequestExist = match getString(this, ((signer + "_MA_") + toBase58String(id))) {
97	104		case s: String =>
98	105		s
99	106		case _ =>
100	107		throw("There is no corresponding signing request")
101	108		}
102	109		let paymentAssetId = if (isDefined(payment.assetId))
103	110		then extract(payment.assetId)
104	111		else throw("Waves is not accepted as payment")
105	112		if ((paymentAssetId != acceptedToken))
106	113		then throw("Only payments in SIGN are allowed at the moment")
107	114		else if ((amount != currentPrice))
108	115		then throw("The price is wrong")
109	116		else ScriptResult(WriteSet([DataEntry(((signer + "_MA_") + toBase58String(id)), "SIGNED")]), TransferSet([ScriptTransfer(addressFromStringValue(bank), amount, acceptedToken)]))
110	117		}
111	118
112	119

github/deemru/w8io/c3f4982 
82.12 ms ◑