tx · BPzqg7Lsc8uUVpH6ZuUfDMnQ1Efz6h71pcgQdYDnBzBi

3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7:  -0.01000000 Waves

2023.03.15 21:12 [2491485] smart account 3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BPzqg7Lsc8uUVpH6ZuUfDMnQ1Efz6h71pcgQdYDnBzBi",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1678903942812,
    "version": 2,
    "chainId": 84,
    "sender": "3MrGaZVRhknEGfHJ19ttUPNnDRoFqcHhVN7",
    "senderPublicKey": "CrHxACS7bWTh8cgmgqstvybmgMqR9KtDryGFt5svZhBW",
    "proofs": [
        "3WnVgVxcX3DsFSNGoLL2GrVLmUM4Mp4SLiqtTqV7KXkJp9cNtVSpEbmnHMNo78iy31uiYuNsprpgwt1LqiD5SToJ"
    ],
    "script": "base64:BgIhCAISBwoFGBgBAQgSBAoCGBgSBAoCGBgSAwoBCBIDCgEIFQAIa0pzb25SZXMCB2pzb25SZXMABXF1b3RlCQCwCQEBASIBCW1ha2VGaWVsZAEJbmV4dFZhbHVlCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBXF1b3RlCAUJbmV4dFZhbHVlAl8xBQVxdW90ZQIBOgUFcXVvdGUIBQluZXh0VmFsdWUCXzIFBXF1b3RlAgEsAQ9yZWR1Y2VyTWFrZUpTT04CBWFjY3VtCW5leHRWYWx1ZQkArAICBQVhY2N1bQkBCW1ha2VGaWVsZAEFCW5leHRWYWx1ZQEPaXRlcmF0ZU1ha2VKU09OAwZwYXJhbXMDcmVzBmxlbmd0aAMJAAACBQZsZW5ndGgAAAkAAgECDUVtcHR5ICBwYXJhbXMDCQAAAgUGbGVuZ3RoAAEKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDcmVzCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ9yZWR1Y2VyTWFrZUpTT04CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDEJAQUkZjBfMgIJAQUkZjBfMQIFBSRhY2MwAAAAAQMJAAACBQZsZW5ndGgAAgoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNyZXMKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBD3JlZHVjZXJNYWtlSlNPTgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIDCQAAAgUGbGVuZ3RoAAMKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDcmVzCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ9yZWR1Y2VyTWFrZUpTT04CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDMJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMDCQAAAgUGbGVuZ3RoAAQKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDcmVzCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ9yZWR1Y2VyTWFrZUpTT04CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDQJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAMJAAACBQZsZW5ndGgABQoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNyZXMKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBD3JlZHVjZXJNYWtlSlNPTgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUDCQAAAgUGbGVuZ3RoAAYKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDcmVzCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ9yZWR1Y2VyTWFrZUpTT04CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYDCQAAAgUGbGVuZ3RoAAcKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDcmVzCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ9yZWR1Y2VyTWFrZUpTT04CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDcJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwMJAAACBQZsZW5ndGgACAoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNyZXMKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBD3JlZHVjZXJNYWtlSlNPTgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgDCQAAAgUGbGVuZ3RoAAkKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDcmVzCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ9yZWR1Y2VyTWFrZUpTT04CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDkJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkDCQAAAgUGbGVuZ3RoAAoKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDcmVzCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ9yZWR1Y2VyTWFrZUpTT04CBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoJAAIBAiVUaGUgbWF4IG51bWJlciBvZiBwYXJhbWV0ZXJzIGV4Y2VlZGVkAQ5nZXRQYXJ0QW5kVGFpbAEDYXJyBANlbDAJAJEDAgUDYXJyAAAEA2VsMQkAkQMCBQNhcnIAAQQDZWwyCQCRAwIFA2FycgACBANlbDMJAJEDAgUDYXJyAAMEA2VsNAkAkQMCBQNhcnIABAQDZWw1CQCRAwIFA2FycgAFBANlbDYJAJEDAgUDYXJyAAYEA2VsNwkAkQMCBQNhcnIABwQDZWw4CQCRAwIFA2FycgAIBANlbDkJAJEDAgUDYXJyAAkEBGFycjAJANEIAgUDYXJyAAAEBGFycjEJANEIAgUEYXJyMAAABARhcnIyCQDRCAIFBGFycjEAAAQEYXJyMwkA0QgCBQRhcnIyAAAEBGFycjQJANEIAgUEYXJyMwAABARhcnI1CQDRCAIFBGFycjQAAAQEYXJyNgkA0QgCBQRhcnI1AAAEBGFycjcJANEIAgUEYXJyNgAABARhcnI4CQDRCAIFBGFycjcAAAQEYXJyOQkA0QgCBQRhcnI4AAAJAJQKAgkAzAgCBQNlbDAJAMwIAgUDZWwxCQDMCAIFA2VsMgkAzAgCBQNlbDMJAMwIAgUDZWw0CQDMCAIFA2VsNQkAzAgCBQNlbDYJAMwIAgUDZWw3CQDMCAIFA2VsOAkAzAgCBQNlbDkFA25pbAUEYXJyOQEMb25seUludGVybmFsAQZjYWxsZXIDCQAAAgUGY2FsbGVyBQR0aGlzBQR1bml0CQACAQIST25seSBpbnRlcm5hbCBjYWxsAQlwcmVwYXJlXzECA2FycgRhcnIyCQDMCAIJAJQKAgkAkQMCBQNhcnIAAAkAkQMCBQRhcnIyAAAFA25pbAEJcHJlcGFyZV8yAgNhcnIEYXJyMgkAzAgCCQCUCgIJAJEDAgUDYXJyAAAJAJEDAgUEYXJyMgAACQDMCAIJAJQKAgkAkQMCBQNhcnIAAQkAkQMCBQRhcnIyAAEFA25pbAEJcHJlcGFyZV8zAgNhcnIEYXJyMgkAzAgCCQCUCgIJAJEDAgUDYXJyAAAJAJEDAgUEYXJyMgAACQDMCAIJAJQKAgkAkQMCBQNhcnIAAQkAkQMCBQRhcnIyAAEJAMwIAgkAlAoCCQCRAwIFA2FycgACCQCRAwIFBGFycjIAAgUDbmlsAQlwcmVwYXJlXzQCA2FycgRhcnIyCQDMCAIJAJQKAgkAkQMCBQNhcnIAAAkAkQMCBQRhcnIyAAAJAMwIAgkAlAoCCQCRAwIFA2FycgABCQCRAwIFBGFycjIAAQkAzAgCCQCUCgIJAJEDAgUDYXJyAAIJAJEDAgUEYXJyMgACCQDMCAIJAJQKAgkAkQMCBQNhcnIAAwkAkQMCBQRhcnIyAAMFA25pbAEJcHJlcGFyZV81AgNhcnIEYXJyMgkAzAgCCQCUCgIJAJEDAgUDYXJyAAAJAJEDAgUEYXJyMgAACQDMCAIJAJQKAgkAkQMCBQNhcnIAAQkAkQMCBQRhcnIyAAEJAMwIAgkAlAoCCQCRAwIFA2FycgACCQCRAwIFBGFycjIAAgkAzAgCCQCUCgIJAJEDAgUDYXJyAAMJAJEDAgUEYXJyMgADCQDMCAIJAJQKAgkAkQMCBQNhcnIABAkAkQMCBQRhcnIyAAQFA25pbAEJcHJlcGFyZV82AgNhcnIEYXJyMgkAzAgCCQCUCgIJAJEDAgUDYXJyAAAJAJEDAgUEYXJyMgAACQDMCAIJAJQKAgkAkQMCBQNhcnIAAQkAkQMCBQRhcnIyAAEJAMwIAgkAlAoCCQCRAwIFA2FycgACCQCRAwIFBGFycjIAAgkAzAgCCQCUCgIJAJEDAgUDYXJyAAMJAJEDAgUEYXJyMgADCQDMCAIJAJQKAgkAkQMCBQNhcnIABAkAkQMCBQRhcnIyAAQJAMwIAgkAlAoCCQCRAwIFA2FycgAFCQCRAwIFBGFycjIABQUDbmlsAQlwcmVwYXJlXzcCA2FycgRhcnIyCQDMCAIJAJQKAgkAkQMCBQNhcnIAAAkAkQMCBQRhcnIyAAAJAMwIAgkAlAoCCQCRAwIFA2FycgABCQCRAwIFBGFycjIAAQkAzAgCCQCUCgIJAJEDAgUDYXJyAAIJAJEDAgUEYXJyMgACCQDMCAIJAJQKAgkAkQMCBQNhcnIAAwkAkQMCBQRhcnIyAAMJAMwIAgkAlAoCCQCRAwIFA2FycgAECQCRAwIFBGFycjIABAkAzAgCCQCUCgIJAJEDAgUDYXJyAAUJAJEDAgUEYXJyMgAFCQDMCAIJAJQKAgkAkQMCBQNhcnIABgkAkQMCBQRhcnIyAAYFA25pbAEJcHJlcGFyZV84AgNhcnIEYXJyMgkAzAgCCQCUCgIJAJEDAgUDYXJyAAAJAJEDAgUEYXJyMgAACQDMCAIJAJQKAgkAkQMCBQNhcnIAAQkAkQMCBQRhcnIyAAEJAMwIAgkAlAoCCQCRAwIFA2FycgACCQCRAwIFBGFycjIAAgkAzAgCCQCUCgIJAJEDAgUDYXJyAAMJAJEDAgUEYXJyMgADCQDMCAIJAJQKAgkAkQMCBQNhcnIABAkAkQMCBQRhcnIyAAQJAMwIAgkAlAoCCQCRAwIFA2FycgAFCQCRAwIFBGFycjIABQkAzAgCCQCUCgIJAJEDAgUDYXJyAAYJAJEDAgUEYXJyMgAGCQDMCAIJAJQKAgkAkQMCBQNhcnIABwkAkQMCBQRhcnIyAAcFA25pbAEJcHJlcGFyZV85AgNhcnIEYXJyMgkAzAgCCQCUCgIJAJEDAgUDYXJyAAAJAJEDAgUEYXJyMgAACQDMCAIJAJQKAgkAkQMCBQNhcnIAAQkAkQMCBQRhcnIyAAEJAMwIAgkAlAoCCQCRAwIFA2FycgACCQCRAwIFBGFycjIAAgkAzAgCCQCUCgIJAJEDAgUDYXJyAAMJAJEDAgUEYXJyMgADCQDMCAIJAJQKAgkAkQMCBQNhcnIABAkAkQMCBQRhcnIyAAQJAMwIAgkAlAoCCQCRAwIFA2FycgAFCQCRAwIFBGFycjIABQkAzAgCCQCUCgIJAJEDAgUDYXJyAAYJAJEDAgUEYXJyMgAGCQDMCAIJAJQKAgkAkQMCBQNhcnIABwkAkQMCBQRhcnIyAAcJAMwIAgkAlAoCCQCRAwIFA2FycgAICQCRAwIFBGFycjIACAUDbmlsAQpwcmVwYXJlXzEwAgNhcnIEYXJyMgkAzAgCCQCUCgIJAJEDAgUDYXJyAAAJAJEDAgUEYXJyMgAACQDMCAIJAJQKAgkAkQMCBQNhcnIAAQkAkQMCBQRhcnIyAAEJAMwIAgkAlAoCCQCRAwIFA2FycgACCQCRAwIFBGFycjIAAgkAzAgCCQCUCgIJAJEDAgUDYXJyAAMJAJEDAgUEYXJyMgADCQDMCAIJAJQKAgkAkQMCBQNhcnIABAkAkQMCBQRhcnIyAAQJAMwIAgkAlAoCCQCRAwIFA2FycgAFCQCRAwIFBGFycjIABQkAzAgCCQCUCgIJAJEDAgUDYXJyAAYJAJEDAgUEYXJyMgAGCQDMCAIJAJQKAgkAkQMCBQNhcnIABwkAkQMCBQRhcnIyAAcJAMwIAgkAlAoCCQCRAwIFA2FycgAICQCRAwIFBGFycjIACAkAzAgCCQCUCgIJAJEDAgUDYXJyAAkJAJEDAgUEYXJyMgAJBQNuaWwBDXByZXBhcmVQYXJhbXMDEmN1cnJlbnRBcnJQYXJ0S2V5cxRjdXJyZW50QXJyUGFydFZhbHVlcwZsZW5ndGgDCQAAAgUGbGVuZ3RoAAAJAAIBAg1FbXB0eSAgcGFyYW1zAwkAAAIFBmxlbmd0aAABCQEJcHJlcGFyZV8xAgUSY3VycmVudEFyclBhcnRLZXlzBRRjdXJyZW50QXJyUGFydFZhbHVlcwMJAAACBQZsZW5ndGgAAgkBCXByZXBhcmVfMgIFEmN1cnJlbnRBcnJQYXJ0S2V5cwUUY3VycmVudEFyclBhcnRWYWx1ZXMDCQAAAgUGbGVuZ3RoAAMJAQlwcmVwYXJlXzMCBRJjdXJyZW50QXJyUGFydEtleXMFFGN1cnJlbnRBcnJQYXJ0VmFsdWVzAwkAAAIFBmxlbmd0aAAECQEJcHJlcGFyZV80AgUSY3VycmVudEFyclBhcnRLZXlzBRRjdXJyZW50QXJyUGFydFZhbHVlcwMJAAACBQZsZW5ndGgABQkBCXByZXBhcmVfNQIFEmN1cnJlbnRBcnJQYXJ0S2V5cwUUY3VycmVudEFyclBhcnRWYWx1ZXMDCQAAAgUGbGVuZ3RoAAYJAQlwcmVwYXJlXzYCBRJjdXJyZW50QXJyUGFydEtleXMFFGN1cnJlbnRBcnJQYXJ0VmFsdWVzAwkAAAIFBmxlbmd0aAAHCQEJcHJlcGFyZV83AgUSY3VycmVudEFyclBhcnRLZXlzBRRjdXJyZW50QXJyUGFydFZhbHVlcwMJAAACBQZsZW5ndGgACAkBCXByZXBhcmVfOAIFEmN1cnJlbnRBcnJQYXJ0S2V5cwUUY3VycmVudEFyclBhcnRWYWx1ZXMDCQAAAgUGbGVuZ3RoAAkJAQlwcmVwYXJlXzkCBRJjdXJyZW50QXJyUGFydEtleXMFFGN1cnJlbnRBcnJQYXJ0VmFsdWVzAwkAAAIFBmxlbmd0aAAKCQEKcHJlcGFyZV8xMAIFEmN1cnJlbnRBcnJQYXJ0S2V5cwUUY3VycmVudEFyclBhcnRWYWx1ZXMJAAIBAiFNYXggbnVtYmVyIG9mIHBhcmFtZXRlcnMgZXhjZWVkZWQBFWdldFN0YXJ0QW5kRW5kSW5kZXhlcwIEanNvbgNrZXkEBmtleUxlbgkAsQIBBQNrZXkECnN0YXJ0SW5kZXgJAQV2YWx1ZQEJALMJAgUEanNvbgUDa2V5BAhlbmRJbmRleAkBC3ZhbHVlT3JFbHNlAgkAtAkDBQRqc29uAgEsBQpzdGFydEluZGV4CQEFdmFsdWUBCQC0CQMFBGpzb24CAX0FCnN0YXJ0SW5kZXgJAJUKAwUGa2V5TGVuBQpzdGFydEluZGV4BQhlbmRJbmRleAERcmVhZEJ5S2V5SW50ZXJuYWwCBGpzb24Da2V5BAskdDA2MzA1NjQxOAkBFWdldFN0YXJ0QW5kRW5kSW5kZXhlcwIFBGpzb24FA2tleQQGa2V5TGVuCAULJHQwNjMwNTY0MTgCXzEECnN0YXJ0SW5kZXgIBQskdDA2MzA1NjQxOAJfMgQIZW5kSW5kZXgIBQskdDA2MzA1NjQxOAJfMwkAsAICCQCvAgIFBGpzb24JAGUCBQhlbmRJbmRleAABCQBkAgkAZAIFCnN0YXJ0SW5kZXgFBmtleUxlbgADARNkZWxldGVCeUtleUludGVybmFsAgRqc29uA2tleQQLJHQwNjY5MjY4MTYJARVnZXRTdGFydEFuZEVuZEluZGV4ZXMCBQRqc29uBQNrZXkEBmtleUxlbggFCyR0MDY2OTI2ODE2Al8xBApzdGFydEluZGV4CAULJHQwNjY5MjY4MTYCXzIECGVuZEluZGV4CAULJHQwNjY5MjY4MTYCXzMEDGRlbGV0ZWRWYWx1ZQkAsAICCQCvAgIFBGpzb24JAGUCBQhlbmRJbmRleAABCQBkAgkAZAIFCnN0YXJ0SW5kZXgFBmtleUxlbgADBAduZXdKc29uAwkAAAIJAGUCCQCxAgEFBGpzb24FCGVuZEluZGV4AAEJAKwCAgkArwICBQRqc29uCQBlAgUKc3RhcnRJbmRleAACCQCwAgIFBGpzb24FCGVuZEluZGV4CQCsAgIJAK8CAgUEanNvbgkAZQIFCnN0YXJ0SW5kZXgAAQkAsAICBQRqc29uCQBkAgUIZW5kSW5kZXgAAQkAlAoCBQxkZWxldGVkVmFsdWUFB25ld0pzb24FAWkBEG1ha2VKU09OSW50ZXJuYWwFB2FycktleXMJYXJyVmFsdWVzD2l0ZXJhdGlvbnNDb3VudBBsYXN0SXRlcmF0aW9uTGVuA3JlcwkBC3ZhbHVlT3JFbHNlAgkBDG9ubHlJbnRlcm5hbAEIBQFpBmNhbGxlcgMJAGYCBQ9pdGVyYXRpb25zQ291bnQAAAQLJHQwNzkxNDgwNzYJAQ5nZXRQYXJ0QW5kVGFpbAEFB2FycktleXMEEmN1cnJlbnRBcnJQYXJ0S2V5cwgFCyR0MDc5MTQ4MDc2Al8xBAthcnJUYWlsS2V5cwgFCyR0MDc5MTQ4MDc2Al8yBAskdDA4MDg1ODIwMAkBDmdldFBhcnRBbmRUYWlsAQUJYXJyVmFsdWVzBBRjdXJyZW50QXJyUGFydFZhbHVlcwgFCyR0MDgwODU4MjAwAl8xBA1hcnJUYWlsVmFsdWVzCAULJHQwODA4NTgyMDACXzIEBnBhcmFtcwkBDXByZXBhcmVQYXJhbXMDBRJjdXJyZW50QXJyUGFydEtleXMFFGN1cnJlbnRBcnJQYXJ0VmFsdWVzAAoECW5ld1N0cmluZwkBD2l0ZXJhdGVNYWtlSlNPTgMFBnBhcmFtcwUDcmVzAAoEBnJlc3VsdAkA/AcEBQR0aGlzAhBtYWtlSlNPTkludGVybmFsCQDMCAIFC2FyclRhaWxLZXlzCQDMCAIFDWFyclRhaWxWYWx1ZXMJAMwIAgkAZQIFD2l0ZXJhdGlvbnNDb3VudAABCQDMCAIFEGxhc3RJdGVyYXRpb25MZW4JAMwIAgUJbmV3U3RyaW5nBQNuaWwFA25pbAMJAAACBQZyZXN1bHQFBnJlc3VsdAkAlAoCBQNuaWwFBnJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgMJAQIhPQIFEGxhc3RJdGVyYXRpb25MZW4AAAQGcGFyYW1zCQENcHJlcGFyZVBhcmFtcwMFB2FycktleXMFCWFyclZhbHVlcwUQbGFzdEl0ZXJhdGlvbkxlbgQJbmV3U3RyaW5nCQEPaXRlcmF0ZU1ha2VKU09OAwUGcGFyYW1zBQNyZXMFEGxhc3RJdGVyYXRpb25MZW4JAJQKAgUDbmlsCQCsAgIJAKwCAgIBewkAswICBQluZXdTdHJpbmcAAQIBfQkAlAoCBQNuaWwJAKwCAgkArAICAgF7CQCzAgIFA3JlcwABAgF9AWkBCG1ha2VKU09OAgdhcnJLZXlzCWFyclZhbHVlcwMJAQIhPQIJAJADAQUHYXJyS2V5cwkAkAMBBQlhcnJWYWx1ZXMJAAIBAi5BcnJheUtleXMgYW5kIEFycmF5VmFsdWVzIGxlbmd0aCBtdXN0IGJlIGVxdWFsBANsZW4JAJADAQUHYXJyS2V5cwQPaXRlcmF0aW9uc0NvdW50CQBrAwABBQNsZW4ACgQQbGFzdEl0ZXJhdGlvbkxlbgkAagIFA2xlbgAKBANyZXMJAPwHBAUEdGhpcwIQbWFrZUpTT05JbnRlcm5hbAkAzAgCBQdhcnJLZXlzCQDMCAIFCWFyclZhbHVlcwkAzAgCBQ9pdGVyYXRpb25zQ291bnQJAMwIAgUQbGFzdEl0ZXJhdGlvbkxlbgkAzAgCAgAFA25pbAUDbmlsAwkAAAIFA3JlcwUDcmVzCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUIa0pzb25SZXMKAAFABQNyZXMDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nBQNuaWwFA3JlcwkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQlhZGRUb0pTT04CB2FycktleXMJYXJyVmFsdWVzAwkBAiE9AgkAkAMBBQdhcnJLZXlzCQCQAwEFCWFyclZhbHVlcwkAAgECLkFycmF5S2V5cyBhbmQgQXJyYXlWYWx1ZXMgbGVuZ3RoIG11c3QgYmUgZXF1YWwEB29sZEpzb24JARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFCGtKc29uUmVzBANsZW4JAJADAQUHYXJyS2V5cwQPaXRlcmF0aW9uc0NvdW50CQBrAwABBQNsZW4ACgQQbGFzdEl0ZXJhdGlvbkxlbgkAagIFA2xlbgAKBANyZXMJAPwHBAUEdGhpcwIQbWFrZUpTT05JbnRlcm5hbAkAzAgCBQdhcnJLZXlzCQDMCAIFCWFyclZhbHVlcwkAzAgCBQ9pdGVyYXRpb25zQ291bnQJAMwIAgUQbGFzdEl0ZXJhdGlvbkxlbgkAzAgCCQCsAgIJALACAgkAswICBQdvbGRKc29uAAEAAQIBLAUDbmlsBQNuaWwDCQAAAgUDcmVzBQNyZXMJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQhrSnNvblJlcwoAAUAFA3JlcwMJAAECBQFAAgZTdHJpbmcFAUAJAAIBCQCsAgIJAAMBBQFAAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcFA25pbAUDcmVzCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDXJlYWRCeUpTT05LZXkBA2tleQQEanNvbgkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwUIa0pzb25SZXMECnZhbHVlQnlLZXkJARFyZWFkQnlLZXlJbnRlcm5hbAIFBGpzb24FA2tleQkAlAoCBQNuaWwFCnZhbHVlQnlLZXkBaQEPZGVsZXRlQnlKU09OS2V5AQNrZXkEBGpzb24JARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFCGtKc29uUmVzBA0kdDAxMjQ1MDEyODAxCQETZGVsZXRlQnlLZXlJbnRlcm5hbAIFBGpzb24FA2tleQQRZGVsZXRlZFZhbHVlQnlLZXkIBQ0kdDAxMjQ1MDEyODAxAl8xBAduZXdKc29uCAUNJHQwMTI0NTAxMjgwMQJfMgkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQICDGRlbGV0ZWRWYWx1ZQURZGVsZXRlZFZhbHVlQnlLZXkJAMwIAgkBC1N0cmluZ0VudHJ5AgUIa0pzb25SZXMFB25ld0pzb24FA25pbAkAlAoCBRFkZWxldGVkVmFsdWVCeUtleQUHbmV3SnNvbgCmqe5L",
    "height": 2491485,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BuBWueuydaMGpoTGtjLX3bzUxeje1Qvf3PjWgCStpGFH
Next: XyLeQwua57Yyck16LnQk3MdhgPCfXZoCezAGiXzDEGJ

Diff: 
Old
New
Differences
316
316
 
        let lastIterationLen = (len % 10)
317
317
 
        let res = invoke(this, "makeJSONInternal", [arrKeys, arrValues, iterationsCount, lastIterationLen, ""], nil)
318
318
 
        if ((res == res))
319
-
            then $Tuple2(nil, res)
319
+
            then $Tuple2([StringEntry(kJsonRes, {
320
+
                let @ = res
321
+
                if ($isInstanceOf(@, "String"))
322
+
                    then @
323
+
                    else throw(($getType(@) + " couldn't be cast to String"))
324
+
                })], res)
320
325
 
            else throw("Strict value is not equal to itself.")
321
326
 
        }
322
327
 
332
337
 
        let lastIterationLen = (len % 10)
333
338
 
        let res = invoke(this, "makeJSONInternal", [arrKeys, arrValues, iterationsCount, lastIterationLen, (drop(dropRight(oldJson, 1), 1) + ",")], nil)
334
339
 
        if ((res == res))
335
-
            then $Tuple2(nil, res)
340
+
            then $Tuple2([StringEntry(kJsonRes, {
341
+
                let @ = res
342
+
                if ($isInstanceOf(@, "String"))
343
+
                    then @
344
+
                    else throw(($getType(@) + " couldn't be cast to String"))
345
+
                })], res)
336
346
 
            else throw("Strict value is not equal to itself.")
337
347
 
        }
338
348
 
350
360
 
@Callable(i)
351
361
 
func deleteByJSONKey (key) = {
352
362
 
    let json = getStringValue(this, kJsonRes)
353
-
    let $t01245012580 = deleteByKeyInternal(json, key)
354
-
    let deletedValueByKey = $t01245012580._1
355
-
    let newJson = $t01245012580._2
356
-
    $Tuple2(nil, $Tuple2(deletedValueByKey, newJson))
363
+
    let $t01245012801 = deleteByKeyInternal(json, key)
364
+
    let deletedValueByKey = $t01245012801._1
365
+
    let newJson = $t01245012801._2
366
+
    $Tuple2([StringEntry("deletedValue", deletedValueByKey), StringEntry(kJsonRes, newJson)], $Tuple2(deletedValueByKey, newJson))
357
367
 
    }
358
368
 
359
369
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let kJsonRes = "jsonRes"
5
5
 
6
6
 
let quote = toUtf8String(base58'b')
7
7
 
8
8
 
func makeField (nextValue) = (((((((quote + nextValue._1) + quote) + ":") + quote) + nextValue._2) + quote) + ",")
9
9
 
10
10
 
11
11
 
func reducerMakeJSON (accum,nextValue) = (accum + makeField(nextValue))
12
12
 
13
13
 
14
14
 
func iterateMakeJSON (params,res,length) = if ((length == 0))
15
15
 
    then throw("Empty  params")
16
16
 
    else if ((length == 1))
17
17
 
        then {
18
18
 
            let $l = params
19
19
 
            let $s = size($l)
20
20
 
            let $acc0 = res
21
21
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
22
22
 
                then $a
23
23
 
                else reducerMakeJSON($a, $l[$i])
24
24
 
25
25
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
26
26
 
                then $a
27
27
 
                else throw("List size exceeds 1")
28
28
 
29
29
 
            $f0_2($f0_1($acc0, 0), 1)
30
30
 
            }
31
31
 
        else if ((length == 2))
32
32
 
            then {
33
33
 
                let $l = params
34
34
 
                let $s = size($l)
35
35
 
                let $acc0 = res
36
36
 
                func $f0_1 ($a,$i) =                 if (($i >= $s))
37
37
 
                    then $a
38
38
 
                    else reducerMakeJSON($a, $l[$i])
39
39
 
40
40
 
                func $f0_2 ($a,$i) =                 if (($i >= $s))
41
41
 
                    then $a
42
42
 
                    else throw("List size exceeds 2")
43
43
 
44
44
 
                $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
45
45
 
                }
46
46
 
            else if ((length == 3))
47
47
 
                then {
48
48
 
                    let $l = params
49
49
 
                    let $s = size($l)
50
50
 
                    let $acc0 = res
51
51
 
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
52
52
 
                        then $a
53
53
 
                        else reducerMakeJSON($a, $l[$i])
54
54
 
55
55
 
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
56
56
 
                        then $a
57
57
 
                        else throw("List size exceeds 3")
58
58
 
59
59
 
                    $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
60
60
 
                    }
61
61
 
                else if ((length == 4))
62
62
 
                    then {
63
63
 
                        let $l = params
64
64
 
                        let $s = size($l)
65
65
 
                        let $acc0 = res
66
66
 
                        func $f0_1 ($a,$i) =                         if (($i >= $s))
67
67
 
                            then $a
68
68
 
                            else reducerMakeJSON($a, $l[$i])
69
69
 
70
70
 
                        func $f0_2 ($a,$i) =                         if (($i >= $s))
71
71
 
                            then $a
72
72
 
                            else throw("List size exceeds 4")
73
73
 
74
74
 
                        $f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
75
75
 
                        }
76
76
 
                    else if ((length == 5))
77
77
 
                        then {
78
78
 
                            let $l = params
79
79
 
                            let $s = size($l)
80
80
 
                            let $acc0 = res
81
81
 
                            func $f0_1 ($a,$i) =                             if (($i >= $s))
82
82
 
                                then $a
83
83
 
                                else reducerMakeJSON($a, $l[$i])
84
84
 
85
85
 
                            func $f0_2 ($a,$i) =                             if (($i >= $s))
86
86
 
                                then $a
87
87
 
                                else throw("List size exceeds 5")
88
88
 
89
89
 
                            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
90
90
 
                            }
91
91
 
                        else if ((length == 6))
92
92
 
                            then {
93
93
 
                                let $l = params
94
94
 
                                let $s = size($l)
95
95
 
                                let $acc0 = res
96
96
 
                                func $f0_1 ($a,$i) =                                 if (($i >= $s))
97
97
 
                                    then $a
98
98
 
                                    else reducerMakeJSON($a, $l[$i])
99
99
 
100
100
 
                                func $f0_2 ($a,$i) =                                 if (($i >= $s))
101
101
 
                                    then $a
102
102
 
                                    else throw("List size exceeds 6")
103
103
 
104
104
 
                                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6)
105
105
 
                                }
106
106
 
                            else if ((length == 7))
107
107
 
                                then {
108
108
 
                                    let $l = params
109
109
 
                                    let $s = size($l)
110
110
 
                                    let $acc0 = res
111
111
 
                                    func $f0_1 ($a,$i) =                                     if (($i >= $s))
112
112
 
                                        then $a
113
113
 
                                        else reducerMakeJSON($a, $l[$i])
114
114
 
115
115
 
                                    func $f0_2 ($a,$i) =                                     if (($i >= $s))
116
116
 
                                        then $a
117
117
 
                                        else throw("List size exceeds 7")
118
118
 
119
119
 
                                    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
120
120
 
                                    }
121
121
 
                                else if ((length == 8))
122
122
 
                                    then {
123
123
 
                                        let $l = params
124
124
 
                                        let $s = size($l)
125
125
 
                                        let $acc0 = res
126
126
 
                                        func $f0_1 ($a,$i) =                                         if (($i >= $s))
127
127
 
                                            then $a
128
128
 
                                            else reducerMakeJSON($a, $l[$i])
129
129
 
130
130
 
                                        func $f0_2 ($a,$i) =                                         if (($i >= $s))
131
131
 
                                            then $a
132
132
 
                                            else throw("List size exceeds 8")
133
133
 
134
134
 
                                        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
135
135
 
                                        }
136
136
 
                                    else if ((length == 9))
137
137
 
                                        then {
138
138
 
                                            let $l = params
139
139
 
                                            let $s = size($l)
140
140
 
                                            let $acc0 = res
141
141
 
                                            func $f0_1 ($a,$i) =                                             if (($i >= $s))
142
142
 
                                                then $a
143
143
 
                                                else reducerMakeJSON($a, $l[$i])
144
144
 
145
145
 
                                            func $f0_2 ($a,$i) =                                             if (($i >= $s))
146
146
 
                                                then $a
147
147
 
                                                else throw("List size exceeds 9")
148
148
 
149
149
 
                                            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9)
150
150
 
                                            }
151
151
 
                                        else if ((length == 10))
152
152
 
                                            then {
153
153
 
                                                let $l = params
154
154
 
                                                let $s = size($l)
155
155
 
                                                let $acc0 = res
156
156
 
                                                func $f0_1 ($a,$i) =                                                 if (($i >= $s))
157
157
 
                                                    then $a
158
158
 
                                                    else reducerMakeJSON($a, $l[$i])
159
159
 
160
160
 
                                                func $f0_2 ($a,$i) =                                                 if (($i >= $s))
161
161
 
                                                    then $a
162
162
 
                                                    else throw("List size exceeds 10")
163
163
 
164
164
 
                                                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
165
165
 
                                                }
166
166
 
                                            else throw("The max number of parameters exceeded")
167
167
 
168
168
 
169
169
 
func getPartAndTail (arr) = {
170
170
 
    let el0 = arr[0]
171
171
 
    let el1 = arr[1]
172
172
 
    let el2 = arr[2]
173
173
 
    let el3 = arr[3]
174
174
 
    let el4 = arr[4]
175
175
 
    let el5 = arr[5]
176
176
 
    let el6 = arr[6]
177
177
 
    let el7 = arr[7]
178
178
 
    let el8 = arr[8]
179
179
 
    let el9 = arr[9]
180
180
 
    let arr0 = removeByIndex(arr, 0)
181
181
 
    let arr1 = removeByIndex(arr0, 0)
182
182
 
    let arr2 = removeByIndex(arr1, 0)
183
183
 
    let arr3 = removeByIndex(arr2, 0)
184
184
 
    let arr4 = removeByIndex(arr3, 0)
185
185
 
    let arr5 = removeByIndex(arr4, 0)
186
186
 
    let arr6 = removeByIndex(arr5, 0)
187
187
 
    let arr7 = removeByIndex(arr6, 0)
188
188
 
    let arr8 = removeByIndex(arr7, 0)
189
189
 
    let arr9 = removeByIndex(arr8, 0)
190
190
 
    $Tuple2([el0, el1, el2, el3, el4, el5, el6, el7, el8, el9], arr9)
191
191
 
    }
192
192
 
193
193
 
194
194
 
func onlyInternal (caller) = if ((caller == this))
195
195
 
    then unit
196
196
 
    else throw("Only internal call")
197
197
 
198
198
 
199
199
 
func prepare_1 (arr,arr2) = [$Tuple2(arr[0], arr2[0])]
200
200
 
201
201
 
202
202
 
func prepare_2 (arr,arr2) = [$Tuple2(arr[0], arr2[0]), $Tuple2(arr[1], arr2[1])]
203
203
 
204
204
 
205
205
 
func prepare_3 (arr,arr2) = [$Tuple2(arr[0], arr2[0]), $Tuple2(arr[1], arr2[1]), $Tuple2(arr[2], arr2[2])]
206
206
 
207
207
 
208
208
 
func prepare_4 (arr,arr2) = [$Tuple2(arr[0], arr2[0]), $Tuple2(arr[1], arr2[1]), $Tuple2(arr[2], arr2[2]), $Tuple2(arr[3], arr2[3])]
209
209
 
210
210
 
211
211
 
func prepare_5 (arr,arr2) = [$Tuple2(arr[0], arr2[0]), $Tuple2(arr[1], arr2[1]), $Tuple2(arr[2], arr2[2]), $Tuple2(arr[3], arr2[3]), $Tuple2(arr[4], arr2[4])]
212
212
 
213
213
 
214
214
 
func prepare_6 (arr,arr2) = [$Tuple2(arr[0], arr2[0]), $Tuple2(arr[1], arr2[1]), $Tuple2(arr[2], arr2[2]), $Tuple2(arr[3], arr2[3]), $Tuple2(arr[4], arr2[4]), $Tuple2(arr[5], arr2[5])]
215
215
 
216
216
 
217
217
 
func prepare_7 (arr,arr2) = [$Tuple2(arr[0], arr2[0]), $Tuple2(arr[1], arr2[1]), $Tuple2(arr[2], arr2[2]), $Tuple2(arr[3], arr2[3]), $Tuple2(arr[4], arr2[4]), $Tuple2(arr[5], arr2[5]), $Tuple2(arr[6], arr2[6])]
218
218
 
219
219
 
220
220
 
func prepare_8 (arr,arr2) = [$Tuple2(arr[0], arr2[0]), $Tuple2(arr[1], arr2[1]), $Tuple2(arr[2], arr2[2]), $Tuple2(arr[3], arr2[3]), $Tuple2(arr[4], arr2[4]), $Tuple2(arr[5], arr2[5]), $Tuple2(arr[6], arr2[6]), $Tuple2(arr[7], arr2[7])]
221
221
 
222
222
 
223
223
 
func prepare_9 (arr,arr2) = [$Tuple2(arr[0], arr2[0]), $Tuple2(arr[1], arr2[1]), $Tuple2(arr[2], arr2[2]), $Tuple2(arr[3], arr2[3]), $Tuple2(arr[4], arr2[4]), $Tuple2(arr[5], arr2[5]), $Tuple2(arr[6], arr2[6]), $Tuple2(arr[7], arr2[7]), $Tuple2(arr[8], arr2[8])]
224
224
 
225
225
 
226
226
 
func prepare_10 (arr,arr2) = [$Tuple2(arr[0], arr2[0]), $Tuple2(arr[1], arr2[1]), $Tuple2(arr[2], arr2[2]), $Tuple2(arr[3], arr2[3]), $Tuple2(arr[4], arr2[4]), $Tuple2(arr[5], arr2[5]), $Tuple2(arr[6], arr2[6]), $Tuple2(arr[7], arr2[7]), $Tuple2(arr[8], arr2[8]), $Tuple2(arr[9], arr2[9])]
227
227
 
228
228
 
229
229
 
func prepareParams (currentArrPartKeys,currentArrPartValues,length) = if ((length == 0))
230
230
 
    then throw("Empty  params")
231
231
 
    else if ((length == 1))
232
232
 
        then prepare_1(currentArrPartKeys, currentArrPartValues)
233
233
 
        else if ((length == 2))
234
234
 
            then prepare_2(currentArrPartKeys, currentArrPartValues)
235
235
 
            else if ((length == 3))
236
236
 
                then prepare_3(currentArrPartKeys, currentArrPartValues)
237
237
 
                else if ((length == 4))
238
238
 
                    then prepare_4(currentArrPartKeys, currentArrPartValues)
239
239
 
                    else if ((length == 5))
240
240
 
                        then prepare_5(currentArrPartKeys, currentArrPartValues)
241
241
 
                        else if ((length == 6))
242
242
 
                            then prepare_6(currentArrPartKeys, currentArrPartValues)
243
243
 
                            else if ((length == 7))
244
244
 
                                then prepare_7(currentArrPartKeys, currentArrPartValues)
245
245
 
                                else if ((length == 8))
246
246
 
                                    then prepare_8(currentArrPartKeys, currentArrPartValues)
247
247
 
                                    else if ((length == 9))
248
248
 
                                        then prepare_9(currentArrPartKeys, currentArrPartValues)
249
249
 
                                        else if ((length == 10))
250
250
 
                                            then prepare_10(currentArrPartKeys, currentArrPartValues)
251
251
 
                                            else throw("Max number of parameters exceeded")
252
252
 
253
253
 
254
254
 
func getStartAndEndIndexes (json,key) = {
255
255
 
    let keyLen = size(key)
256
256
 
    let startIndex = value(indexOf(json, key))
257
257
 
    let endIndex = valueOrElse(indexOf(json, ",", startIndex), value(indexOf(json, "}", startIndex)))
258
258
 
    $Tuple3(keyLen, startIndex, endIndex)
259
259
 
    }
260
260
 
261
261
 
262
262
 
func readByKeyInternal (json,key) = {
263
263
 
    let $t063056418 = getStartAndEndIndexes(json, key)
264
264
 
    let keyLen = $t063056418._1
265
265
 
    let startIndex = $t063056418._2
266
266
 
    let endIndex = $t063056418._3
267
267
 
    drop(take(json, (endIndex - 1)), ((startIndex + keyLen) + 3))
268
268
 
    }
269
269
 
270
270
 
271
271
 
func deleteByKeyInternal (json,key) = {
272
272
 
    let $t066926816 = getStartAndEndIndexes(json, key)
273
273
 
    let keyLen = $t066926816._1
274
274
 
    let startIndex = $t066926816._2
275
275
 
    let endIndex = $t066926816._3
276
276
 
    let deletedValue = drop(take(json, (endIndex - 1)), ((startIndex + keyLen) + 3))
277
277
 
    let newJson = if (((size(json) - endIndex) == 1))
278
278
 
        then (take(json, (startIndex - 2)) + drop(json, endIndex))
279
279
 
        else (take(json, (startIndex - 1)) + drop(json, (endIndex + 1)))
280
280
 
    $Tuple2(deletedValue, newJson)
281
281
 
    }
282
282
 
283
283
 
284
284
 
@Callable(i)
285
285
 
func makeJSONInternal (arrKeys,arrValues,iterationsCount,lastIterationLen,res) = valueOrElse(onlyInternal(i.caller), if ((iterationsCount > 0))
286
286
 
    then {
287
287
 
        let $t079148076 = getPartAndTail(arrKeys)
288
288
 
        let currentArrPartKeys = $t079148076._1
289
289
 
        let arrTailKeys = $t079148076._2
290
290
 
        let $t080858200 = getPartAndTail(arrValues)
291
291
 
        let currentArrPartValues = $t080858200._1
292
292
 
        let arrTailValues = $t080858200._2
293
293
 
        let params = prepareParams(currentArrPartKeys, currentArrPartValues, 10)
294
294
 
        let newString = iterateMakeJSON(params, res, 10)
295
295
 
        let result = invoke(this, "makeJSONInternal", [arrTailKeys, arrTailValues, (iterationsCount - 1), lastIterationLen, newString], nil)
296
296
 
        if ((result == result))
297
297
 
            then $Tuple2(nil, result)
298
298
 
            else throw("Strict value is not equal to itself.")
299
299
 
        }
300
300
 
    else if ((lastIterationLen != 0))
301
301
 
        then {
302
302
 
            let params = prepareParams(arrKeys, arrValues, lastIterationLen)
303
303
 
            let newString = iterateMakeJSON(params, res, lastIterationLen)
304
304
 
            $Tuple2(nil, (("{" + dropRight(newString, 1)) + "}"))
305
305
 
            }
306
306
 
        else $Tuple2(nil, (("{" + dropRight(res, 1)) + "}")))
307
307
 
308
308
 
309
309
 
310
310
 
@Callable(i)
311
311
 
func makeJSON (arrKeys,arrValues) = if ((size(arrKeys) != size(arrValues)))
312
312
 
    then throw("ArrayKeys and ArrayValues length must be equal")
313
313
 
    else {
314
314
 
        let len = size(arrKeys)
315
315
 
        let iterationsCount = fraction(1, len, 10)
316
316
 
        let lastIterationLen = (len % 10)
317
317
 
        let res = invoke(this, "makeJSONInternal", [arrKeys, arrValues, iterationsCount, lastIterationLen, ""], nil)
318
318
 
        if ((res == res))
319
-
            then $Tuple2(nil, res)
319
+
            then $Tuple2([StringEntry(kJsonRes, {
320
+
                let @ = res
321
+
                if ($isInstanceOf(@, "String"))
322
+
                    then @
323
+
                    else throw(($getType(@) + " couldn't be cast to String"))
324
+
                })], res)
320
325
 
            else throw("Strict value is not equal to itself.")
321
326
 
        }
322
327
 
323
328
 
324
329
 
325
330
 
@Callable(i)
326
331
 
func addToJSON (arrKeys,arrValues) = if ((size(arrKeys) != size(arrValues)))
327
332
 
    then throw("ArrayKeys and ArrayValues length must be equal")
328
333
 
    else {
329
334
 
        let oldJson = getStringValue(this, kJsonRes)
330
335
 
        let len = size(arrKeys)
331
336
 
        let iterationsCount = fraction(1, len, 10)
332
337
 
        let lastIterationLen = (len % 10)
333
338
 
        let res = invoke(this, "makeJSONInternal", [arrKeys, arrValues, iterationsCount, lastIterationLen, (drop(dropRight(oldJson, 1), 1) + ",")], nil)
334
339
 
        if ((res == res))
335
-
            then $Tuple2(nil, res)
340
+
            then $Tuple2([StringEntry(kJsonRes, {
341
+
                let @ = res
342
+
                if ($isInstanceOf(@, "String"))
343
+
                    then @
344
+
                    else throw(($getType(@) + " couldn't be cast to String"))
345
+
                })], res)
336
346
 
            else throw("Strict value is not equal to itself.")
337
347
 
        }
338
348
 
339
349
 
340
350
 
341
351
 
@Callable(i)
342
352
 
func readByJSONKey (key) = {
343
353
 
    let json = getStringValue(this, kJsonRes)
344
354
 
    let valueByKey = readByKeyInternal(json, key)
345
355
 
    $Tuple2(nil, valueByKey)
346
356
 
    }
347
357
 
348
358
 
349
359
 
350
360
 
@Callable(i)
351
361
 
func deleteByJSONKey (key) = {
352
362
 
    let json = getStringValue(this, kJsonRes)
353
-
    let $t01245012580 = deleteByKeyInternal(json, key)
354
-
    let deletedValueByKey = $t01245012580._1
355
-
    let newJson = $t01245012580._2
356
-
    $Tuple2(nil, $Tuple2(deletedValueByKey, newJson))
363
+
    let $t01245012801 = deleteByKeyInternal(json, key)
364
+
    let deletedValueByKey = $t01245012801._1
365
+
    let newJson = $t01245012801._2
366
+
    $Tuple2([StringEntry("deletedValue", deletedValueByKey), StringEntry(kJsonRes, newJson)], $Tuple2(deletedValueByKey, newJson))
357
367
 
    }
358
368
 
359
369
 

github/deemru/w8io/169f3d6 
65.08 ms ◑