tx · JBgaBA6LL8vWHByeKcujbj1if9ZtHh91DMobjhFcCaHC

3ND6qeDAKCuRg6oTgcC9KvNF5UfdS3J2SzR:  -0.02800000 Waves

2022.06.15 16:44 [2097569] smart account 3ND6qeDAKCuRg6oTgcC9KvNF5UfdS3J2SzR > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "JBgaBA6LL8vWHByeKcujbj1if9ZtHh91DMobjhFcCaHC",
    "fee": 2800000,
    "feeAssetId": null,
    "timestamp": 1655300680660,
    "version": 2,
    "chainId": 84,
    "sender": "3ND6qeDAKCuRg6oTgcC9KvNF5UfdS3J2SzR",
    "senderPublicKey": "FnJniYXAWfwAQ3qtBt1aPAaNDyz1pHYUfCQu7QihnhLu",
    "proofs": [
        "4N1m2MhXrmHaUZZUr8MbjtRnRa6ComgFds1fFEo6miWAjL2FjNJZ45ofjD9ftuAT8CwPF9TPNP3Dm72rqU8XzFKM"
    ],
    "script": "base64:AAIFAAAAAAAAADQIAhIDCgEIEgkKBwgICAgBCAgSAwoBARIAEgASBQoDCAgIEgQKAggBEgMKAQgSAwoBCBIAAAAAOQAAAAADU0VQAgAAAAJfXwAAAAAFRU1QVFkCAAAAAAEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAQAAAANrZXkJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkJAAEsAAAAAgIAAAAVTm8gZGF0YSBmb3IgdGhpcy5rZXk9BQAAAANrZXkBAAAAEGdldEJvb2xlYW5PckZhaWwAAAABAAAAA2tleQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGwAAAAIFAAAABHRoaXMFAAAAA2tleQkAASwAAAACAgAAABVObyBkYXRhIGZvciB0aGlzLmtleT0FAAAAA2tleQEAAAATa2V5TWFuYWdlclB1YmxpY0tleQAAAAAJAAS5AAAAAgkABEwAAAACAgAAAAIlcwkABEwAAAACAgAAABBtYW5hZ2VyUHVibGljS2V5BQAAAANuaWwFAAAAA1NFUAEAAAAaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkAAAAACQAEuQAAAAIJAARMAAAAAgIAAAACJXMJAARMAAAAAgIAAAAXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkFAAAAA25pbAUAAAADU0VQAQAAAA5mYWlsRXhlY3V0ZUdldAAAAAQAAAADbXNnAAAADGJhc2VBc3NldFN0cgAAAA51c2VyQWRkcmVzc1N0cgAAAApnZXRUeElkU3RyCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAAA21zZwIAAAAPOiBiYXNlQXNzZXRTdHI9BQAAAAxiYXNlQXNzZXRTdHICAAAAECB1c2VyQWRkcmVzc1N0cj0FAAAADnVzZXJBZGRyZXNzU3RyAgAAAAwgZ2V0VHhJZFN0cj0FAAAACmdldFR4SWRTdHIBAAAAFmtleUFzc2V0c1N0b3JlQ29udHJhY3QAAAAACQAEuQAAAAIJAARMAAAAAgIAAAACJXMJAARMAAAAAgIAAAATYXNzZXRzU3RvcmVDb250cmFjdAUAAAADbmlsBQAAAANTRVABAAAAC2tleUFzc2V0Q2ZnAAAAAQAAAAxiYXNlQXNzZXRTdHIJAAEsAAAAAgIAAAAXJXMlcyVzX19jb25maWdfX2Fzc2V0X18FAAAADGJhc2VBc3NldFN0cgEAAAAPa2V5UHJveHlBZGRyZXNzAAAAAQAAAAdhc3NldElkCQAEuQAAAAIJAARMAAAAAgIAAAAEJXMlcwkABEwAAAACAgAAAAxwcm94eUFkZHJlc3MJAARMAAAAAgUAAAAHYXNzZXRJZAUAAAADbmlsBQAAAANTRVABAAAACmtleUJhbGFuY2UAAAABAAAAB2Fzc2V0SWQJAAS5AAAAAgkABEwAAAACAgAAAAQlcyVzCQAETAAAAAICAAAAB2JhbGFuY2UJAARMAAAAAgUAAAAHYXNzZXRJZAUAAAADbmlsBQAAAANTRVABAAAAFmtleU5leHRJbnRlcm5hbEFzc2V0SWQAAAAAAgAAABclc19fbmV4dEludGVybmFsQXNzZXRJZAEAAAAMa2V5UHJpY2VMYXN0AAAAAQAAABVpbnRlcm5hbEJhc2V0QXNzZXRTdHIJAAEsAAAAAgIAAAAVJXMlcyVkX19wcmljZV9fbGFzdF9fBQAAABVpbnRlcm5hbEJhc2V0QXNzZXRTdHIBAAAAEmtleVRvcFVwTGFzdEhlaWdodAAAAAIAAAAVaW50ZXJuYWxCYXNldEFzc2V0U3RyAAAABnNlbmRlcgkABLkAAAACCQAETAAAAAICAAAAHyVzJXMlcyVkJXNfX3RvcHVwX19sYXN0X19oZWlnaHQJAARMAAAAAgUAAAAVaW50ZXJuYWxCYXNldEFzc2V0U3RyCQAETAAAAAIFAAAABnNlbmRlcgUAAAADbmlsBQAAAANTRVABAAAAD2tleVByaWNlSGlzdG9yeQAAAAMAAAAVaW50ZXJuYWxCYXNldEFzc2V0U3RyAAAAAWgAAAAJdGltZXN0YW1wCQAEuQAAAAIJAARMAAAAAgIAAAAaJXMlcyVkJWQlZF9fcHJpY2VfX2hpc3RvcnkJAARMAAAAAgUAAAAVaW50ZXJuYWxCYXNldEFzc2V0U3RyCQAETAAAAAIJAAGkAAAAAQUAAAABaAkABEwAAAACCQABpAAAAAEFAAAACXRpbWVzdGFtcAUAAAADbmlsBQAAAANTRVABAAAADmtleVRvdGFsTG9ja2VkAAAAAQAAABVpbnRlcm5hbEJhc2V0QXNzZXRTdHIJAAEsAAAAAgIAAAAXJXMlcyVkX190b3RhbF9fbG9ja2VkX18FAAAAFWludGVybmFsQmFzZXRBc3NldFN0cgEAAAAUa2V5VG90YWxMb2NrZWRCeVVzZXIAAAACAAAAFGludGVybmFsQmFzZUFzc2V0U3RyAAAADnVzZXJBZGRyZXNzU3RyCQAEuQAAAAIJAARMAAAAAgIAAAAXJXMlcyVkJXNfX3RvdGFsX19sb2NrZWQJAARMAAAAAgUAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIJAARMAAAAAgUAAAAOdXNlckFkZHJlc3NTdHIFAAAAA25pbAUAAAADU0VQAQAAAB9rZXlNYXBwaW5nc0ludGVybmFsMmJhc2VBc3NldElkAAAAAQAAABFpbnRlcm5hbEJhc2VBc3NldAkAASwAAAACAgAAACglcyVzJWRfX21hcHBpbmdzX19pbnRlcm5hbDJiYXNlQXNzZXRJZF9fCQABpAAAAAEFAAAAEWludGVybmFsQmFzZUFzc2V0AQAAAB9rZXlNYXBwaW5nc0Jhc2VBc3NldDJpbnRlcm5hbElkAAAAAQAAAAxiYXNlQXNzZXRTdHIJAAEsAAAAAgIAAAAoJXMlcyVzX19tYXBwaW5nc19fYmFzZUFzc2V0MmludGVybmFsSWRfXwUAAAAMYmFzZUFzc2V0U3RyAQAAABxrZXlNYXBwaW5nc1NoYXJlMmJhc2VBc3NldElkAAAAAQAAAA1zaGFyZUFzc2V0U3RyCQABLAAAAAICAAAAJSVzJXMlc19fbWFwcGluZ3NfX3NoYXJlMmJhc2VBc3NldElkX18FAAAADXNoYXJlQXNzZXRTdHIBAAAAHGtleU1hcHBpbmdzQmFzZUFzc2V0MnNoYXJlSWQAAAABAAAADGJhc2VBc3NldFN0cgkAASwAAAACAgAAACUlcyVzJXNfX21hcHBpbmdzX19iYXNlQXNzZXQyc2hhcmVJZF9fBQAAAAxiYXNlQXNzZXRTdHIBAAAAF2tleVNodXRkb3duUHV0T3BlcmF0aW9uAAAAAQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgkAASwAAAACAgAAABclcyVzJWRfX3NodXRkb3duX19wdXRfXwUAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIBAAAAEmtleVNodXRkb3duTWFuYWdlcgAAAAEAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIJAAEsAAAAAgIAAAAbJXMlcyVkX19zaHV0ZG93bl9fbWFuYWdlcl9fBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgEAAAATYXNzZXRzU3RvcmVDb250cmFjdAAAAAAJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAAAV2YWx1ZQAAAAEJAAQiAAAAAQkBAAAAFmtleUFzc2V0c1N0b3JlQ29udHJhY3QAAAAAAAAAABJJZHhDZmdTaGFyZUFzc2V0SWQAAAAAAAAAAAEAAAAAF0lkeENmZ0ludGVybmFsQmFzZUFzc2V0AAAAAAAAAAACAAAAABxJZHhDZmdEZWNpbWFsc011bHRCb3RoQXNzZXRzAAAAAAAAAAADAAAAABdJZHhDZmdEZWNpbWFsc011bHRQcmljZQAAAAAAAAAABAAAAAAUSWR4Q2ZnR2V0RGVsYXlCbG9ja3MAAAAAAAAAAAUBAAAADGRhdGFBc3NldENmZwAAAAUAAAANc2hhcmVBc3NldFN0cgAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgAAABZkZWNpbWFsc011bHRCb3RoQXNzZXRzAAAAEWRlY2ltYWxzTXVsdFByaWNlAAAAEGdldERlbGF5SW5CbG9ja3MJAAS5AAAAAgkABEwAAAACAgAAAAolcyVkJWQlZCVkCQAETAAAAAIFAAAADXNoYXJlQXNzZXRTdHIJAARMAAAAAgUAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIJAARMAAAAAgkAAaQAAAABBQAAABZkZWNpbWFsc011bHRCb3RoQXNzZXRzCQAETAAAAAIJAAGkAAAAAQUAAAARZGVjaW1hbHNNdWx0UHJpY2UJAARMAAAAAgkAAaQAAAABBQAAABBnZXREZWxheUluQmxvY2tzBQAAAANuaWwFAAAAA1NFUAAAAAATSWR4VG90YWxMb2NrZWRTaGFyZQAAAAAAAAAAAQAAAAASSWR4VG90YWxMb2NrZWRCYXNlAAAAAAAAAAACAQAAAA9kYXRhVG90YWxMb2NrZWQAAAACAAAAEHNoYXJlQXNzZXRBbW91bnQAAAAPYmFzZUFzc2V0QW1vdW50CQAEuQAAAAIJAARMAAAAAgIAAAAEJWQlZAkABEwAAAACCQABpAAAAAEFAAAAEHNoYXJlQXNzZXRBbW91bnQJAARMAAAAAgkAAaQAAAABBQAAAA9iYXNlQXNzZXRBbW91bnQFAAAAA25pbAUAAAADU0VQAQAAAA9yZWFkVG90YWxMb2NrZWQAAAABAAAAA2tleQQAAAAQdG90YWxMb2NrZWRBcnJheQkABLUAAAACCQEAAAALdmFsdWVPckVsc2UAAAACCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQkBAAAAD2RhdGFUb3RhbExvY2tlZAAAAAIAAAAAAAAAAAAAAAAAAAAAAAAFAAAAA1NFUAkABEwAAAACAP//////////CQAETAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAABB0b3RhbExvY2tlZEFycmF5BQAAABNJZHhUb3RhbExvY2tlZFNoYXJlCQAETAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAABB0b3RhbExvY2tlZEFycmF5BQAAABJJZHhUb3RhbExvY2tlZEJhc2UFAAAAA25pbAEAAAAMa2V5T3BlcmF0aW9uAAAABAAAAA1vcGVyYXRpb25UeXBlAAAAFGludGVybmFsQmFzZUFzc2V0U3RyAAAAC3VzZXJBZGRyZXNzAAAABHR4SWQJAAS5AAAAAgkABEwAAAACAgAAAAglcyVkJXMlcwkABEwAAAACBQAAAA1vcGVyYXRpb25UeXBlCQAETAAAAAIFAAAAFGludGVybmFsQmFzZUFzc2V0U3RyCQAETAAAAAIFAAAAC3VzZXJBZGRyZXNzCQAETAAAAAIFAAAABHR4SWQFAAAAA25pbAUAAAADU0VQAAAAAA1JZHhPcGVyU3RhdHVzAAAAAAAAAAABAAAAAA9JZHhPcGVySW5BbW91bnQAAAAAAAAAAAIAAAAADElkeE9wZXJQcmljZQAAAAAAAAAAAwAAAAAQSWR4T3Blck91dEFtb3VudAAAAAAAAAAABAAAAAASSWR4T3BlclN0YXJ0SGVpZ2h0AAAAAAAAAAAFAAAAABVJZHhPcGVyU3RhcnRUaW1lc3RhbXAAAAAAAAAAAAYAAAAAEElkeE9wZXJFbmRIZWlnaHQAAAAAAAAAAAcAAAAAE0lkeE9wZXJFbmRUaW1lc3RhbXAAAAAAAAAAAAgBAAAAHnByaXZhdGVEYXRhT3BlcmF0aW9uQWxsU3RyaW5ncwAAAAgAAAAGc3RhdHVzAAAADWluQXNzZXRBbW91bnQAAAAFcHJpY2UAAAAOb3V0QXNzZXRBbW91bnQAAAALc3RhcnRIZWlnaHQAAAAOc3RhcnRUaW1lc3RhbXAAAAAJZW5kSGVpZ2h0AAAADGVuZFRpbWVzdGFtcAkABLkAAAACCQAETAAAAAICAAAAECVzJWQlZCVkJWQlZCVkJWQJAARMAAAAAgUAAAAGc3RhdHVzCQAETAAAAAIFAAAADWluQXNzZXRBbW91bnQJAARMAAAAAgUAAAAFcHJpY2UJAARMAAAAAgUAAAAOb3V0QXNzZXRBbW91bnQJAARMAAAAAgUAAAALc3RhcnRIZWlnaHQJAARMAAAAAgUAAAAOc3RhcnRUaW1lc3RhbXAJAARMAAAAAgUAAAAJZW5kSGVpZ2h0CQAETAAAAAIFAAAADGVuZFRpbWVzdGFtcAUAAAADbmlsBQAAAANTRVABAAAADWRhdGFPcGVyYXRpb24AAAAIAAAABnN0YXR1cwAAAA1pbkFzc2V0QW1vdW50AAAABXByaWNlAAAADm91dEFzc2V0QW1vdW50AAAAC3N0YXJ0SGVpZ2h0AAAADnN0YXJ0VGltZXN0YW1wAAAACWVuZEhlaWdodAAAAAxlbmRUaW1lc3RhbXAJAQAAAB5wcml2YXRlRGF0YU9wZXJhdGlvbkFsbFN0cmluZ3MAAAAIBQAAAAZzdGF0dXMJAAGkAAAAAQUAAAANaW5Bc3NldEFtb3VudAkAAaQAAAABBQAAAAVwcmljZQkAAaQAAAABBQAAAA5vdXRBc3NldEFtb3VudAkAAaQAAAABBQAAAAtzdGFydEhlaWdodAkAAaQAAAABBQAAAA5zdGFydFRpbWVzdGFtcAkAAaQAAAABBQAAAAllbmRIZWlnaHQJAAGkAAAAAQUAAAAMZW5kVGltZXN0YW1wAQAAABxkYXRhT3BlcmF0aW9uRXhlY3V0aW9uVXBkYXRlAAAAAwAAAA1jdXJyT3BlckFycmF5AAAACW5ld1N0YXR1cwAAAA9uZXdFbmRUaW1lc3RhbXAJAQAAAB5wcml2YXRlRGF0YU9wZXJhdGlvbkFsbFN0cmluZ3MAAAAIBQAAAAluZXdTdGF0dXMJAAGRAAAAAgUAAAANY3Vyck9wZXJBcnJheQUAAAAPSWR4T3BlckluQW1vdW50CQABkQAAAAIFAAAADWN1cnJPcGVyQXJyYXkFAAAADElkeE9wZXJQcmljZQkAAZEAAAACBQAAAA1jdXJyT3BlckFycmF5BQAAABBJZHhPcGVyT3V0QW1vdW50CQABkQAAAAIFAAAADWN1cnJPcGVyQXJyYXkFAAAAEklkeE9wZXJTdGFydEhlaWdodAkAAZEAAAACBQAAAA1jdXJyT3BlckFycmF5BQAAABVJZHhPcGVyU3RhcnRUaW1lc3RhbXAJAAGRAAAAAgUAAAANY3Vyck9wZXJBcnJheQUAAAAQSWR4T3BlckVuZEhlaWdodAkAAaQAAAABBQAAAA9uZXdFbmRUaW1lc3RhbXABAAAAEnJlYWRBc3NldENmZ09yRmFpbAAAAAEAAAAMYmFzZUFzc2V0U3RyBAAAAANrZXkJAQAAAAtrZXlBc3NldENmZwAAAAEFAAAADGJhc2VBc3NldFN0cgkABLUAAAACCQEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAQUAAAADa2V5BQAAAANTRVABAAAAFGluY3JlbWVudFRvdGFsTG9ja2VkAAAAAwAAAANrZXkAAAAQc2hhcmVBc3NldEFtb3VudAAAAA9iYXNlQXNzZXRBbW91bnQEAAAACWRhdGFBcnJheQkBAAAAD3JlYWRUb3RhbExvY2tlZAAAAAEFAAAAA2tleQkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAADa2V5CQEAAAAPZGF0YVRvdGFsTG9ja2VkAAAAAgkAAGQAAAACCQABkQAAAAIFAAAACWRhdGFBcnJheQUAAAATSWR4VG90YWxMb2NrZWRTaGFyZQUAAAAQc2hhcmVBc3NldEFtb3VudAkAAGQAAAACCQABkQAAAAIFAAAACWRhdGFBcnJheQUAAAASSWR4VG90YWxMb2NrZWRCYXNlBQAAAA9iYXNlQXNzZXRBbW91bnQBAAAAFGRlY3JlbWVudFRvdGFsTG9ja2VkAAAAAwAAAANrZXkAAAAQc2hhcmVBc3NldEFtb3VudAAAAA9iYXNlQXNzZXRBbW91bnQEAAAACWRhdGFBcnJheQkBAAAAD3JlYWRUb3RhbExvY2tlZAAAAAEFAAAAA2tleQkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAADa2V5CQEAAAAPZGF0YVRvdGFsTG9ja2VkAAAAAgkAAGUAAAACCQABkQAAAAIFAAAACWRhdGFBcnJheQUAAAATSWR4VG90YWxMb2NrZWRTaGFyZQUAAAAQc2hhcmVBc3NldEFtb3VudAkAAGUAAAACCQABkQAAAAIFAAAACWRhdGFBcnJheQUAAAASSWR4VG90YWxMb2NrZWRCYXNlBQAAAA9iYXNlQXNzZXRBbW91bnQBAAAAFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQAAAAABAAAAAckbWF0Y2gwCQAEIgAAAAEJAQAAABNrZXlNYW5hZ2VyUHVibGljS2V5AAAAAAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFzBQAAAAckbWF0Y2gwCQACWQAAAAEFAAAAAXMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQFAAAABHVuaXQJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IBAAAAHXBlbmRpbmdNYW5hZ2VyUHVibGljS2V5T3JVbml0AAAAAAQAAAAHJG1hdGNoMAkABCIAAAABCQEAAAAaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkAAAAAAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXMFAAAAByRtYXRjaDAJAAJZAAAAAQUAAAABcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAUAAAAEdW5pdAkAAAIAAAABAgAAAAtNYXRjaCBlcnJvcgEAAAANYmFsYW5jZU9yWmVybwAAAAEAAAAHYXNzZXRJZAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABB8AAAABCQEAAAAKa2V5QmFsYW5jZQAAAAEFAAAAB2Fzc2V0SWQAAAAAAAAAAAABAAAAEGdlbmVyaWNDYWxjUHJpY2UAAAAHAAAAB2JhbGFuY2UAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIAAAALYmFzZUFzc2V0SWQAAAAPdG9wVXBCYXNlQW1vdW50AAAADHNoYXJlQXNzZXRJZAAAABZkZWNpbWFsc011bHRCb3RoQXNzZXRzAAAAEWRlY2ltYWxzTXVsdFByaWNlBAAAABB0b3RhbExvY2tlZEFycmF5CQEAAAAPcmVhZFRvdGFsTG9ja2VkAAAAAQkBAAAADmtleVRvdGFsTG9ja2VkAAAAAQUAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIEAAAAFXRvdGFsTG9ja2VkQmFzZUFtb3VudAkAAZEAAAACBQAAABB0b3RhbExvY2tlZEFycmF5BQAAABJJZHhUb3RhbExvY2tlZEJhc2UEAAAAEGJhc2VBc3NldEJhbGFuY2UFAAAAB2JhbGFuY2UEAAAAH2Jhc2VBc3NldEJhbGFuY2VDb25zaWRlcmluZ0xvY2sJAABkAAAAAgkAAGUAAAACBQAAABBiYXNlQXNzZXRCYWxhbmNlBQAAABV0b3RhbExvY2tlZEJhc2VBbW91bnQFAAAAD3RvcFVwQmFzZUFtb3VudAMJAABmAAAAAgAAAAAAAAAAAAUAAAAfYmFzZUFzc2V0QmFsYW5jZUNvbnNpZGVyaW5nTG9jawkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAADZiYXNlQXNzZXRCYWxhbmNlQ29uc2lkZXJpbmdMb2NrIDwgMDogYmFzZUFzc2V0QmFsYW5jZT0JAAGkAAAAAQUAAAAQYmFzZUFzc2V0QmFsYW5jZQIAAAAhIGJhc2VBc3NldEJhbGFuY2VDb25zaWRlcmluZ0xvY2s9CQABpAAAAAEFAAAAH2Jhc2VBc3NldEJhbGFuY2VDb25zaWRlcmluZ0xvY2sEAAAADXNoYXJlRW1pc3Npb24ICQEAAAAFdmFsdWUAAAABCQAD7AAAAAEFAAAADHNoYXJlQXNzZXRJZAAAAAhxdWFudGl0eQQAAAAFcHJpY2UDCQAAAAAAAAIFAAAADXNoYXJlRW1pc3Npb24AAAAAAAAAAAAJAABoAAAAAgAAAAAAAAAAAQUAAAARZGVjaW1hbHNNdWx0UHJpY2UJAABrAAAAAwUAAAAfYmFzZUFzc2V0QmFsYW5jZUNvbnNpZGVyaW5nTG9jawUAAAARZGVjaW1hbHNNdWx0UHJpY2UFAAAADXNoYXJlRW1pc3Npb24JAAUXAAAABQUAAAAFcHJpY2UFAAAAEGJhc2VBc3NldEJhbGFuY2UFAAAAFXRvdGFsTG9ja2VkQmFzZUFtb3VudAUAAAAfYmFzZUFzc2V0QmFsYW5jZUNvbnNpZGVyaW5nTG9jawUAAAANc2hhcmVFbWlzc2lvbgEAAAAJY2FsY1ByaWNlAAAABgAAAAdiYWxhbmNlAAAAFGludGVybmFsQmFzZUFzc2V0U3RyAAAAC2Jhc2VBc3NldElkAAAADHNoYXJlQXNzZXRJZAAAABZkZWNpbWFsc011bHRCb3RoQXNzZXRzAAAAEWRlY2ltYWxzTXVsdFByaWNlCQEAAAAQZ2VuZXJpY0NhbGNQcmljZQAAAAcFAAAAB2JhbGFuY2UFAAAAFGludGVybmFsQmFzZUFzc2V0U3RyBQAAAAtiYXNlQXNzZXRJZAAAAAAAAAAAAAUAAAAMc2hhcmVBc3NldElkBQAAABZkZWNpbWFsc011bHRCb3RoQXNzZXRzBQAAABFkZWNpbWFsc011bHRQcmljZQEAAAAbcHJpdmF0ZUN1cnJlbnRTeXNQYXJhbXNSRVNUAAAAAQAAAAxiYXNlQXNzZXRTdHIEAAAAC2Jhc2VBc3NldElkCQACWQAAAAEFAAAADGJhc2VBc3NldFN0cgQAAAAIY2ZnQXJyYXkJAQAAABJyZWFkQXNzZXRDZmdPckZhaWwAAAABBQAAAAxiYXNlQXNzZXRTdHIEAAAADXNoYXJlQXNzZXRTdHIJAAGRAAAAAgUAAAAIY2ZnQXJyYXkFAAAAEklkeENmZ1NoYXJlQXNzZXRJZAQAAAAMc2hhcmVBc3NldElkCQACWQAAAAEFAAAADXNoYXJlQXNzZXRTdHIEAAAAFmRlY2ltYWxzTXVsdEJvdGhBc3NldHMJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAhjZmdBcnJheQUAAAAcSWR4Q2ZnRGVjaW1hbHNNdWx0Qm90aEFzc2V0cwQAAAARZGVjaW1hbHNNdWx0UHJpY2UJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAhjZmdBcnJheQUAAAAXSWR4Q2ZnRGVjaW1hbHNNdWx0UHJpY2UEAAAAFGludGVybmFsQmFzZUFzc2V0U3RyCQABkQAAAAIFAAAACGNmZ0FycmF5BQAAABdJZHhDZmdJbnRlcm5hbEJhc2VBc3NldAQAAAAIc3lzU3RhdGUJAQAAAAljYWxjUHJpY2UAAAAGCQEAAAANYmFsYW5jZU9yWmVybwAAAAEFAAAADGJhc2VBc3NldFN0cgUAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIFAAAAC2Jhc2VBc3NldElkBQAAAAxzaGFyZUFzc2V0SWQFAAAAFmRlY2ltYWxzTXVsdEJvdGhBc3NldHMFAAAAEWRlY2ltYWxzTXVsdFByaWNlCQAFGAAAAAYJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAVwcmljZQgFAAAACHN5c1N0YXRlAAAAAl8xCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAARZGVjaW1hbHNNdWx0UHJpY2UFAAAAEWRlY2ltYWxzTXVsdFByaWNlCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAQYmFzZUFzc2V0QmFsYW5jZQgFAAAACHN5c1N0YXRlAAAAAl8yCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAVdG90YWxMb2NrZWRCYXNlQW1vdW50CAUAAAAIc3lzU3RhdGUAAAACXzMJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAB9iYXNlQXNzZXRCYWxhbmNlQ29uc2lkZXJpbmdMb2NrCAUAAAAIc3lzU3RhdGUAAAACXzQJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1zaGFyZUVtaXNzaW9uCAUAAAAIc3lzU3RhdGUAAAACXzUBAAAAC211c3RNYW5hZ2VyAAAAAQAAAAFpBAAAAAJwZAkAAAIAAAABAgAAABFwZXJtaXNzaW9uIGRlbmllZAQAAAAHJG1hdGNoMAkBAAAAFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQAAAAAAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAApCeXRlVmVjdG9yBAAAAAJwawUAAAAHJG1hdGNoMAMJAAAAAAAAAggFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5BQAAAAJwawYFAAAAAnBkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0AwkAAAAAAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABHRoaXMGBQAAAAJwZAkAAAIAAAABAgAAAAtNYXRjaCBlcnJvcgEAAAAQbXVzdFByb3h5QWRkcmVzcwAAAAIAAAABaQAAAAdhc3NldElkBAAAAAdpc1Byb3h5CQAAAAAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyCQEAAAALdmFsdWVPckVsc2UAAAACCQAEIgAAAAEJAQAAAA9rZXlQcm94eUFkZHJlc3MAAAABBQAAAAdhc3NldElkBQAAAAVFTVBUWQMFAAAAB2lzUHJveHkGBAAAAAtjaGVja0NhbGxlcgkBAAAAC211c3RNYW5hZ2VyAAAAAQUAAAABaQMJAAAAAAAAAgUAAAALY2hlY2tDYWxsZXIFAAAAC2NoZWNrQ2FsbGVyBgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAAKAAAAAWkBAAAAC2NvbnN0cnVjdG9yAAAAAQAAABNhc3NldHNTdG9yZUNvbnRyYWN0BAAAAAtjaGVja0NhbGxlcgkBAAAAC211c3RNYW5hZ2VyAAAAAQUAAAABaQMJAAAAAAAAAgUAAAALY2hlY2tDYWxsZXIFAAAAC2NoZWNrQ2FsbGVyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAABZrZXlBc3NldHNTdG9yZUNvbnRyYWN0AAAAAAUAAAATYXNzZXRzU3RvcmVDb250cmFjdAUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAABJhZG1pblJlZ2lzdGVyQXNzZXQAAAAHAAAADGJhc2VBc3NldFN0cgAAAA5zaGFyZUFzc2V0TmFtZQAAAA9zaGFyZUFzc2V0RGVzY3IAAAAOc2hhcmVBc3NldExvZ28AAAAQZ2V0RGVsYXlpbkJsb2NrcwAAABZzaHV0ZG93bk1hbmFnZXJBZGRyZXNzAAAADHByb3h5QWRkcmVzcwQAAAALYmFzZUFzc2V0SWQJAAJZAAAAAQUAAAAMYmFzZUFzc2V0U3RyBAAAAAhkZWNpbWFscwgJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQUAAAALYmFzZUFzc2V0SWQAAAAIZGVjaW1hbHMEAAAABWNoZWNrCQEAAAALbXVzdE1hbmFnZXIAAAABBQAAAAFpAwkAAAAAAAACBQAAAAVjaGVjawUAAAAFY2hlY2sDCQEAAAACIT0AAAACCQAEJQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAFnNodXRkb3duTWFuYWdlckFkZHJlc3MFAAAAFnNodXRkb3duTWFuYWdlckFkZHJlc3MJAAACAAAAAQIAAAAeaW52YWxpZCBzaHV0ZG93bk1hbmFnZXJBZGRyZXNzAwkAAGYAAAACAAAAAAAAAAAABQAAABBnZXREZWxheWluQmxvY2tzCQAAAgAAAAEJAAEsAAAAAgIAAAAZaW52YWxpZCBnZXREZWxheWluQmxvY2tzPQkAAaQAAAABBQAAABBnZXREZWxheWluQmxvY2tzBAAAABVzaGFyZUFzc2V0SXNzdWVBY3Rpb24JAARCAAAABQUAAAAOc2hhcmVBc3NldE5hbWUFAAAAD3NoYXJlQXNzZXREZXNjcgAAAAAAAAAAAQUAAAAIZGVjaW1hbHMGBAAAAAxzaGFyZUFzc2V0SWQJAAQ4AAAAAQUAAAAVc2hhcmVBc3NldElzc3VlQWN0aW9uBAAAAA1zaGFyZUFzc2V0U3RyCQACWAAAAAEFAAAADHNoYXJlQXNzZXRJZAQAAAARZGVjaW1hbHNNdWx0UHJpY2UJAABoAAAAAgkAAGgAAAACAAAAAAAAAABkAAAAAAAAAAPoAAAAAAAAAAPoBAAAABZkZWNpbWFsc011bHRCb3RoQXNzZXRzCQAAbAAAAAYAAAAAAAAAAAoAAAAAAAAAAAAFAAAACGRlY2ltYWxzAAAAAAAAAAAAAAAAAAAAAAAABQAAAARET1dOBAAAAApzdGFydFByaWNlCQAAaAAAAAIAAAAAAAAAAAEFAAAAEWRlY2ltYWxzTXVsdFByaWNlBAAAABRpbnRlcm5hbEJhc2VBc3NldHRJZAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzCQEAAAAWa2V5TmV4dEludGVybmFsQXNzZXRJZAAAAAAAAAAAAAAAAAAEAAAAFGludGVybmFsQmFzZUFzc2V0U3RyCQABpAAAAAEFAAAAFGludGVybmFsQmFzZUFzc2V0dElkBAAAAA5jcmVhdGVPclVwZGF0ZQkAA/wAAAAECQEAAAATYXNzZXRzU3RvcmVDb250cmFjdAAAAAACAAAADmNyZWF0ZU9yVXBkYXRlCQAETAAAAAIFAAAADXNoYXJlQXNzZXRTdHIJAARMAAAAAgUAAAAOc2hhcmVBc3NldExvZ28JAARMAAAAAgcFAAAAA25pbAUAAAADbmlsAwkAAAAAAAACBQAAAA5jcmVhdGVPclVwZGF0ZQUAAAAOY3JlYXRlT3JVcGRhdGUEAAAACGFkZExhYmVsCQAD/AAAAAQJAQAAABNhc3NldHNTdG9yZUNvbnRyYWN0AAAAAAIAAAAIYWRkTGFiZWwJAARMAAAAAgUAAAANc2hhcmVBc3NldFN0cgkABEwAAAACAgAAAARERUZJBQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAAIYWRkTGFiZWwFAAAACGFkZExhYmVsCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAAtrZXlBc3NldENmZwAAAAEFAAAADGJhc2VBc3NldFN0cgkBAAAADGRhdGFBc3NldENmZwAAAAUFAAAADXNoYXJlQXNzZXRTdHIFAAAAFGludGVybmFsQmFzZUFzc2V0U3RyBQAAABZkZWNpbWFsc011bHRCb3RoQXNzZXRzBQAAABFkZWNpbWFsc011bHRQcmljZQUAAAAQZ2V0RGVsYXlpbkJsb2NrcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAfa2V5TWFwcGluZ3NJbnRlcm5hbDJiYXNlQXNzZXRJZAAAAAEFAAAAFGludGVybmFsQmFzZUFzc2V0dElkBQAAAAxiYXNlQXNzZXRTdHIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAH2tleU1hcHBpbmdzQmFzZUFzc2V0MmludGVybmFsSWQAAAABBQAAAAxiYXNlQXNzZXRTdHIFAAAAFGludGVybmFsQmFzZUFzc2V0U3RyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAABxrZXlNYXBwaW5nc1NoYXJlMmJhc2VBc3NldElkAAAAAQUAAAANc2hhcmVBc3NldFN0cgUAAAAMYmFzZUFzc2V0U3RyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAABxrZXlNYXBwaW5nc0Jhc2VBc3NldDJzaGFyZUlkAAAAAQUAAAAMYmFzZUFzc2V0U3RyBQAAAA1zaGFyZUFzc2V0U3RyCQAETAAAAAIJAQAAAAxCb29sZWFuRW50cnkAAAACCQEAAAAXa2V5U2h1dGRvd25QdXRPcGVyYXRpb24AAAABBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAEmtleVNodXRkb3duTWFuYWdlcgAAAAEFAAAAFGludGVybmFsQmFzZUFzc2V0U3RyBQAAABZzaHV0ZG93bk1hbmFnZXJBZGRyZXNzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAWa2V5TmV4dEludGVybmFsQXNzZXRJZAAAAAAJAABkAAAAAgUAAAAUaW50ZXJuYWxCYXNlQXNzZXR0SWQAAAAAAAAAAAEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAAxrZXlQcmljZUxhc3QAAAABBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgUAAAAKc3RhcnRQcmljZQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAD2tleVByaWNlSGlzdG9yeQAAAAMFAAAAFGludGVybmFsQmFzZUFzc2V0U3RyBQAAAAZoZWlnaHQIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wBQAAAApzdGFydFByaWNlCQAETAAAAAIFAAAAFXNoYXJlQXNzZXRJc3N1ZUFjdGlvbgkABEwAAAACCQEAAAAEQnVybgAAAAIFAAAADHNoYXJlQXNzZXRJZAAAAAAAAAAAAQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAPa2V5UHJveHlBZGRyZXNzAAAAAQUAAAAMYmFzZUFzc2V0U3RyBQAAAAxwcm94eUFkZHJlc3MFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAAAtzaHV0ZG93blB1dAAAAAEAAAATaW50ZXJuYWxCYXNlQXNzZXRJZAQAAAAWaW50ZXJuYWxCYXNlQXNzZXRJZFN0cgkAAaQAAAABBQAAABNpbnRlcm5hbEJhc2VBc3NldElkBAAAAA5iYXNlQXNzZXRJZFN0cgkBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEJAQAAAB9rZXlNYXBwaW5nc0ludGVybmFsMmJhc2VBc3NldElkAAAAAQUAAAATaW50ZXJuYWxCYXNlQXNzZXRJZAQAAAAWc2h1dGRvd25NYW5hZ2VyQWRkcmVzcwkBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEJAQAAABJrZXlTaHV0ZG93bk1hbmFnZXIAAAABBQAAABZpbnRlcm5hbEJhc2VBc3NldElkU3RyAwkAAGYAAAACAAAAAAAAAAABCQABMQAAAAEFAAAADmJhc2VBc3NldElkU3RyCQAAAgAAAAECAAAAG2ludmFsaWQgaW50ZXJuYWxCYXNlQXNzZXRJZAMJAQAAAAIhPQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAABZzaHV0ZG93bk1hbmFnZXJBZGRyZXNzCQAAAgAAAAECAAAADWFjY2VzcyBkZW5pZWQJAARMAAAAAgkBAAAADEJvb2xlYW5FbnRyeQAAAAIJAQAAABdrZXlTaHV0ZG93blB1dE9wZXJhdGlvbgAAAAEJAAGkAAAAAQUAAAATaW50ZXJuYWxCYXNlQXNzZXRJZAYFAAAAA25pbAAAAAFpAQAAAANwdXQAAAAABAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAAC2Jhc2VBc3NldElkCQEAAAAFdmFsdWUAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQEAAAADGJhc2VBc3NldFN0cgkAAlgAAAABBQAAAAtiYXNlQXNzZXRJZAQAAAAOdXNlckFkZHJlc3NTdHIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAAAhjZmdBcnJheQkBAAAAEnJlYWRBc3NldENmZ09yRmFpbAAAAAEFAAAADGJhc2VBc3NldFN0cgQAAAANc2hhcmVBc3NldFN0cgkAAZEAAAACBQAAAAhjZmdBcnJheQUAAAASSWR4Q2ZnU2hhcmVBc3NldElkBAAAAAxzaGFyZUFzc2V0SWQJAAJZAAAAAQUAAAANc2hhcmVBc3NldFN0cgQAAAAWZGVjaW1hbHNNdWx0Qm90aEFzc2V0cwkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAACGNmZ0FycmF5BQAAABxJZHhDZmdEZWNpbWFsc011bHRCb3RoQXNzZXRzBAAAABFkZWNpbWFsc011bHRQcmljZQkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAACGNmZ0FycmF5BQAAABdJZHhDZmdEZWNpbWFsc011bHRQcmljZQQAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIJAAGRAAAAAgUAAAAIY2ZnQXJyYXkFAAAAF0lkeENmZ0ludGVybmFsQmFzZUFzc2V0BAAAAAxpc1B1dEJsb2NrZWQJAQAAABBnZXRCb29sZWFuT3JGYWlsAAAAAQkBAAAAF2tleVNodXRkb3duUHV0T3BlcmF0aW9uAAAAAQUAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIDBQAAAAxpc1B1dEJsb2NrZWQJAAACAAAAAQIAAAAYcHV0IG9wZXJhdGlvbiBpcyBibG9ja2VkBAAAAAdiYWxhbmNlCQAAZAAAAAIJAQAAAA1iYWxhbmNlT3JaZXJvAAAAAQUAAAAMYmFzZUFzc2V0U3RyCAUAAAADcG10AAAABmFtb3VudAQAAAAFcHJpY2UICQEAAAAJY2FsY1ByaWNlAAAABgUAAAAHYmFsYW5jZQUAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIFAAAAC2Jhc2VBc3NldElkBQAAAAxzaGFyZUFzc2V0SWQFAAAAFmRlY2ltYWxzTXVsdEJvdGhBc3NldHMFAAAAEWRlY2ltYWxzTXVsdFByaWNlAAAAAl8xBAAAABBzaGFyZUFzc2V0QW1vdW50CQAAawAAAAMIBQAAAANwbXQAAAAGYW1vdW50BQAAABFkZWNpbWFsc011bHRQcmljZQUAAAAFcHJpY2UJAARMAAAAAgkBAAAAB1JlaXNzdWUAAAADBQAAAAxzaGFyZUFzc2V0SWQFAAAAEHNoYXJlQXNzZXRBbW91bnQGCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAQc2hhcmVBc3NldEFtb3VudAUAAAAMc2hhcmVBc3NldElkCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAAxrZXlPcGVyYXRpb24AAAAEAgAAAAFQBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgUAAAAOdXNlckFkZHJlc3NTdHIJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAkBAAAADWRhdGFPcGVyYXRpb24AAAAIAgAAAAhGSU5JU0hFRAgFAAAAA3BtdAAAAAZhbW91bnQFAAAABXByaWNlBQAAABBzaGFyZUFzc2V0QW1vdW50BQAAAAZoZWlnaHQIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wBQAAAAZoZWlnaHQIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAAAV2YWx1ZQAAAAEJAAQiAAAAAQkBAAAAD2tleVByb3h5QWRkcmVzcwAAAAEFAAAADGJhc2VBc3NldFN0cggFAAAAA3BtdAAAAAZhbW91bnQFAAAAC2Jhc2VBc3NldElkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAKa2V5QmFsYW5jZQAAAAEFAAAADGJhc2VBc3NldFN0cgUAAAAHYmFsYW5jZQUAAAADbmlsAAAAAWkBAAAAEHN1Ym1pdEdldFJlcXVlc3QAAAAABAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAADHNoYXJlQXNzZXRJZAkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkBAAAAA1zaGFyZUFzc2V0U3RyCQACWAAAAAEFAAAADHNoYXJlQXNzZXRJZAQAAAAMY2FsbGVyUHViU3RyCQACWAAAAAEIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQQAAAALdXNlckFkZHJlc3MIBQAAAAFpAAAABmNhbGxlcgQAAAAOdXNlckFkZHJlc3NTdHIJAAQlAAAAAQUAAAALdXNlckFkZHJlc3MEAAAAEHNoYXJlQXNzZXRBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50BAAAAAxiYXNlQXNzZXRTdHIJAQAAAA9nZXRTdHJpbmdPckZhaWwAAAABCQEAAAAca2V5TWFwcGluZ3NTaGFyZTJiYXNlQXNzZXRJZAAAAAEFAAAADXNoYXJlQXNzZXRTdHIEAAAAC2Jhc2VBc3NldElkCQACWQAAAAEFAAAADGJhc2VBc3NldFN0cgQAAAAIY2ZnQXJyYXkJAQAAABJyZWFkQXNzZXRDZmdPckZhaWwAAAABBQAAAAxiYXNlQXNzZXRTdHIEAAAAFmRlY2ltYWxzTXVsdEJvdGhBc3NldHMJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAhjZmdBcnJheQUAAAAcSWR4Q2ZnRGVjaW1hbHNNdWx0Qm90aEFzc2V0cwQAAAARZGVjaW1hbHNNdWx0UHJpY2UJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAhjZmdBcnJheQUAAAAXSWR4Q2ZnRGVjaW1hbHNNdWx0UHJpY2UEAAAADmdldERlbGF5QmxvY2tzCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAIY2ZnQXJyYXkFAAAAFElkeENmZ0dldERlbGF5QmxvY2tzBAAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgkAAZEAAAACBQAAAAhjZmdBcnJheQUAAAAXSWR4Q2ZnSW50ZXJuYWxCYXNlQXNzZXQEAAAABXByaWNlCAkBAAAACWNhbGNQcmljZQAAAAYJAQAAAA1iYWxhbmNlT3JaZXJvAAAAAQUAAAAMYmFzZUFzc2V0U3RyBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgUAAAALYmFzZUFzc2V0SWQFAAAADHNoYXJlQXNzZXRJZAUAAAAWZGVjaW1hbHNNdWx0Qm90aEFzc2V0cwUAAAARZGVjaW1hbHNNdWx0UHJpY2UAAAACXzEEAAAAD2Jhc2VBc3NldEFtb3VudAkAAGsAAAADBQAAABBzaGFyZUFzc2V0QW1vdW50BQAAAAVwcmljZQUAAAARZGVjaW1hbHNNdWx0UHJpY2UEAAAADG9wZXJhdGlvbktleQkBAAAADGtleU9wZXJhdGlvbgAAAAQCAAAAAUcFAAAAFGludGVybmFsQmFzZUFzc2V0U3RyBQAAAA51c2VyQWRkcmVzc1N0cgkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBAAAAA1vcGVyYXRpb25EYXRhCQEAAAANZGF0YU9wZXJhdGlvbgAAAAgCAAAAB1BFTkRJTkcFAAAAEHNoYXJlQXNzZXRBbW91bnQFAAAABXByaWNlBQAAAA9iYXNlQXNzZXRBbW91bnQFAAAABmhlaWdodAgFAAAACWxhc3RCbG9jawAAAAl0aW1lc3RhbXAJAABkAAAAAgUAAAAGaGVpZ2h0BQAAAA5nZXREZWxheUJsb2NrcwAAAAAAAAAAAAQAAAAHYmFsYW5jZQkBAAAADWJhbGFuY2VPclplcm8AAAABBQAAAAxiYXNlQXNzZXRTdHIJAARMAAAAAgkBAAAABEJ1cm4AAAACBQAAAAxzaGFyZUFzc2V0SWQFAAAAEHNoYXJlQXNzZXRBbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAMb3BlcmF0aW9uS2V5BQAAAA1vcGVyYXRpb25EYXRhCQAETAAAAAIJAQAAABRpbmNyZW1lbnRUb3RhbExvY2tlZAAAAAMJAQAAAA5rZXlUb3RhbExvY2tlZAAAAAEFAAAAFGludGVybmFsQmFzZUFzc2V0U3RyBQAAABBzaGFyZUFzc2V0QW1vdW50BQAAAA9iYXNlQXNzZXRBbW91bnQJAARMAAAAAgkBAAAAFGluY3JlbWVudFRvdGFsTG9ja2VkAAAAAwkBAAAAFGtleVRvdGFsTG9ja2VkQnlVc2VyAAAAAgUAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIFAAAADnVzZXJBZGRyZXNzU3RyBQAAABBzaGFyZUFzc2V0QW1vdW50BQAAAA9iYXNlQXNzZXRBbW91bnQFAAAAA25pbAAAAAFpAQAAABFleGVjdXRlR2V0UmVxdWVzdAAAAAMAAAAMYmFzZUFzc2V0U3RyAAAADnVzZXJBZGRyZXNzU3RyAAAACmdldFR4SWRTdHIEAAAAC3VzZXJBZGRyZXNzCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAA51c2VyQWRkcmVzc1N0cgQAAAANYXNzZXRDZmdBcnJheQkBAAAAEnJlYWRBc3NldENmZ09yRmFpbAAAAAEFAAAADGJhc2VBc3NldFN0cgQAAAAMc2hhcmVBc3NldElkCQACWQAAAAEJAAGRAAAAAgUAAAANYXNzZXRDZmdBcnJheQUAAAASSWR4Q2ZnU2hhcmVBc3NldElkBAAAAAtiYXNlQXNzZXRJZAkAAlkAAAABBQAAAAxiYXNlQXNzZXRTdHIEAAAAFGludGVybmFsQmFzZUFzc2V0U3RyCQABkQAAAAIFAAAADWFzc2V0Q2ZnQXJyYXkFAAAAF0lkeENmZ0ludGVybmFsQmFzZUFzc2V0BAAAAAxvcGVyYXRpb25LZXkJAQAAAAxrZXlPcGVyYXRpb24AAAAEAgAAAAFHBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgUAAAAOdXNlckFkZHJlc3NTdHIFAAAACmdldFR4SWRTdHIEAAAADm9wZXJhdGlvbkFycmF5CQAEtQAAAAIJAQAAAA9nZXRTdHJpbmdPckZhaWwAAAABBQAAAAxvcGVyYXRpb25LZXkFAAAAA1NFUAQAAAAGc3RhdHVzCQABkQAAAAIFAAAADm9wZXJhdGlvbkFycmF5BQAAAA1JZHhPcGVyU3RhdHVzBAAAAAllbmRIZWlnaHQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAA5vcGVyYXRpb25BcnJheQUAAAAQSWR4T3BlckVuZEhlaWdodAQAAAANaW5TaGFyZUFtb3VudAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAADm9wZXJhdGlvbkFycmF5BQAAAA9JZHhPcGVySW5BbW91bnQEAAAADW91dEJhc2VBbW91bnQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAA5vcGVyYXRpb25BcnJheQUAAAAQSWR4T3Blck91dEFtb3VudAMJAQAAAAIhPQAAAAIFAAAABnN0YXR1cwIAAAAHUEVORElORwkBAAAADmZhaWxFeGVjdXRlR2V0AAAABAIAAAAVU3RhdHVzIGlzIG5vdCBQRU5ESU5HBQAAAAxiYXNlQXNzZXRTdHIFAAAADnVzZXJBZGRyZXNzU3RyBQAAAApnZXRUeElkU3RyAwkAAGYAAAACBQAAAAllbmRIZWlnaHQFAAAABmhlaWdodAkBAAAADmZhaWxFeGVjdXRlR2V0AAAABAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAKRW5kSGVpZ2h0WwkAAaQAAAABBQAAAAllbmRIZWlnaHQCAAAABF0gPiAJAAGkAAAAAQUAAAAGaGVpZ2h0BQAAAAxiYXNlQXNzZXRTdHIFAAAADnVzZXJBZGRyZXNzU3RyBQAAAApnZXRUeElkU3RyCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAC3VzZXJBZGRyZXNzBQAAAA1vdXRCYXNlQW1vdW50BQAAAAtiYXNlQXNzZXRJZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAxvcGVyYXRpb25LZXkJAQAAABxkYXRhT3BlcmF0aW9uRXhlY3V0aW9uVXBkYXRlAAAAAwUAAAAOb3BlcmF0aW9uQXJyYXkCAAAACEZJTklTSEVECAUAAAAJbGFzdEJsb2NrAAAACXRpbWVzdGFtcAkABEwAAAACCQEAAAAUZGVjcmVtZW50VG90YWxMb2NrZWQAAAADCQEAAAAOa2V5VG90YWxMb2NrZWQAAAABBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgUAAAANaW5TaGFyZUFtb3VudAUAAAANb3V0QmFzZUFtb3VudAkABEwAAAACCQEAAAAUZGVjcmVtZW50VG90YWxMb2NrZWQAAAADCQEAAAAUa2V5VG90YWxMb2NrZWRCeVVzZXIAAAACBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgUAAAAOdXNlckFkZHJlc3NTdHIFAAAADWluU2hhcmVBbW91bnQFAAAADW91dEJhc2VBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAAprZXlCYWxhbmNlAAAAAQUAAAAMYmFzZUFzc2V0U3RyCQAAZQAAAAIJAQAAAA1iYWxhbmNlT3JaZXJvAAAAAQUAAAAMYmFzZUFzc2V0U3RyBQAAAA1vdXRCYXNlQW1vdW50BQAAAANuaWwAAAABaQEAAAAMdG9wVXBCYWxhbmNlAAAAAgAAAAxiYXNlQXNzZXRTdHIAAAAFZGVsdGEEAAAADWFzc2V0Q2ZnQXJyYXkJAQAAABJyZWFkQXNzZXRDZmdPckZhaWwAAAABBQAAAAxiYXNlQXNzZXRTdHIEAAAAA3BtdAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAKcG10QXNzZXRJZAkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkBAAAAAtwbXRBc3NldFN0cgkAAlgAAAABBQAAAApwbXRBc3NldElkBAAAAAxzaGFyZUFzc2V0SWQJAAJZAAAAAQkAAZEAAAACBQAAAA1hc3NldENmZ0FycmF5BQAAABJJZHhDZmdTaGFyZUFzc2V0SWQEAAAAFmRlY2ltYWxzTXVsdEJvdGhBc3NldHMJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAA1hc3NldENmZ0FycmF5BQAAABxJZHhDZmdEZWNpbWFsc011bHRCb3RoQXNzZXRzBAAAABFkZWNpbWFsc011bHRQcmljZQkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAADWFzc2V0Q2ZnQXJyYXkFAAAAF0lkeENmZ0RlY2ltYWxzTXVsdFByaWNlBAAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgkAAZEAAAACBQAAAA1hc3NldENmZ0FycmF5BQAAABdJZHhDZmdJbnRlcm5hbEJhc2VBc3NldAQAAAASdG9wVXBMYXN0SGVpZ2h0S0VZCQEAAAASa2V5VG9wVXBMYXN0SGVpZ2h0AAAAAgUAAAAUaW50ZXJuYWxCYXNlQXNzZXRTdHIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAAA90b3BVcExhc3RIZWlnaHQJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwUAAAASdG9wVXBMYXN0SGVpZ2h0S0VZAAAAAAAAAAAABAAAAAZjaGVja3MJAARMAAAAAgkBAAAAEG11c3RQcm94eUFkZHJlc3MAAAACBQAAAAFpBQAAAAxiYXNlQXNzZXRTdHIJAARMAAAAAgMJAQAAAAIhPQAAAAIFAAAAD3RvcFVwTGFzdEhlaWdodAUAAAAGaGVpZ2h0BgkAAAIAAAABAgAAACNvbmx5IG9uZSB0b3BVcCBwZXIgYmxvY2sgaXMgYWxsb3dlZAUAAAADbmlsAwkAAAAAAAACBQAAAAZjaGVja3MFAAAABmNoZWNrcwMJAQAAAAIhPQAAAAIFAAAADGJhc2VBc3NldFN0cgUAAAALcG10QXNzZXRTdHIJAAACAAAAAQIAAAA+YXR0YWNoZWQgcGF5bWVudCdzIGFzc2V0IGlkIGlzIE5PVCBtYXRjaGVkIHBhc3NlZCBiYXNlQXNzZXRTdHIDCQAAZgAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAACAAAAAQIAAAAgb25seSBvbmUgcGF5bWVudCBjYW4gYmUgYXR0YWNoZWQEAAAACm5ld0JhbGFuY2UJAABkAAAAAgkBAAAADWJhbGFuY2VPclplcm8AAAABBQAAAAtwbXRBc3NldFN0cgUAAAAFZGVsdGEEAAAABXByaWNlCAkBAAAAEGdlbmVyaWNDYWxjUHJpY2UAAAAHBQAAAApuZXdCYWxhbmNlBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgUAAAAKcG10QXNzZXRJZAgFAAAAA3BtdAAAAAZhbW91bnQFAAAADHNoYXJlQXNzZXRJZAUAAAAWZGVjaW1hbHNNdWx0Qm90aEFzc2V0cwUAAAARZGVjaW1hbHNNdWx0UHJpY2UAAAACXzEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAAxrZXlQcmljZUxhc3QAAAABBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgUAAAAFcHJpY2UJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAA9rZXlQcmljZUhpc3RvcnkAAAADBQAAABRpbnRlcm5hbEJhc2VBc3NldFN0cgUAAAAGaGVpZ2h0CAUAAAAJbGFzdEJsb2NrAAAACXRpbWVzdGFtcAUAAAAFcHJpY2UJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAEnRvcFVwTGFzdEhlaWdodEtFWQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAKa2V5QmFsYW5jZQAAAAEFAAAAC3BtdEFzc2V0U3RyBQAAAApuZXdCYWxhbmNlBQAAAANuaWwJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAAFGN1cnJlbnRTeXNQYXJhbXNSRVNUAAAAAQAAAAxiYXNlQXNzZXRTdHIEAAAADXN5c1N0YXRlVHVwbGUJAQAAABtwcml2YXRlQ3VycmVudFN5c1BhcmFtc1JFU1QAAAABBQAAAAxiYXNlQXNzZXRTdHIEAAAABXByaWNlCAgFAAAADXN5c1N0YXRlVHVwbGUAAAACXzEAAAAFdmFsdWUEAAAAEWRlY2ltYWxzTXVsdFByaWNlCAgFAAAADXN5c1N0YXRlVHVwbGUAAAACXzIAAAAFdmFsdWUEAAAAEGJhc2VBc3NldEJhbGFuY2UICAUAAAANc3lzU3RhdGVUdXBsZQAAAAJfMwAAAAV2YWx1ZQQAAAAVdG90YWxMb2NrZWRCYXNlQW1vdW50CAgFAAAADXN5c1N0YXRlVHVwbGUAAAACXzQAAAAFdmFsdWUEAAAAH2Jhc2VBc3NldEJhbGFuY2VDb25zaWRlcmluZ0xvY2sICAUAAAANc3lzU3RhdGVUdXBsZQAAAAJfNQAAAAV2YWx1ZQQAAAANc2hhcmVFbWlzc2lvbggIBQAAAA1zeXNTdGF0ZVR1cGxlAAAAAl82AAAABXZhbHVlBAAAAAhyZXN0RGF0YQkABLkAAAACCQAETAAAAAICAAAAGXN0YXJ0Q3VycmVudFN5c1BhcmFtc1JFU1QJAARMAAAAAgkAAaQAAAABBQAAAAVwcmljZQkABEwAAAACCQABpAAAAAEFAAAAEWRlY2ltYWxzTXVsdFByaWNlCQAETAAAAAIJAAGkAAAAAQUAAAAQYmFzZUFzc2V0QmFsYW5jZQkABEwAAAACCQABpAAAAAEFAAAAFXRvdGFsTG9ja2VkQmFzZUFtb3VudAkABEwAAAACCQABpAAAAAEFAAAAH2Jhc2VBc3NldEJhbGFuY2VDb25zaWRlcmluZ0xvY2sJAARMAAAAAgkAAaQAAAABBQAAAA1zaGFyZUVtaXNzaW9uCQAETAAAAAICAAAAF2VuZEN1cnJlbnRTeXNQYXJhbXNSRVNUBQAAAANuaWwFAAAAA1NFUAkAAAIAAAABBQAAAAhyZXN0RGF0YQAAAAFpAQAAAApzZXRNYW5hZ2VyAAAAAQAAABdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQQAAAALY2hlY2tDYWxsZXIJAQAAAAttdXN0TWFuYWdlcgAAAAEFAAAAAWkDCQAAAAAAAAIFAAAAC2NoZWNrQ2FsbGVyBQAAAAtjaGVja0NhbGxlcgQAAAAVY2hlY2tNYW5hZ2VyUHVibGljS2V5CQACWQAAAAEFAAAAF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AwkAAAAAAAACBQAAABVjaGVja01hbmFnZXJQdWJsaWNLZXkFAAAAFWNoZWNrTWFuYWdlclB1YmxpY0tleQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkAAAAABQAAABdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAAOY29uZmlybU1hbmFnZXIAAAAABAAAAAJwbQkBAAAAHXBlbmRpbmdNYW5hZ2VyUHVibGljS2V5T3JVbml0AAAAAAQAAAAFaGFzUE0DCQEAAAAJaXNEZWZpbmVkAAAAAQUAAAACcG0GCQAAAgAAAAECAAAAEm5vIHBlbmRpbmcgbWFuYWdlcgMJAAAAAAAAAgUAAAAFaGFzUE0FAAAABWhhc1BNBAAAAAdjaGVja1BNAwkAAAAAAAACCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkJAQAAAAV2YWx1ZQAAAAEFAAAAAnBtBgkAAAIAAAABAgAAABt5b3UgYXJlIG5vdCBwZW5kaW5nIG1hbmFnZXIDCQAAAAAAAAIFAAAAB2NoZWNrUE0FAAAAB2NoZWNrUE0JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAE2tleU1hbmFnZXJQdWJsaWNLZXkAAAAACQACWAAAAAEJAQAAAAV2YWx1ZQAAAAEFAAAAAnBtCQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAQAAABprZXlQZW5kaW5nTWFuYWdlclB1YmxpY0tleQAAAAAFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAQAAAAPdGFyZ2V0UHVibGljS2V5BAAAAAckbWF0Y2gwCQEAAAAWbWFuYWdlclB1YmxpY0tleU9yVW5pdAAAAAADCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAnBrBQAAAAckbWF0Y2gwBQAAAAJwawMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleQkAAAIAAAABAgAAAAtNYXRjaCBlcnJvcgkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAD3RhcmdldFB1YmxpY0tleSdDa1g=",
    "height": 2097569,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3W6Fthu946ThxLknMaoSv6KNatFmp2EUMhM9je5m6VG7
Next: 6YLVY2C9MsJbGBbqQqgMG9mkwuPTmgaAa8eXsHB8DyCT

Diff: 

OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let lPdecimals = 8
5-
6-let scale8 = 100000000
7-
8-let scale8BigInt = toBigInt(100000000)
9-
10-let scale18 = toBigInt(1000000000000000000)
11-
12-let zeroBigInt = toBigInt(0)
13-
144 let SEP = "__"
155 
166 let EMPTY = ""
177 
18-let PoolActive = 1
19-
20-let PoolPutDisabled = 2
21-
22-let PoolMatcherDisabled = 3
23-
24-let PoolShutdown = 4
25-
26-let idxPoolAddress = 1
27-
28-let idxPoolStatus = 2
29-
30-let idxPoolLPAssetId = 3
31-
32-let idxAmtAssetId = 4
33-
34-let idxPriceAssetId = 5
35-
36-let idxAmtAssetDcm = 6
37-
38-let idxPriceAssetDcm = 7
39-
40-let idxIAmtAssetId = 8
41-
42-let idxIPriceAssetId = 9
43-
44-let idxLPAssetDcm = 10
45-
46-let idxPoolAmtAssetAmt = 1
47-
48-let idxPoolPriceAssetAmt = 2
49-
50-let idxPoolLPAssetAmt = 3
51-
52-let idxFactoryStakingContract = 1
53-
54-let idxFactorySlippageContract = 7
55-
56-func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult))
8+func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), ("No data for this.key=" + key))
579 
5810 
59-func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18))
11+func getBooleanOrFail (key) = valueOrErrorMessage(getBoolean(this, key), ("No data for this.key=" + key))
6012 
6113 
62-func toScale (amt,resScale,curScale) = fraction(amt, resScale, curScale)
14+func keyManagerPublicKey () = makeString(["%s", "managerPublicKey"], SEP)
6315 
6416 
65-func abs (val) = if ((zeroBigInt > val))
66-    then -(val)
67-    else val
17+func keyPendingManagerPublicKey () = makeString(["%s", "pendingManagerPublicKey"], SEP)
6818 
6919 
70-func keyFactoryContract () = "%s__factoryContract"
20+func failExecuteGet (msg,baseAssetStr,userAddressStr,getTxIdStr) = throw(((((((msg + ": baseAssetStr=") + baseAssetStr) + " userAddressStr=") + userAddressStr) + " getTxIdStr=") + getTxIdStr))
7121 
7222 
73-func keyManagerPublicKey () = "%s__managerPublicKey"
23+func keyAssetsStoreContract () = makeString(["%s", "assetsStoreContract"], SEP)
7424 
7525 
76-func keyPriceLast () = "%s%s__price__last"
26+func keyAssetCfg (baseAssetStr) = ("%s%s%s__config__asset__" + baseAssetStr)
7727 
7828 
79-func keyPriceHistory (h,timestamp) = makeString(["%s%s%d%d__price__history", toString(h), toString(timestamp)], SEP)
29+func keyProxyAddress (assetId) = makeString(["%s%s", "proxyAddress", assetId], SEP)
8030 
8131 
82-func keyPutActionByUser (userAddress,txId) = ((("%s%s%s__P__" + userAddress) + "__") + txId)
32+func keyBalance (assetId) = makeString(["%s%s", "balance", assetId], SEP)
8333 
8434 
85-func keyGetActionByUser (userAddress,txId) = ((("%s%s%s__G__" + userAddress) + "__") + txId)
35+func keyNextInternalAssetId () = "%s__nextInternalAssetId"
8636 
8737 
88-func keyAmtAsset () = "%s__amountAsset"
38+func keyPriceLast (internalBasetAssetStr) = ("%s%s%d__price__last__" + internalBasetAssetStr)
8939 
9040 
91-func keyPriceAsset () = "%s__priceAsset"
41+func keyTopUpLastHeight (internalBasetAssetStr,sender) = makeString(["%s%s%s%d%s__topup__last__height", internalBasetAssetStr, sender], SEP)
9242 
9343 
94-func keyKHistoric (h,timestamp) = makeString(["%s%s%d%d__K_history", toString(h), toString(timestamp)], SEP)
44+func keyPriceHistory (internalBasetAssetStr,h,timestamp) = makeString(["%s%s%d%d%d__price__history", internalBasetAssetStr, toString(h), toString(timestamp)], SEP)
9545 
9646 
97-func keyFactoryConfig () = "%s__factoryConfig"
47+func keyTotalLocked (internalBasetAssetStr) = ("%s%s%d__total__locked__" + internalBasetAssetStr)
9848 
9949 
100-func keyMatcherPub () = "%s%s__matcher__publicKey"
50+func keyTotalLockedByUser (internalBaseAssetStr,userAddressStr) = makeString(["%s%s%d%s__total__locked", internalBaseAssetStr, userAddressStr], SEP)
10151 
10252 
103-func keyMappingPoolContractAddressToPoolAssets (poolContractAddress) = (("%s%s%s__" + poolContractAddress) + "__mappings__poolContract2LpAsset")
104-
105-
106-func keyPoolConfig (iAmtAsset,iPriceAsset) = (((("%d%d%s__" + iAmtAsset) + "__") + iPriceAsset) + "__config")
53+func keyMappingsInternal2baseAssetId (internalBaseAsset) = ("%s%s%d__mappings__internal2baseAssetId__" + toString(internalBaseAsset))
10754 
10855 
10956 func keyMappingsBaseAsset2internalId (baseAssetStr) = ("%s%s%s__mappings__baseAsset2internalId__" + baseAssetStr)
11057 
11158 
112-func keyAllPoolsShutdown () = "%s__shutdown"
59+func keyMappingsShare2baseAssetId (shareAssetStr) = ("%s%s%s__mappings__share2baseAssetId__" + shareAssetStr)
11360 
11461 
115-func keyPoolWeight (contractAddress) = ("%s%s__poolWeight__" + contractAddress)
62+func keyMappingsBaseAsset2shareId (baseAssetStr) = ("%s%s%s__mappings__baseAsset2shareId__" + baseAssetStr)
11663 
11764 
118-func throwOrderError (orderValid,senderValid,matcherValid) = throw(((((("order validation failed: orderValid=" + toString(orderValid)) + " senderValid=") + toString(senderValid)) + " matcherValid=") + toString(matcherValid)))
65+func keyShutdownPutOperation (internalBaseAssetStr) = ("%s%s%d__shutdown__put__" + internalBaseAssetStr)
11966 
12067 
121-func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
68+func keyShutdownManager (internalBaseAssetStr) = ("%s%s%d__shutdown__manager__" + internalBaseAssetStr)
12269 
12370 
124-func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
71+func assetsStoreContract () = addressFromStringValue(value(getString(keyAssetsStoreContract())))
12572 
12673 
127-let factoryContract = addressFromStringValue(getStringOrFail(this, keyFactoryContract()))
74+let IdxCfgShareAssetId = 1
12875 
129-func isGlobalShutdown () = valueOrElse(getBoolean(factoryContract, keyAllPoolsShutdown()), false)
76+let IdxCfgInternalBaseAsset = 2
77+
78+let IdxCfgDecimalsMultBothAssets = 3
79+
80+let IdxCfgDecimalsMultPrice = 4
81+
82+let IdxCfgGetDelayBlocks = 5
83+
84+func dataAssetCfg (shareAssetStr,internalBaseAssetStr,decimalsMultBothAssets,decimalsMultPrice,getDelayInBlocks) = makeString(["%s%d%d%d%d", shareAssetStr, internalBaseAssetStr, toString(decimalsMultBothAssets), toString(decimalsMultPrice), toString(getDelayInBlocks)], SEP)
13085 
13186 
132-func getMatcherPubOrFail () = fromBase58String(getStringOrFail(factoryContract, keyMatcherPub()))
87+let IdxTotalLockedShare = 1
88+
89+let IdxTotalLockedBase = 2
90+
91+func dataTotalLocked (shareAssetAmount,baseAssetAmount) = makeString(["%d%d", toString(shareAssetAmount), toString(baseAssetAmount)], SEP)
13392 
13493 
135-func getPoolConfig () = {
136-    let amtAsset = getStringOrFail(this, keyAmtAsset())
137-    let priceAsset = getStringOrFail(this, keyPriceAsset())
138-    let iPriceAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(priceAsset))
139-    let iAmtAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(amtAsset))
140-    split(getStringOrFail(factoryContract, keyPoolConfig(toString(iAmtAsset), toString(iPriceAsset))), SEP)
94+func readTotalLocked (key) = {
95+    let totalLockedArray = split(valueOrElse(getString(this, key), dataTotalLocked(0, 0)), SEP)
96+[-1, parseIntValue(totalLockedArray[IdxTotalLockedShare]), parseIntValue(totalLockedArray[IdxTotalLockedBase])]
14197     }
14298 
14399 
144-func getFactoryConfig () = split(getStringOrFail(factoryContract, keyFactoryConfig()), SEP)
100+func keyOperation (operationType,internalBaseAssetStr,userAddress,txId) = makeString(["%s%d%s%s", operationType, internalBaseAssetStr, userAddress, txId], SEP)
145101 
146102 
147-func dataPutActionInfo (inAmtAssetAmt,inPriceAssetAmt,outLpAmt,price,slippageTolerancePassedByUser,slippageToleranceReal,txHeight,txTimestamp,slipageAmtAssetAmt,slipagePriceAssetAmt) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(inAmtAssetAmt), toString(inPriceAssetAmt), toString(outLpAmt), toString(price), toString(slippageTolerancePassedByUser), toString(slippageToleranceReal), toString(txHeight), toString(txTimestamp), toString(slipageAmtAssetAmt), toString(slipagePriceAssetAmt)], SEP)
103+let IdxOperStatus = 1
104+
105+let IdxOperInAmount = 2
106+
107+let IdxOperPrice = 3
108+
109+let IdxOperOutAmount = 4
110+
111+let IdxOperStartHeight = 5
112+
113+let IdxOperStartTimestamp = 6
114+
115+let IdxOperEndHeight = 7
116+
117+let IdxOperEndTimestamp = 8
118+
119+func privateDataOperationAllStrings (status,inAssetAmount,price,outAssetAmount,startHeight,startTimestamp,endHeight,endTimestamp) = makeString(["%s%d%d%d%d%d%d%d", status, inAssetAmount, price, outAssetAmount, startHeight, startTimestamp, endHeight, endTimestamp], SEP)
148120 
149121 
150-func dataGetActionInfo (outAmtAssetAmt,outPriceAssetAmt,inLpAmt,price,txHeight,txTimestamp) = makeString(["%d%d%d%d%d%d", toString(outAmtAssetAmt), toString(outPriceAssetAmt), toString(inLpAmt), toString(price), toString(txHeight), toString(txTimestamp)], SEP)
122+func dataOperation (status,inAssetAmount,price,outAssetAmount,startHeight,startTimestamp,endHeight,endTimestamp) = privateDataOperationAllStrings(status, toString(inAssetAmount), toString(price), toString(outAssetAmount), toString(startHeight), toString(startTimestamp), toString(endHeight), toString(endTimestamp))
151123 
152124 
153-func getAccBalance (assetId) = if ((assetId == "WAVES"))
154-    then wavesBalance(this).available
155-    else assetBalance(this, fromBase58String(assetId))
125+func dataOperationExecutionUpdate (currOperArray,newStatus,newEndTimestamp) = privateDataOperationAllStrings(newStatus, currOperArray[IdxOperInAmount], currOperArray[IdxOperPrice], currOperArray[IdxOperOutAmount], currOperArray[IdxOperStartHeight], currOperArray[IdxOperStartTimestamp], currOperArray[IdxOperEndHeight], toString(newEndTimestamp))
156126 
157127 
158-func calcPriceBigInt (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18)
159-
160-
161-func privateCalcPrice (amAssetDcm,prAssetDcm,amAmt,prAmt) = {
162-    let amtAssetAmtX18 = toX18(amAmt, amAssetDcm)
163-    let priceAssetAmtX18 = toX18(prAmt, prAssetDcm)
164-    calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
128+func readAssetCfgOrFail (baseAssetStr) = {
129+    let key = keyAssetCfg(baseAssetStr)
130+    split(getStringOrFail(key), SEP)
165131     }
166132 
167133 
168-func calcPrices (amAmt,prAmt,lpAmt) = {
169-    let cfg = getPoolConfig()
170-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
171-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
172-    let priceX18 = privateCalcPrice(amtAssetDcm, priceAssetDcm, amAmt, prAmt)
173-    let amAmtX18 = toX18(amAmt, amtAssetDcm)
174-    let prAmtX18 = toX18(prAmt, priceAssetDcm)
175-    let lpAmtX18 = toX18(lpAmt, scale8)
176-    let lpPriceInAmAssetX18 = calcPriceBigInt(amAmtX18, lpAmtX18)
177-    let lpPriceInPrAssetX18 = calcPriceBigInt(prAmtX18, lpAmtX18)
178-[priceX18, lpPriceInAmAssetX18, lpPriceInPrAssetX18]
134+func incrementTotalLocked (key,shareAssetAmount,baseAssetAmount) = {
135+    let dataArray = readTotalLocked(key)
136+    StringEntry(key, dataTotalLocked((dataArray[IdxTotalLockedShare] + shareAssetAmount), (dataArray[IdxTotalLockedBase] + baseAssetAmount)))
179137     }
180138 
181139 
182-func calculatePrices (amAmt,prAmt,lpAmt) = {
183-    let prices = calcPrices(amAmt, prAmt, lpAmt)
184-[fromX18(prices[0], scale8), fromX18(prices[1], scale8), fromX18(prices[2], scale8)]
140+func decrementTotalLocked (key,shareAssetAmount,baseAssetAmount) = {
141+    let dataArray = readTotalLocked(key)
142+    StringEntry(key, dataTotalLocked((dataArray[IdxTotalLockedShare] - shareAssetAmount), (dataArray[IdxTotalLockedBase] - baseAssetAmount)))
185143     }
186-
187-
188-func estimateGetOperation (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
189-    let cfg = getPoolConfig()
190-    let lpAssetId = cfg[idxPoolLPAssetId]
191-    let amAssetId = cfg[idxAmtAssetId]
192-    let prAssetId = cfg[idxPriceAssetId]
193-    let amAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
194-    let prAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
195-    let poolStatus = cfg[idxPoolStatus]
196-    let lpEmission = valueOrErrorMessage(assetInfo(fromBase58String(lpAssetId)), (("Asset " + lpAssetId) + " doesn't exist")).quantity
197-    if ((lpAssetId != pmtAssetId))
198-        then throw("Invalid asset passed.")
199-        else {
200-            let amBalance = getAccBalance(amAssetId)
201-            let amBalanceX18 = toX18(amBalance, amAssetDcm)
202-            let prBalance = getAccBalance(prAssetId)
203-            let prBalanceX18 = toX18(prBalance, prAssetDcm)
204-            let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18)
205-            let curPrice = fromX18(curPriceX18, scale8)
206-            let pmtLpAmtX18 = toX18(pmtLpAmt, scale8)
207-            let lpEmissionX18 = toX18(lpEmission, scale8)
208-            let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissionX18)
209-            let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissionX18)
210-            let outAmAmt = fromX18(outAmAmtX18, amAssetDcm)
211-            let outPrAmt = fromX18(outPrAmtX18, prAssetDcm)
212-            let state = if ((txId58 == ""))
213-                then nil
214-                else [ScriptTransfer(userAddress, outAmAmt, if ((amAssetId == "WAVES"))
215-                    then unit
216-                    else fromBase58String(amAssetId)), ScriptTransfer(userAddress, outPrAmt, if ((prAssetId == "WAVES"))
217-                    then unit
218-                    else fromBase58String(prAssetId)), StringEntry(keyGetActionByUser(toString(userAddress), txId58), dataGetActionInfo(outAmAmt, outPrAmt, pmtLpAmt, curPrice, height, lastBlock.timestamp)), IntegerEntry(keyPriceLast(), curPrice), IntegerEntry(keyPriceHistory(height, lastBlock.timestamp), curPrice)]
219-            $Tuple10(outAmAmt, outPrAmt, amAssetId, prAssetId, amBalance, prBalance, lpEmission, curPriceX18, poolStatus, state)
220-            }
221-    }
222-
223-
224-func estimatePutOperation (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = {
225-    let cfg = getPoolConfig()
226-    let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
227-    let amAssetIdStr = cfg[idxAmtAssetId]
228-    let prAssetIdStr = cfg[idxPriceAssetId]
229-    let iAmtAssetId = cfg[idxIAmtAssetId]
230-    let iPriceAssetId = cfg[idxIPriceAssetId]
231-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
232-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
233-    let poolStatus = cfg[idxPoolStatus]
234-    let lpEmission = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
235-    let inAmAssetIdStr = toBase58String(valueOrElse(inAmAssetId, fromBase58String("WAVES")))
236-    let inPrAssetIdStr = toBase58String(valueOrElse(inPrAssetId, fromBase58String("WAVES")))
237-    if (if ((amAssetIdStr != inAmAssetIdStr))
238-        then true
239-        else (prAssetIdStr != inPrAssetIdStr))
240-        then throw("Invalid amt or price asset passed.")
241-        else {
242-            let amBalance = if (isEvaluate)
243-                then getAccBalance(amAssetIdStr)
244-                else (getAccBalance(amAssetIdStr) - inAmAssetAmt)
245-            let prBalance = if (isEvaluate)
246-                then getAccBalance(prAssetIdStr)
247-                else (getAccBalance(prAssetIdStr) - inPrAssetAmt)
248-            let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
249-            let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
250-            let userPriceX18 = calcPriceBigInt(inPrAssetAmtX18, inAmAssetAmtX18)
251-            let amBalanceX18 = toX18(amBalance, amtAssetDcm)
252-            let prBalanceX18 = toX18(prBalance, priceAssetDcm)
253-            let res = if ((lpEmission == 0))
254-                then {
255-                    let curPriceX18 = zeroBigInt
256-                    let slippageX18 = zeroBigInt
257-                    let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN)
258-                    $Tuple5(fromX18(lpAmtX18, scale8), fromX18(inAmAssetAmtX18, amtAssetDcm), fromX18(inPrAssetAmtX18, priceAssetDcm), calcPriceBigInt((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18)
259-                    }
260-                else {
261-                    let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18)
262-                    let slippageX18 = fraction(abs((curPriceX18 - userPriceX18)), scale18, curPriceX18)
263-                    let slippageToleranceX18 = toX18(slippageTolerance, scale8)
264-                    if (if ((curPriceX18 != zeroBigInt))
265-                        then (slippageX18 > slippageToleranceX18)
266-                        else false)
267-                        then throw(((("Price slippage " + toString(slippageX18)) + " exceeded the passed limit of ") + toString(slippageToleranceX18)))
268-                        else {
269-                            let lpEmissionX18 = toX18(lpEmission, scale8)
270-                            let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
271-                            let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
272-                            let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
273-                                then $Tuple2(amViaPrX18, inPrAssetAmtX18)
274-                                else $Tuple2(inAmAssetAmtX18, prViaAmX18)
275-                            let expAmtAssetAmtX18 = expectedAmts._1
276-                            let expPriceAssetAmtX18 = expectedAmts._2
277-                            let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
278-                            $Tuple5(fromX18(lpAmtX18, scale8), fromX18(expAmtAssetAmtX18, amtAssetDcm), fromX18(expPriceAssetAmtX18, priceAssetDcm), curPriceX18, slippageX18)
279-                            }
280-                    }
281-            let calcLpAmt = res._1
282-            let calcAmAssetPmt = res._2
283-            let calcPrAssetPmt = res._3
284-            let curPrice = fromX18(res._4, scale8)
285-            let slippageCalc = fromX18(res._5, scale8)
286-            if ((0 >= calcLpAmt))
287-                then throw("Invalid calculations. LP calculated is less than zero.")
288-                else {
289-                    let emitLpAmt = if (!(emitLp))
290-                        then 0
291-                        else calcLpAmt
292-                    let amDiff = (inAmAssetAmt - calcAmAssetPmt)
293-                    let prDiff = (inPrAssetAmt - calcPrAssetPmt)
294-                    let commonState = [IntegerEntry(keyPriceLast(), curPrice), IntegerEntry(keyPriceHistory(height, lastBlock.timestamp), curPrice), StringEntry(keyPutActionByUser(userAddress, txId58), dataPutActionInfo(calcAmAssetPmt, calcPrAssetPmt, emitLpAmt, curPrice, slippageTolerance, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))]
295-                    $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEmission, lpAssetId, poolStatus, commonState, amDiff, prDiff, inAmAssetId, inPrAssetId)
296-                    }
297-            }
298-    }
299-
300-
301-func validateMatcherOrderAllowed (order) = {
302-    let cfg = getPoolConfig()
303-    let amtAssetId = cfg[idxAmtAssetId]
304-    let priceAssetId = cfg[idxPriceAssetId]
305-    let poolStatus = parseIntValue(cfg[idxPoolStatus])
306-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
307-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
308-    let accAmtAssetBalance = getAccBalance(amtAssetId)
309-    let accPriceAssetBalance = getAccBalance(priceAssetId)
310-    let curPriceX18 = if ((order.orderType == Buy))
311-        then privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance + order.amount), accPriceAssetBalance)
312-        else privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance - order.amount), accPriceAssetBalance)
313-    let curPrice = fromX18(curPriceX18, scale8)
314-    if (if (if (isGlobalShutdown())
315-        then true
316-        else (poolStatus == PoolMatcherDisabled))
317-        then true
318-        else (poolStatus == PoolShutdown))
319-        then throw("Exchange operations disabled")
320-        else {
321-            let orderAmtAsset = order.assetPair.amountAsset
322-            let orderAmtAssetStr = if ((orderAmtAsset == unit))
323-                then "WAVES"
324-                else toBase58String(value(orderAmtAsset))
325-            let orderPriceAsset = order.assetPair.priceAsset
326-            let orderPriceAssetStr = if ((orderPriceAsset == unit))
327-                then "WAVES"
328-                else toBase58String(value(orderPriceAsset))
329-            if (if ((orderAmtAssetStr != amtAssetId))
330-                then true
331-                else (orderPriceAssetStr != priceAssetId))
332-                then throw("Wrong order assets.")
333-                else {
334-                    let orderPrice = order.price
335-                    let priceDcm = fraction(scale8, priceAssetDcm, amtAssetDcm)
336-                    let castedOrderPrice = toScale(orderPrice, scale8, priceDcm)
337-                    let isOrderPriceValid = if ((order.orderType == Buy))
338-                        then (curPrice >= castedOrderPrice)
339-                        else (castedOrderPrice >= curPrice)
340-                    true
341-                    }
342-            }
343-    }
344-
345-
346-func commonGet (i) = if ((size(i.payments) != 1))
347-    then throw("exactly 1 payment is expected")
348-    else {
349-        let pmt = value(i.payments[0])
350-        let pmtAssetId = value(pmt.assetId)
351-        let pmtAmt = pmt.amount
352-        let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
353-        let outAmAmt = res._1
354-        let outPrAmt = res._2
355-        let poolStatus = parseIntValue(res._9)
356-        let state = res._10
357-        if (if (isGlobalShutdown())
358-            then true
359-            else (poolStatus == PoolShutdown))
360-            then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
361-            else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
362-        }
363-
364-
365-func commonPut (i,slippageTolerance,emitLp) = if ((size(i.payments) != 2))
366-    then throw("exactly 2 payments are expected")
367-    else {
368-        let amAssetPmt = value(i.payments[0])
369-        let prAssetPmt = value(i.payments[1])
370-        let estPut = estimatePutOperation(toBase58String(i.transactionId), slippageTolerance, amAssetPmt.amount, amAssetPmt.assetId, prAssetPmt.amount, prAssetPmt.assetId, toString(i.caller), false, emitLp)
371-        let poolStatus = parseIntValue(estPut._8)
372-        if (if (if (isGlobalShutdown())
373-            then true
374-            else (poolStatus == PoolPutDisabled))
375-            then true
376-            else (poolStatus == PoolShutdown))
377-            then throw(("Put operation is blocked by admin. Status = " + toString(poolStatus)))
378-            else estPut
379-        }
380144 
381145 
382146 func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
389153 }
390154 
391155 
156+func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
157+    case s: String => 
158+        fromBase58String(s)
159+    case _: Unit => 
160+        unit
161+    case _ => 
162+        throw("Match error")
163+}
164+
165+
166+func balanceOrZero (assetId) = valueOrElse(getInteger(keyBalance(assetId)), 0)
167+
168+
169+func genericCalcPrice (balance,internalBaseAssetStr,baseAssetId,topUpBaseAmount,shareAssetId,decimalsMultBothAssets,decimalsMultPrice) = {
170+    let totalLockedArray = readTotalLocked(keyTotalLocked(internalBaseAssetStr))
171+    let totalLockedBaseAmount = totalLockedArray[IdxTotalLockedBase]
172+    let baseAssetBalance = balance
173+    let baseAssetBalanceConsideringLock = ((baseAssetBalance - totalLockedBaseAmount) + topUpBaseAmount)
174+    if ((0 > baseAssetBalanceConsideringLock))
175+        then throw(((("baseAssetBalanceConsideringLock < 0: baseAssetBalance=" + toString(baseAssetBalance)) + " baseAssetBalanceConsideringLock=") + toString(baseAssetBalanceConsideringLock)))
176+        else {
177+            let shareEmission = value(assetInfo(shareAssetId)).quantity
178+            let price = if ((shareEmission == 0))
179+                then (1 * decimalsMultPrice)
180+                else fraction(baseAssetBalanceConsideringLock, decimalsMultPrice, shareEmission)
181+            $Tuple5(price, baseAssetBalance, totalLockedBaseAmount, baseAssetBalanceConsideringLock, shareEmission)
182+            }
183+    }
184+
185+
186+func calcPrice (balance,internalBaseAssetStr,baseAssetId,shareAssetId,decimalsMultBothAssets,decimalsMultPrice) = genericCalcPrice(balance, internalBaseAssetStr, baseAssetId, 0, shareAssetId, decimalsMultBothAssets, decimalsMultPrice)
187+
188+
189+func privateCurrentSysParamsREST (baseAssetStr) = {
190+    let baseAssetId = fromBase58String(baseAssetStr)
191+    let cfgArray = readAssetCfgOrFail(baseAssetStr)
192+    let shareAssetStr = cfgArray[IdxCfgShareAssetId]
193+    let shareAssetId = fromBase58String(shareAssetStr)
194+    let decimalsMultBothAssets = parseIntValue(cfgArray[IdxCfgDecimalsMultBothAssets])
195+    let decimalsMultPrice = parseIntValue(cfgArray[IdxCfgDecimalsMultPrice])
196+    let internalBaseAssetStr = cfgArray[IdxCfgInternalBaseAsset]
197+    let sysState = calcPrice(balanceOrZero(baseAssetStr), internalBaseAssetStr, baseAssetId, shareAssetId, decimalsMultBothAssets, decimalsMultPrice)
198+    $Tuple6(IntegerEntry("price", sysState._1), IntegerEntry("decimalsMultPrice", decimalsMultPrice), IntegerEntry("baseAssetBalance", sysState._2), IntegerEntry("totalLockedBaseAmount", sysState._3), IntegerEntry("baseAssetBalanceConsideringLock", sysState._4), IntegerEntry("shareEmission", sysState._5))
199+    }
200+
201+
392202 func mustManager (i) = {
393-    let pd = throw("Permission denied")
203+    let pd = throw("permission denied")
394204     match managerPublicKeyOrUnit() {
395205         case pk: ByteVector => 
396206             if ((i.callerPublicKey == pk))
406216     }
407217 
408218 
219+func mustProxyAddress (i,assetId) = {
220+    let isProxy = (toString(i.caller) == valueOrElse(getString(keyProxyAddress(assetId)), EMPTY))
221+    if (isProxy)
222+        then true
223+        else {
224+            let checkCaller = mustManager(i)
225+            if ((checkCaller == checkCaller))
226+                then true
227+                else throw("Strict value is not equal to itself.")
228+            }
229+    }
230+
231+
409232 @Callable(i)
410-func constructor (factoryContract) = {
233+func constructor (assetsStoreContract) = {
411234     let checkCaller = mustManager(i)
412235     if ((checkCaller == checkCaller))
413-        then [StringEntry(keyFactoryContract(), factoryContract)]
236+        then [StringEntry(keyAssetsStoreContract(), assetsStoreContract)]
414237         else throw("Strict value is not equal to itself.")
415238     }
416239 
417240 
418241 
419242 @Callable(i)
420-func setManager (managerPublicKey) = {
243+func adminRegisterAsset (baseAssetStr,shareAssetName,shareAssetDescr,shareAssetLogo,getDelayinBlocks,shutdownManagerAddress,proxyAddress) = {
244+    let baseAssetId = fromBase58String(baseAssetStr)
245+    let decimals = value(assetInfo(baseAssetId)).decimals
246+    let check = mustManager(i)
247+    if ((check == check))
248+        then if ((toString(addressFromStringValue(shutdownManagerAddress)) != shutdownManagerAddress))
249+            then throw("invalid shutdownManagerAddress")
250+            else if ((0 > getDelayinBlocks))
251+                then throw(("invalid getDelayinBlocks=" + toString(getDelayinBlocks)))
252+                else {
253+                    let shareAssetIssueAction = Issue(shareAssetName, shareAssetDescr, 1, decimals, true)
254+                    let shareAssetId = calculateAssetId(shareAssetIssueAction)
255+                    let shareAssetStr = toBase58String(shareAssetId)
256+                    let decimalsMultPrice = ((100 * 1000) * 1000)
257+                    let decimalsMultBothAssets = pow(10, 0, decimals, 0, 0, DOWN)
258+                    let startPrice = (1 * decimalsMultPrice)
259+                    let internalBaseAssettId = valueOrElse(getInteger(this, keyNextInternalAssetId()), 0)
260+                    let internalBaseAssetStr = toString(internalBaseAssettId)
261+                    let createOrUpdate = invoke(assetsStoreContract(), "createOrUpdate", [shareAssetStr, shareAssetLogo, false], nil)
262+                    if ((createOrUpdate == createOrUpdate))
263+                        then {
264+                            let addLabel = invoke(assetsStoreContract(), "addLabel", [shareAssetStr, "DEFI"], nil)
265+                            if ((addLabel == addLabel))
266+                                then [StringEntry(keyAssetCfg(baseAssetStr), dataAssetCfg(shareAssetStr, internalBaseAssetStr, decimalsMultBothAssets, decimalsMultPrice, getDelayinBlocks)), StringEntry(keyMappingsInternal2baseAssetId(internalBaseAssettId), baseAssetStr), StringEntry(keyMappingsBaseAsset2internalId(baseAssetStr), internalBaseAssetStr), StringEntry(keyMappingsShare2baseAssetId(shareAssetStr), baseAssetStr), StringEntry(keyMappingsBaseAsset2shareId(baseAssetStr), shareAssetStr), BooleanEntry(keyShutdownPutOperation(internalBaseAssetStr), false), StringEntry(keyShutdownManager(internalBaseAssetStr), shutdownManagerAddress), IntegerEntry(keyNextInternalAssetId(), (internalBaseAssettId + 1)), IntegerEntry(keyPriceLast(internalBaseAssetStr), startPrice), IntegerEntry(keyPriceHistory(internalBaseAssetStr, height, lastBlock.timestamp), startPrice), shareAssetIssueAction, Burn(shareAssetId, 1), StringEntry(keyProxyAddress(baseAssetStr), proxyAddress)]
267+                                else throw("Strict value is not equal to itself.")
268+                            }
269+                        else throw("Strict value is not equal to itself.")
270+                    }
271+        else throw("Strict value is not equal to itself.")
272+    }
273+
274+
275+
276+@Callable(i)
277+func shutdownPut (internalBaseAssetId) = {
278+    let internalBaseAssetIdStr = toString(internalBaseAssetId)
279+    let baseAssetIdStr = getStringOrFail(keyMappingsInternal2baseAssetId(internalBaseAssetId))
280+    let shutdownManagerAddress = getStringOrFail(keyShutdownManager(internalBaseAssetIdStr))
281+    if ((1 > size(baseAssetIdStr)))
282+        then throw("invalid internalBaseAssetId")
283+        else if ((toString(i.caller) != shutdownManagerAddress))
284+            then throw("access denied")
285+            else [BooleanEntry(keyShutdownPutOperation(toString(internalBaseAssetId)), true)]
286+    }
287+
288+
289+
290+@Callable(i)
291+func put () = {
292+    let pmt = value(i.payments[0])
293+    let baseAssetId = value(pmt.assetId)
294+    let baseAssetStr = toBase58String(baseAssetId)
295+    let userAddressStr = toString(i.caller)
296+    let cfgArray = readAssetCfgOrFail(baseAssetStr)
297+    let shareAssetStr = cfgArray[IdxCfgShareAssetId]
298+    let shareAssetId = fromBase58String(shareAssetStr)
299+    let decimalsMultBothAssets = parseIntValue(cfgArray[IdxCfgDecimalsMultBothAssets])
300+    let decimalsMultPrice = parseIntValue(cfgArray[IdxCfgDecimalsMultPrice])
301+    let internalBaseAssetStr = cfgArray[IdxCfgInternalBaseAsset]
302+    let isPutBlocked = getBooleanOrFail(keyShutdownPutOperation(internalBaseAssetStr))
303+    if (isPutBlocked)
304+        then throw("put operation is blocked")
305+        else {
306+            let balance = (balanceOrZero(baseAssetStr) + pmt.amount)
307+            let price = calcPrice(balance, internalBaseAssetStr, baseAssetId, shareAssetId, decimalsMultBothAssets, decimalsMultPrice)._1
308+            let shareAssetAmount = fraction(pmt.amount, decimalsMultPrice, price)
309+[Reissue(shareAssetId, shareAssetAmount, true), ScriptTransfer(i.caller, shareAssetAmount, shareAssetId), StringEntry(keyOperation("P", internalBaseAssetStr, userAddressStr, toBase58String(i.transactionId)), dataOperation("FINISHED", pmt.amount, price, shareAssetAmount, height, lastBlock.timestamp, height, lastBlock.timestamp)), ScriptTransfer(addressFromStringValue(value(getString(keyProxyAddress(baseAssetStr)))), pmt.amount, baseAssetId), IntegerEntry(keyBalance(baseAssetStr), balance)]
310+            }
311+    }
312+
313+
314+
315+@Callable(i)
316+func submitGetRequest () = {
317+    let pmt = value(i.payments[0])
318+    let shareAssetId = value(pmt.assetId)
319+    let shareAssetStr = toBase58String(shareAssetId)
320+    let callerPubStr = toBase58String(i.callerPublicKey)
321+    let userAddress = i.caller
322+    let userAddressStr = toString(userAddress)
323+    let shareAssetAmount = pmt.amount
324+    let baseAssetStr = getStringOrFail(keyMappingsShare2baseAssetId(shareAssetStr))
325+    let baseAssetId = fromBase58String(baseAssetStr)
326+    let cfgArray = readAssetCfgOrFail(baseAssetStr)
327+    let decimalsMultBothAssets = parseIntValue(cfgArray[IdxCfgDecimalsMultBothAssets])
328+    let decimalsMultPrice = parseIntValue(cfgArray[IdxCfgDecimalsMultPrice])
329+    let getDelayBlocks = parseIntValue(cfgArray[IdxCfgGetDelayBlocks])
330+    let internalBaseAssetStr = cfgArray[IdxCfgInternalBaseAsset]
331+    let price = calcPrice(balanceOrZero(baseAssetStr), internalBaseAssetStr, baseAssetId, shareAssetId, decimalsMultBothAssets, decimalsMultPrice)._1
332+    let baseAssetAmount = fraction(shareAssetAmount, price, decimalsMultPrice)
333+    let operationKey = keyOperation("G", internalBaseAssetStr, userAddressStr, toBase58String(i.transactionId))
334+    let operationData = dataOperation("PENDING", shareAssetAmount, price, baseAssetAmount, height, lastBlock.timestamp, (height + getDelayBlocks), 0)
335+    let balance = balanceOrZero(baseAssetStr)
336+[Burn(shareAssetId, shareAssetAmount), StringEntry(operationKey, operationData), incrementTotalLocked(keyTotalLocked(internalBaseAssetStr), shareAssetAmount, baseAssetAmount), incrementTotalLocked(keyTotalLockedByUser(internalBaseAssetStr, userAddressStr), shareAssetAmount, baseAssetAmount)]
337+    }
338+
339+
340+
341+@Callable(i)
342+func executeGetRequest (baseAssetStr,userAddressStr,getTxIdStr) = {
343+    let userAddress = addressFromStringValue(userAddressStr)
344+    let assetCfgArray = readAssetCfgOrFail(baseAssetStr)
345+    let shareAssetId = fromBase58String(assetCfgArray[IdxCfgShareAssetId])
346+    let baseAssetId = fromBase58String(baseAssetStr)
347+    let internalBaseAssetStr = assetCfgArray[IdxCfgInternalBaseAsset]
348+    let operationKey = keyOperation("G", internalBaseAssetStr, userAddressStr, getTxIdStr)
349+    let operationArray = split(getStringOrFail(operationKey), SEP)
350+    let status = operationArray[IdxOperStatus]
351+    let endHeight = parseIntValue(operationArray[IdxOperEndHeight])
352+    let inShareAmount = parseIntValue(operationArray[IdxOperInAmount])
353+    let outBaseAmount = parseIntValue(operationArray[IdxOperOutAmount])
354+    if ((status != "PENDING"))
355+        then failExecuteGet("Status is not PENDING", baseAssetStr, userAddressStr, getTxIdStr)
356+        else if ((endHeight > height))
357+            then failExecuteGet(((("EndHeight[" + toString(endHeight)) + "] > ") + toString(height)), baseAssetStr, userAddressStr, getTxIdStr)
358+            else [ScriptTransfer(userAddress, outBaseAmount, baseAssetId), StringEntry(operationKey, dataOperationExecutionUpdate(operationArray, "FINISHED", lastBlock.timestamp)), decrementTotalLocked(keyTotalLocked(internalBaseAssetStr), inShareAmount, outBaseAmount), decrementTotalLocked(keyTotalLockedByUser(internalBaseAssetStr, userAddressStr), inShareAmount, outBaseAmount), IntegerEntry(keyBalance(baseAssetStr), (balanceOrZero(baseAssetStr) - outBaseAmount))]
359+    }
360+
361+
362+
363+@Callable(i)
364+func topUpBalance (baseAssetStr,delta) = {
365+    let assetCfgArray = readAssetCfgOrFail(baseAssetStr)
366+    let pmt = value(i.payments[0])
367+    let pmtAssetId = value(pmt.assetId)
368+    let pmtAssetStr = toBase58String(pmtAssetId)
369+    let shareAssetId = fromBase58String(assetCfgArray[IdxCfgShareAssetId])
370+    let decimalsMultBothAssets = parseIntValue(assetCfgArray[IdxCfgDecimalsMultBothAssets])
371+    let decimalsMultPrice = parseIntValue(assetCfgArray[IdxCfgDecimalsMultPrice])
372+    let internalBaseAssetStr = assetCfgArray[IdxCfgInternalBaseAsset]
373+    let topUpLastHeightKEY = keyTopUpLastHeight(internalBaseAssetStr, toString(i.caller))
374+    let topUpLastHeight = valueOrElse(getInteger(this, topUpLastHeightKEY), 0)
375+    let checks = [mustProxyAddress(i, baseAssetStr), if ((topUpLastHeight != height))
376+        then true
377+        else throw("only one topUp per block is allowed")]
378+    if ((checks == checks))
379+        then if ((baseAssetStr != pmtAssetStr))
380+            then throw("attached payment's asset id is NOT matched passed baseAssetStr")
381+            else if ((size(i.payments) > 1))
382+                then throw("only one payment can be attached")
383+                else {
384+                    let newBalance = (balanceOrZero(pmtAssetStr) + delta)
385+                    let price = genericCalcPrice(newBalance, internalBaseAssetStr, pmtAssetId, pmt.amount, shareAssetId, decimalsMultBothAssets, decimalsMultPrice)._1
386+[IntegerEntry(keyPriceLast(internalBaseAssetStr), price), IntegerEntry(keyPriceHistory(internalBaseAssetStr, height, lastBlock.timestamp), price), IntegerEntry(topUpLastHeightKEY, height), IntegerEntry(keyBalance(pmtAssetStr), newBalance)]
387+                    }
388+        else throw("Strict value is not equal to itself.")
389+    }
390+
391+
392+
393+@Callable(i)
394+func currentSysParamsREST (baseAssetStr) = {
395+    let sysStateTuple = privateCurrentSysParamsREST(baseAssetStr)
396+    let price = sysStateTuple._1.value
397+    let decimalsMultPrice = sysStateTuple._2.value
398+    let baseAssetBalance = sysStateTuple._3.value
399+    let totalLockedBaseAmount = sysStateTuple._4.value
400+    let baseAssetBalanceConsideringLock = sysStateTuple._5.value
401+    let shareEmission = sysStateTuple._6.value
402+    let restData = makeString(["startCurrentSysParamsREST", toString(price), toString(decimalsMultPrice), toString(baseAssetBalance), toString(totalLockedBaseAmount), toString(baseAssetBalanceConsideringLock), toString(shareEmission), "endCurrentSysParamsREST"], SEP)
403+    throw(restData)
404+    }
405+
406+
407+
408+@Callable(i)
409+func setManager (pendingManagerPublicKey) = {
421410     let checkCaller = mustManager(i)
422411     if ((checkCaller == checkCaller))
423412         then {
424-            let checkManagerPublicKey = fromBase58String(managerPublicKey)
413+            let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
425414             if ((checkManagerPublicKey == checkManagerPublicKey))
426-                then [StringEntry(keyManagerPublicKey(), managerPublicKey)]
415+                then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
427416                 else throw("Strict value is not equal to itself.")
428417             }
429418         else throw("Strict value is not equal to itself.")
432421 
433422 
434423 @Callable(i)
435-func put (slippageTolerance,shouldAutoStake) = {
436-    let factoryCfg = getFactoryConfig()
437-    let stakingContract = valueOrErrorMessage(addressFromString(factoryCfg[idxFactoryStakingContract]), "Error. Incorrect staking address.")
438-    let slippageContract = valueOrErrorMessage(addressFromString(factoryCfg[idxFactorySlippageContract]), "Error. Incorrect slippage contract address.")
439-    if ((0 > slippageTolerance))
440-        then throw("Invalid slippageTolerance passed")
441-        else {
442-            let estPut = commonPut(i, slippageTolerance, true)
443-            let emitLpAmt = estPut._2
444-            let lpAssetId = estPut._7
445-            let state = estPut._9
446-            let amDiff = estPut._10
447-            let prDiff = estPut._11
448-            let amId = estPut._12
449-            let prId = estPut._13
450-            let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
451-            if ((emitInv == emitInv))
452-                then {
453-                    let emitInvLegacy =                     match emitInv {
454-                        case legacyFactoryContract: Address => 
455-                            invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
456-                        case _ => 
457-                            unit
458-                    }
459-                    if ((emitInvLegacy == emitInvLegacy))
460-                        then {
461-                            let slippageAInv = if ((amDiff > 0))
462-                                then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
463-                                else nil
464-                            if ((slippageAInv == slippageAInv))
465-                                then {
466-                                    let slippagePInv = if ((prDiff > 0))
467-                                        then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
468-                                        else nil
469-                                    if ((slippagePInv == slippagePInv))
470-                                        then {
471-                                            let lpTransfer = if (shouldAutoStake)
472-                                                then {
473-                                                    let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
474-                                                    if ((slpStakeInv == slpStakeInv))
475-                                                        then nil
476-                                                        else throw("Strict value is not equal to itself.")
477-                                                    }
478-                                                else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
479-                                            (state ++ lpTransfer)
480-                                            }
481-                                        else throw("Strict value is not equal to itself.")
482-                                    }
483-                                else throw("Strict value is not equal to itself.")
484-                            }
485-                        else throw("Strict value is not equal to itself.")
486-                    }
487-                else throw("Strict value is not equal to itself.")
488-            }
489-    }
490-
491-
492-
493-@Callable(i)
494-func putForFree (maxSlippage) = if ((0 > maxSlippage))
495-    then throw("Invalid value passed")
496-    else {
497-        let estPut = commonPut(i, maxSlippage, false)
498-        estPut._9
499-        }
500-
501-
502-
503-@Callable(i)
504-func get () = {
505-    let res = commonGet(i)
506-    let outAmtAmt = res._1
507-    let outPrAmt = res._2
508-    let pmtAmt = res._3
509-    let pmtAssetId = res._4
510-    let state = res._5
511-    let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
512-    if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
513-        then state
514-        else throw("Strict value is not equal to itself.")
515-    }
516-
517-
518-
519-@Callable(i)
520-func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
521-    let res = commonGet(i)
522-    let outAmAmt = res._1
523-    let outPrAmt = res._2
524-    let pmtAmt = res._3
525-    let pmtAssetId = res._4
526-    let state = res._5
527-    if ((noLessThenAmtAsset > outAmAmt))
528-        then throw(((("noLessThenAmtAsset failed:  " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
529-        else if ((noLessThenPriceAsset > outPrAmt))
530-            then throw(((("noLessThenPriceAsset failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
531-            else {
532-                let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
533-                if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
534-                    then state
535-                    else throw("Strict value is not equal to itself.")
536-                }
537-    }
538-
539-
540-
541-@Callable(i)
542-func unstakeAndGet (amount) = {
543-    let checkPayments = if ((size(i.payments) != 0))
544-        then throw("No payments are expected")
545-        else true
546-    if ((checkPayments == checkPayments))
424+func confirmManager () = {
425+    let pm = pendingManagerPublicKeyOrUnit()
426+    let hasPM = if (isDefined(pm))
427+        then true
428+        else throw("no pending manager")
429+    if ((hasPM == hasPM))
547430         then {
548-            let cfg = getPoolConfig()
549-            let factoryCfg = getFactoryConfig()
550-            let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
551-            let stakingContract = valueOrErrorMessage(addressFromString(factoryCfg[idxFactoryStakingContract]), "Error. Incorrect staking address.")
552-            let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(lpAssetId), amount], nil)
553-            if ((unstakeInv == unstakeInv))
554-                then {
555-                    let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
556-                    let poolStatus = parseIntValue(res._9)
557-                    let state = res._10
558-                    let checkPoolStatus = if (if (isGlobalShutdown())
559-                        then true
560-                        else (poolStatus == PoolShutdown))
561-                        then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
562-                        else true
563-                    if ((checkPoolStatus == checkPoolStatus))
564-                        then {
565-                            let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
566-                            if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
567-                                then state
568-                                else throw("Strict value is not equal to itself.")
569-                            }
570-                        else throw("Strict value is not equal to itself.")
571-                    }
431+            let checkPM = if ((i.callerPublicKey == value(pm)))
432+                then true
433+                else throw("you are not pending manager")
434+            if ((checkPM == checkPM))
435+                then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
572436                 else throw("Strict value is not equal to itself.")
573437             }
574438         else throw("Strict value is not equal to itself.")
575439     }
576440 
577441 
578-
579-@Callable(i)
580-func activate (amtAssetStr,priceAssetStr) = if ((toString(i.caller) != toString(factoryContract)))
581-    then throw("permissions denied")
582-    else $Tuple2([StringEntry(keyAmtAsset(), amtAssetStr), StringEntry(keyPriceAsset(), priceAssetStr)], "success")
583-
584-
585-
586-@Callable(i)
587-func getPoolConfigWrapperREADONLY () = $Tuple2(nil, getPoolConfig())
588-
589-
590-
591-@Callable(i)
592-func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
593-
594-
595-
596-@Callable(i)
597-func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
598-    let prices = calcPrices(amAmt, prAmt, lpAmt)
599-    $Tuple2(nil, [toString(prices[0]), toString(prices[1]), toString(prices[2])])
442+@Verifier(tx)
443+func verify () = {
444+    let targetPublicKey =     match managerPublicKeyOrUnit() {
445+        case pk: ByteVector => 
446+            pk
447+        case _: Unit => 
448+            tx.senderPublicKey
449+        case _ => 
450+            throw("Match error")
600451     }
601-
602-
603-
604-@Callable(i)
605-func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(toX18(origVal, origScaleMult)))
606-
607-
608-
609-@Callable(i)
610-func fromX18WrapperREADONLY (val,resultScaleMult) = $Tuple2(nil, fromX18(parseBigIntValue(val), resultScaleMult))
611-
612-
613-
614-@Callable(i)
615-func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(calcPriceBigInt(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
616-
617-
618-
619-@Callable(i)
620-func estimatePutOperationWrapperREADONLY (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = $Tuple2(nil, estimatePutOperation(txId58, slippageTolerance, inAmAssetAmt, inAmAssetId, inPrAssetAmt, inPrAssetId, userAddress, isEvaluate, emitLp))
621-
622-
623-
624-@Callable(i)
625-func estimateGetOperationWrapperREADONLY (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
626-    let res = estimateGetOperation(txId58, pmtAssetId, pmtLpAmt, addressFromStringValue(userAddress))
627-    $Tuple2(nil, $Tuple10(res._1, res._2, res._3, res._4, res._5, res._6, res._7, toString(res._8), res._9, res._10))
452+    sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
628453     }
629-
630-
631-
632-@Callable(i)
633-func statsREADONLY () = {
634-    let cfg = getPoolConfig()
635-    let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
636-    let amtAssetId = cfg[idxAmtAssetId]
637-    let priceAssetId = cfg[idxPriceAssetId]
638-    let iAmtAssetId = cfg[idxIAmtAssetId]
639-    let iPriceAssetId = cfg[idxIPriceAssetId]
640-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
641-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
642-    let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
643-    let accAmtAssetBalance = getAccBalance(amtAssetId)
644-    let accPriceAssetBalance = getAccBalance(priceAssetId)
645-    let pricesList = if ((poolLPBalance == 0))
646-        then [zeroBigInt, zeroBigInt, zeroBigInt]
647-        else calcPrices(accAmtAssetBalance, accPriceAssetBalance, poolLPBalance)
648-    let curPrice = 0
649-    let lpAmtAssetShare = fromX18(pricesList[1], scale8)
650-    let lpPriceAssetShare = fromX18(pricesList[2], scale8)
651-    let poolWeight = value(getInteger(factoryContract, keyPoolWeight(toString(this))))
652-    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d", toString(accAmtAssetBalance), toString(accPriceAssetBalance), toString(poolLPBalance), toString(curPrice), toString(lpAmtAssetShare), toString(lpPriceAssetShare), toString(poolWeight)], SEP))
653-    }
654-
655-
656-
657-@Callable(i)
658-func evaluatePutByAmountAssetREADONLY (inAmAssetAmt) = {
659-    let cfg = getPoolConfig()
660-    let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
661-    let amAssetIdStr = cfg[idxAmtAssetId]
662-    let amAssetId = fromBase58String(amAssetIdStr)
663-    let prAssetIdStr = cfg[idxPriceAssetId]
664-    let prAssetId = fromBase58String(prAssetIdStr)
665-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
666-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
667-    let poolStatus = cfg[idxPoolStatus]
668-    let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
669-    let accAmtAssetBalance = getAccBalance(amAssetIdStr)
670-    let accPriceAssetBalance = getAccBalance(prAssetIdStr)
671-    let amtAssetAmtX18 = toX18(accAmtAssetBalance, amtAssetDcm)
672-    let priceAssetAmtX18 = toX18(accPriceAssetBalance, priceAssetDcm)
673-    let curPriceX18 = if ((poolLPBalance == 0))
674-        then zeroBigInt
675-        else calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
676-    let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
677-    let inPrAssetAmtX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
678-    let inPrAssetAmt = fromX18(inPrAssetAmtX18, priceAssetDcm)
679-    let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
680-    let calcLpAmt = estPut._1
681-    let curPriceCalc = estPut._3
682-    let amBalance = estPut._4
683-    let prBalance = estPut._5
684-    let lpEmission = estPut._6
685-    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d", toString(calcLpAmt), toString(fromX18(curPriceX18, scale8)), toString(amBalance), toString(prBalance), toString(lpEmission), poolStatus, toString(inAmAssetAmt), toString(inPrAssetAmt)], SEP))
686-    }
687-
688-
689-
690-@Callable(i)
691-func evaluatePutByPriceAssetREADONLY (inPrAssetAmt) = {
692-    let cfg = getPoolConfig()
693-    let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
694-    let amAssetIdStr = cfg[idxAmtAssetId]
695-    let amAssetId = fromBase58String(amAssetIdStr)
696-    let prAssetIdStr = cfg[idxPriceAssetId]
697-    let prAssetId = fromBase58String(prAssetIdStr)
698-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
699-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
700-    let poolStatus = cfg[idxPoolStatus]
701-    let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
702-    let amBalanceRaw = getAccBalance(amAssetIdStr)
703-    let prBalanceRaw = getAccBalance(prAssetIdStr)
704-    let amBalanceRawX18 = toX18(amBalanceRaw, amtAssetDcm)
705-    let prBalanceRawX18 = toX18(prBalanceRaw, priceAssetDcm)
706-    let curPriceX18 = if ((poolLPBalance == 0))
707-        then zeroBigInt
708-        else calcPriceBigInt(prBalanceRawX18, amBalanceRawX18)
709-    let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
710-    let inAmAssetAmtX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
711-    let inAmAssetAmt = fromX18(inAmAssetAmtX18, amtAssetDcm)
712-    let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
713-    let calcLpAmt = estPut._1
714-    let curPriceCalc = estPut._3
715-    let amBalance = estPut._4
716-    let prBalance = estPut._5
717-    let lpEmission = estPut._6
718-    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d", toString(calcLpAmt), toString(fromX18(curPriceX18, scale8)), toString(amBalance), toString(prBalance), toString(lpEmission), poolStatus, toString(inAmAssetAmt), toString(inPrAssetAmt)], SEP))
719-    }
720-
721-
722-
723-@Callable(i)
724-func evaluateGetREADONLY (paymentLpAssetId,paymentLpAmt) = {
725-    let res = estimateGetOperation("", paymentLpAssetId, paymentLpAmt, this)
726-    let outAmAmt = res._1
727-    let outPrAmt = res._2
728-    let amBalance = res._5
729-    let prBalance = res._6
730-    let lpEmission = res._7
731-    let curPrice = res._8
732-    let poolStatus = parseIntValue(res._9)
733-    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d", toString(outAmAmt), toString(outPrAmt), toString(amBalance), toString(prBalance), toString(lpEmission), toString(curPrice), toString(poolStatus)], SEP))
734-    }
735-
736-
737-@Verifier(tx)
738-func verify () = match tx {
739-    case order: Order => 
740-        let matcherPub = getMatcherPubOrFail()
741-        let orderValid = validateMatcherOrderAllowed(order)
742-        let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
743-        let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
744-        if (if (if (orderValid)
745-            then senderValid
746-            else false)
747-            then matcherValid
748-            else false)
749-            then true
750-            else throwOrderError(orderValid, senderValid, matcherValid)
751-    case _ => 
752-        let targetPublicKey =         match managerPublicKeyOrUnit() {
753-            case pk: ByteVector => 
754-                pk
755-            case _: Unit => 
756-                tx.senderPublicKey
757-            case _ => 
758-                throw("Match error")
759-        }
760-        sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
761-}
762454 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let lPdecimals = 8
5-
6-let scale8 = 100000000
7-
8-let scale8BigInt = toBigInt(100000000)
9-
10-let scale18 = toBigInt(1000000000000000000)
11-
12-let zeroBigInt = toBigInt(0)
13-
144 let SEP = "__"
155 
166 let EMPTY = ""
177 
18-let PoolActive = 1
19-
20-let PoolPutDisabled = 2
21-
22-let PoolMatcherDisabled = 3
23-
24-let PoolShutdown = 4
25-
26-let idxPoolAddress = 1
27-
28-let idxPoolStatus = 2
29-
30-let idxPoolLPAssetId = 3
31-
32-let idxAmtAssetId = 4
33-
34-let idxPriceAssetId = 5
35-
36-let idxAmtAssetDcm = 6
37-
38-let idxPriceAssetDcm = 7
39-
40-let idxIAmtAssetId = 8
41-
42-let idxIPriceAssetId = 9
43-
44-let idxLPAssetDcm = 10
45-
46-let idxPoolAmtAssetAmt = 1
47-
48-let idxPoolPriceAssetAmt = 2
49-
50-let idxPoolLPAssetAmt = 3
51-
52-let idxFactoryStakingContract = 1
53-
54-let idxFactorySlippageContract = 7
55-
56-func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult))
8+func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), ("No data for this.key=" + key))
579 
5810 
59-func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18))
11+func getBooleanOrFail (key) = valueOrErrorMessage(getBoolean(this, key), ("No data for this.key=" + key))
6012 
6113 
62-func toScale (amt,resScale,curScale) = fraction(amt, resScale, curScale)
14+func keyManagerPublicKey () = makeString(["%s", "managerPublicKey"], SEP)
6315 
6416 
65-func abs (val) = if ((zeroBigInt > val))
66-    then -(val)
67-    else val
17+func keyPendingManagerPublicKey () = makeString(["%s", "pendingManagerPublicKey"], SEP)
6818 
6919 
70-func keyFactoryContract () = "%s__factoryContract"
20+func failExecuteGet (msg,baseAssetStr,userAddressStr,getTxIdStr) = throw(((((((msg + ": baseAssetStr=") + baseAssetStr) + " userAddressStr=") + userAddressStr) + " getTxIdStr=") + getTxIdStr))
7121 
7222 
73-func keyManagerPublicKey () = "%s__managerPublicKey"
23+func keyAssetsStoreContract () = makeString(["%s", "assetsStoreContract"], SEP)
7424 
7525 
76-func keyPriceLast () = "%s%s__price__last"
26+func keyAssetCfg (baseAssetStr) = ("%s%s%s__config__asset__" + baseAssetStr)
7727 
7828 
79-func keyPriceHistory (h,timestamp) = makeString(["%s%s%d%d__price__history", toString(h), toString(timestamp)], SEP)
29+func keyProxyAddress (assetId) = makeString(["%s%s", "proxyAddress", assetId], SEP)
8030 
8131 
82-func keyPutActionByUser (userAddress,txId) = ((("%s%s%s__P__" + userAddress) + "__") + txId)
32+func keyBalance (assetId) = makeString(["%s%s", "balance", assetId], SEP)
8333 
8434 
85-func keyGetActionByUser (userAddress,txId) = ((("%s%s%s__G__" + userAddress) + "__") + txId)
35+func keyNextInternalAssetId () = "%s__nextInternalAssetId"
8636 
8737 
88-func keyAmtAsset () = "%s__amountAsset"
38+func keyPriceLast (internalBasetAssetStr) = ("%s%s%d__price__last__" + internalBasetAssetStr)
8939 
9040 
91-func keyPriceAsset () = "%s__priceAsset"
41+func keyTopUpLastHeight (internalBasetAssetStr,sender) = makeString(["%s%s%s%d%s__topup__last__height", internalBasetAssetStr, sender], SEP)
9242 
9343 
94-func keyKHistoric (h,timestamp) = makeString(["%s%s%d%d__K_history", toString(h), toString(timestamp)], SEP)
44+func keyPriceHistory (internalBasetAssetStr,h,timestamp) = makeString(["%s%s%d%d%d__price__history", internalBasetAssetStr, toString(h), toString(timestamp)], SEP)
9545 
9646 
97-func keyFactoryConfig () = "%s__factoryConfig"
47+func keyTotalLocked (internalBasetAssetStr) = ("%s%s%d__total__locked__" + internalBasetAssetStr)
9848 
9949 
100-func keyMatcherPub () = "%s%s__matcher__publicKey"
50+func keyTotalLockedByUser (internalBaseAssetStr,userAddressStr) = makeString(["%s%s%d%s__total__locked", internalBaseAssetStr, userAddressStr], SEP)
10151 
10252 
103-func keyMappingPoolContractAddressToPoolAssets (poolContractAddress) = (("%s%s%s__" + poolContractAddress) + "__mappings__poolContract2LpAsset")
104-
105-
106-func keyPoolConfig (iAmtAsset,iPriceAsset) = (((("%d%d%s__" + iAmtAsset) + "__") + iPriceAsset) + "__config")
53+func keyMappingsInternal2baseAssetId (internalBaseAsset) = ("%s%s%d__mappings__internal2baseAssetId__" + toString(internalBaseAsset))
10754 
10855 
10956 func keyMappingsBaseAsset2internalId (baseAssetStr) = ("%s%s%s__mappings__baseAsset2internalId__" + baseAssetStr)
11057 
11158 
112-func keyAllPoolsShutdown () = "%s__shutdown"
59+func keyMappingsShare2baseAssetId (shareAssetStr) = ("%s%s%s__mappings__share2baseAssetId__" + shareAssetStr)
11360 
11461 
115-func keyPoolWeight (contractAddress) = ("%s%s__poolWeight__" + contractAddress)
62+func keyMappingsBaseAsset2shareId (baseAssetStr) = ("%s%s%s__mappings__baseAsset2shareId__" + baseAssetStr)
11663 
11764 
118-func throwOrderError (orderValid,senderValid,matcherValid) = throw(((((("order validation failed: orderValid=" + toString(orderValid)) + " senderValid=") + toString(senderValid)) + " matcherValid=") + toString(matcherValid)))
65+func keyShutdownPutOperation (internalBaseAssetStr) = ("%s%s%d__shutdown__put__" + internalBaseAssetStr)
11966 
12067 
121-func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
68+func keyShutdownManager (internalBaseAssetStr) = ("%s%s%d__shutdown__manager__" + internalBaseAssetStr)
12269 
12370 
124-func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
71+func assetsStoreContract () = addressFromStringValue(value(getString(keyAssetsStoreContract())))
12572 
12673 
127-let factoryContract = addressFromStringValue(getStringOrFail(this, keyFactoryContract()))
74+let IdxCfgShareAssetId = 1
12875 
129-func isGlobalShutdown () = valueOrElse(getBoolean(factoryContract, keyAllPoolsShutdown()), false)
76+let IdxCfgInternalBaseAsset = 2
77+
78+let IdxCfgDecimalsMultBothAssets = 3
79+
80+let IdxCfgDecimalsMultPrice = 4
81+
82+let IdxCfgGetDelayBlocks = 5
83+
84+func dataAssetCfg (shareAssetStr,internalBaseAssetStr,decimalsMultBothAssets,decimalsMultPrice,getDelayInBlocks) = makeString(["%s%d%d%d%d", shareAssetStr, internalBaseAssetStr, toString(decimalsMultBothAssets), toString(decimalsMultPrice), toString(getDelayInBlocks)], SEP)
13085 
13186 
132-func getMatcherPubOrFail () = fromBase58String(getStringOrFail(factoryContract, keyMatcherPub()))
87+let IdxTotalLockedShare = 1
88+
89+let IdxTotalLockedBase = 2
90+
91+func dataTotalLocked (shareAssetAmount,baseAssetAmount) = makeString(["%d%d", toString(shareAssetAmount), toString(baseAssetAmount)], SEP)
13392 
13493 
135-func getPoolConfig () = {
136-    let amtAsset = getStringOrFail(this, keyAmtAsset())
137-    let priceAsset = getStringOrFail(this, keyPriceAsset())
138-    let iPriceAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(priceAsset))
139-    let iAmtAsset = getIntOrFail(factoryContract, keyMappingsBaseAsset2internalId(amtAsset))
140-    split(getStringOrFail(factoryContract, keyPoolConfig(toString(iAmtAsset), toString(iPriceAsset))), SEP)
94+func readTotalLocked (key) = {
95+    let totalLockedArray = split(valueOrElse(getString(this, key), dataTotalLocked(0, 0)), SEP)
96+[-1, parseIntValue(totalLockedArray[IdxTotalLockedShare]), parseIntValue(totalLockedArray[IdxTotalLockedBase])]
14197     }
14298 
14399 
144-func getFactoryConfig () = split(getStringOrFail(factoryContract, keyFactoryConfig()), SEP)
100+func keyOperation (operationType,internalBaseAssetStr,userAddress,txId) = makeString(["%s%d%s%s", operationType, internalBaseAssetStr, userAddress, txId], SEP)
145101 
146102 
147-func dataPutActionInfo (inAmtAssetAmt,inPriceAssetAmt,outLpAmt,price,slippageTolerancePassedByUser,slippageToleranceReal,txHeight,txTimestamp,slipageAmtAssetAmt,slipagePriceAssetAmt) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(inAmtAssetAmt), toString(inPriceAssetAmt), toString(outLpAmt), toString(price), toString(slippageTolerancePassedByUser), toString(slippageToleranceReal), toString(txHeight), toString(txTimestamp), toString(slipageAmtAssetAmt), toString(slipagePriceAssetAmt)], SEP)
103+let IdxOperStatus = 1
104+
105+let IdxOperInAmount = 2
106+
107+let IdxOperPrice = 3
108+
109+let IdxOperOutAmount = 4
110+
111+let IdxOperStartHeight = 5
112+
113+let IdxOperStartTimestamp = 6
114+
115+let IdxOperEndHeight = 7
116+
117+let IdxOperEndTimestamp = 8
118+
119+func privateDataOperationAllStrings (status,inAssetAmount,price,outAssetAmount,startHeight,startTimestamp,endHeight,endTimestamp) = makeString(["%s%d%d%d%d%d%d%d", status, inAssetAmount, price, outAssetAmount, startHeight, startTimestamp, endHeight, endTimestamp], SEP)
148120 
149121 
150-func dataGetActionInfo (outAmtAssetAmt,outPriceAssetAmt,inLpAmt,price,txHeight,txTimestamp) = makeString(["%d%d%d%d%d%d", toString(outAmtAssetAmt), toString(outPriceAssetAmt), toString(inLpAmt), toString(price), toString(txHeight), toString(txTimestamp)], SEP)
122+func dataOperation (status,inAssetAmount,price,outAssetAmount,startHeight,startTimestamp,endHeight,endTimestamp) = privateDataOperationAllStrings(status, toString(inAssetAmount), toString(price), toString(outAssetAmount), toString(startHeight), toString(startTimestamp), toString(endHeight), toString(endTimestamp))
151123 
152124 
153-func getAccBalance (assetId) = if ((assetId == "WAVES"))
154-    then wavesBalance(this).available
155-    else assetBalance(this, fromBase58String(assetId))
125+func dataOperationExecutionUpdate (currOperArray,newStatus,newEndTimestamp) = privateDataOperationAllStrings(newStatus, currOperArray[IdxOperInAmount], currOperArray[IdxOperPrice], currOperArray[IdxOperOutAmount], currOperArray[IdxOperStartHeight], currOperArray[IdxOperStartTimestamp], currOperArray[IdxOperEndHeight], toString(newEndTimestamp))
156126 
157127 
158-func calcPriceBigInt (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18)
159-
160-
161-func privateCalcPrice (amAssetDcm,prAssetDcm,amAmt,prAmt) = {
162-    let amtAssetAmtX18 = toX18(amAmt, amAssetDcm)
163-    let priceAssetAmtX18 = toX18(prAmt, prAssetDcm)
164-    calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
128+func readAssetCfgOrFail (baseAssetStr) = {
129+    let key = keyAssetCfg(baseAssetStr)
130+    split(getStringOrFail(key), SEP)
165131     }
166132 
167133 
168-func calcPrices (amAmt,prAmt,lpAmt) = {
169-    let cfg = getPoolConfig()
170-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
171-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
172-    let priceX18 = privateCalcPrice(amtAssetDcm, priceAssetDcm, amAmt, prAmt)
173-    let amAmtX18 = toX18(amAmt, amtAssetDcm)
174-    let prAmtX18 = toX18(prAmt, priceAssetDcm)
175-    let lpAmtX18 = toX18(lpAmt, scale8)
176-    let lpPriceInAmAssetX18 = calcPriceBigInt(amAmtX18, lpAmtX18)
177-    let lpPriceInPrAssetX18 = calcPriceBigInt(prAmtX18, lpAmtX18)
178-[priceX18, lpPriceInAmAssetX18, lpPriceInPrAssetX18]
134+func incrementTotalLocked (key,shareAssetAmount,baseAssetAmount) = {
135+    let dataArray = readTotalLocked(key)
136+    StringEntry(key, dataTotalLocked((dataArray[IdxTotalLockedShare] + shareAssetAmount), (dataArray[IdxTotalLockedBase] + baseAssetAmount)))
179137     }
180138 
181139 
182-func calculatePrices (amAmt,prAmt,lpAmt) = {
183-    let prices = calcPrices(amAmt, prAmt, lpAmt)
184-[fromX18(prices[0], scale8), fromX18(prices[1], scale8), fromX18(prices[2], scale8)]
140+func decrementTotalLocked (key,shareAssetAmount,baseAssetAmount) = {
141+    let dataArray = readTotalLocked(key)
142+    StringEntry(key, dataTotalLocked((dataArray[IdxTotalLockedShare] - shareAssetAmount), (dataArray[IdxTotalLockedBase] - baseAssetAmount)))
185143     }
186-
187-
188-func estimateGetOperation (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
189-    let cfg = getPoolConfig()
190-    let lpAssetId = cfg[idxPoolLPAssetId]
191-    let amAssetId = cfg[idxAmtAssetId]
192-    let prAssetId = cfg[idxPriceAssetId]
193-    let amAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
194-    let prAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
195-    let poolStatus = cfg[idxPoolStatus]
196-    let lpEmission = valueOrErrorMessage(assetInfo(fromBase58String(lpAssetId)), (("Asset " + lpAssetId) + " doesn't exist")).quantity
197-    if ((lpAssetId != pmtAssetId))
198-        then throw("Invalid asset passed.")
199-        else {
200-            let amBalance = getAccBalance(amAssetId)
201-            let amBalanceX18 = toX18(amBalance, amAssetDcm)
202-            let prBalance = getAccBalance(prAssetId)
203-            let prBalanceX18 = toX18(prBalance, prAssetDcm)
204-            let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18)
205-            let curPrice = fromX18(curPriceX18, scale8)
206-            let pmtLpAmtX18 = toX18(pmtLpAmt, scale8)
207-            let lpEmissionX18 = toX18(lpEmission, scale8)
208-            let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissionX18)
209-            let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissionX18)
210-            let outAmAmt = fromX18(outAmAmtX18, amAssetDcm)
211-            let outPrAmt = fromX18(outPrAmtX18, prAssetDcm)
212-            let state = if ((txId58 == ""))
213-                then nil
214-                else [ScriptTransfer(userAddress, outAmAmt, if ((amAssetId == "WAVES"))
215-                    then unit
216-                    else fromBase58String(amAssetId)), ScriptTransfer(userAddress, outPrAmt, if ((prAssetId == "WAVES"))
217-                    then unit
218-                    else fromBase58String(prAssetId)), StringEntry(keyGetActionByUser(toString(userAddress), txId58), dataGetActionInfo(outAmAmt, outPrAmt, pmtLpAmt, curPrice, height, lastBlock.timestamp)), IntegerEntry(keyPriceLast(), curPrice), IntegerEntry(keyPriceHistory(height, lastBlock.timestamp), curPrice)]
219-            $Tuple10(outAmAmt, outPrAmt, amAssetId, prAssetId, amBalance, prBalance, lpEmission, curPriceX18, poolStatus, state)
220-            }
221-    }
222-
223-
224-func estimatePutOperation (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = {
225-    let cfg = getPoolConfig()
226-    let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
227-    let amAssetIdStr = cfg[idxAmtAssetId]
228-    let prAssetIdStr = cfg[idxPriceAssetId]
229-    let iAmtAssetId = cfg[idxIAmtAssetId]
230-    let iPriceAssetId = cfg[idxIPriceAssetId]
231-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
232-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
233-    let poolStatus = cfg[idxPoolStatus]
234-    let lpEmission = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
235-    let inAmAssetIdStr = toBase58String(valueOrElse(inAmAssetId, fromBase58String("WAVES")))
236-    let inPrAssetIdStr = toBase58String(valueOrElse(inPrAssetId, fromBase58String("WAVES")))
237-    if (if ((amAssetIdStr != inAmAssetIdStr))
238-        then true
239-        else (prAssetIdStr != inPrAssetIdStr))
240-        then throw("Invalid amt or price asset passed.")
241-        else {
242-            let amBalance = if (isEvaluate)
243-                then getAccBalance(amAssetIdStr)
244-                else (getAccBalance(amAssetIdStr) - inAmAssetAmt)
245-            let prBalance = if (isEvaluate)
246-                then getAccBalance(prAssetIdStr)
247-                else (getAccBalance(prAssetIdStr) - inPrAssetAmt)
248-            let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
249-            let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
250-            let userPriceX18 = calcPriceBigInt(inPrAssetAmtX18, inAmAssetAmtX18)
251-            let amBalanceX18 = toX18(amBalance, amtAssetDcm)
252-            let prBalanceX18 = toX18(prBalance, priceAssetDcm)
253-            let res = if ((lpEmission == 0))
254-                then {
255-                    let curPriceX18 = zeroBigInt
256-                    let slippageX18 = zeroBigInt
257-                    let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN)
258-                    $Tuple5(fromX18(lpAmtX18, scale8), fromX18(inAmAssetAmtX18, amtAssetDcm), fromX18(inPrAssetAmtX18, priceAssetDcm), calcPriceBigInt((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18)
259-                    }
260-                else {
261-                    let curPriceX18 = calcPriceBigInt(prBalanceX18, amBalanceX18)
262-                    let slippageX18 = fraction(abs((curPriceX18 - userPriceX18)), scale18, curPriceX18)
263-                    let slippageToleranceX18 = toX18(slippageTolerance, scale8)
264-                    if (if ((curPriceX18 != zeroBigInt))
265-                        then (slippageX18 > slippageToleranceX18)
266-                        else false)
267-                        then throw(((("Price slippage " + toString(slippageX18)) + " exceeded the passed limit of ") + toString(slippageToleranceX18)))
268-                        else {
269-                            let lpEmissionX18 = toX18(lpEmission, scale8)
270-                            let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
271-                            let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
272-                            let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
273-                                then $Tuple2(amViaPrX18, inPrAssetAmtX18)
274-                                else $Tuple2(inAmAssetAmtX18, prViaAmX18)
275-                            let expAmtAssetAmtX18 = expectedAmts._1
276-                            let expPriceAssetAmtX18 = expectedAmts._2
277-                            let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
278-                            $Tuple5(fromX18(lpAmtX18, scale8), fromX18(expAmtAssetAmtX18, amtAssetDcm), fromX18(expPriceAssetAmtX18, priceAssetDcm), curPriceX18, slippageX18)
279-                            }
280-                    }
281-            let calcLpAmt = res._1
282-            let calcAmAssetPmt = res._2
283-            let calcPrAssetPmt = res._3
284-            let curPrice = fromX18(res._4, scale8)
285-            let slippageCalc = fromX18(res._5, scale8)
286-            if ((0 >= calcLpAmt))
287-                then throw("Invalid calculations. LP calculated is less than zero.")
288-                else {
289-                    let emitLpAmt = if (!(emitLp))
290-                        then 0
291-                        else calcLpAmt
292-                    let amDiff = (inAmAssetAmt - calcAmAssetPmt)
293-                    let prDiff = (inPrAssetAmt - calcPrAssetPmt)
294-                    let commonState = [IntegerEntry(keyPriceLast(), curPrice), IntegerEntry(keyPriceHistory(height, lastBlock.timestamp), curPrice), StringEntry(keyPutActionByUser(userAddress, txId58), dataPutActionInfo(calcAmAssetPmt, calcPrAssetPmt, emitLpAmt, curPrice, slippageTolerance, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))]
295-                    $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEmission, lpAssetId, poolStatus, commonState, amDiff, prDiff, inAmAssetId, inPrAssetId)
296-                    }
297-            }
298-    }
299-
300-
301-func validateMatcherOrderAllowed (order) = {
302-    let cfg = getPoolConfig()
303-    let amtAssetId = cfg[idxAmtAssetId]
304-    let priceAssetId = cfg[idxPriceAssetId]
305-    let poolStatus = parseIntValue(cfg[idxPoolStatus])
306-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
307-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
308-    let accAmtAssetBalance = getAccBalance(amtAssetId)
309-    let accPriceAssetBalance = getAccBalance(priceAssetId)
310-    let curPriceX18 = if ((order.orderType == Buy))
311-        then privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance + order.amount), accPriceAssetBalance)
312-        else privateCalcPrice(amtAssetDcm, priceAssetDcm, (accAmtAssetBalance - order.amount), accPriceAssetBalance)
313-    let curPrice = fromX18(curPriceX18, scale8)
314-    if (if (if (isGlobalShutdown())
315-        then true
316-        else (poolStatus == PoolMatcherDisabled))
317-        then true
318-        else (poolStatus == PoolShutdown))
319-        then throw("Exchange operations disabled")
320-        else {
321-            let orderAmtAsset = order.assetPair.amountAsset
322-            let orderAmtAssetStr = if ((orderAmtAsset == unit))
323-                then "WAVES"
324-                else toBase58String(value(orderAmtAsset))
325-            let orderPriceAsset = order.assetPair.priceAsset
326-            let orderPriceAssetStr = if ((orderPriceAsset == unit))
327-                then "WAVES"
328-                else toBase58String(value(orderPriceAsset))
329-            if (if ((orderAmtAssetStr != amtAssetId))
330-                then true
331-                else (orderPriceAssetStr != priceAssetId))
332-                then throw("Wrong order assets.")
333-                else {
334-                    let orderPrice = order.price
335-                    let priceDcm = fraction(scale8, priceAssetDcm, amtAssetDcm)
336-                    let castedOrderPrice = toScale(orderPrice, scale8, priceDcm)
337-                    let isOrderPriceValid = if ((order.orderType == Buy))
338-                        then (curPrice >= castedOrderPrice)
339-                        else (castedOrderPrice >= curPrice)
340-                    true
341-                    }
342-            }
343-    }
344-
345-
346-func commonGet (i) = if ((size(i.payments) != 1))
347-    then throw("exactly 1 payment is expected")
348-    else {
349-        let pmt = value(i.payments[0])
350-        let pmtAssetId = value(pmt.assetId)
351-        let pmtAmt = pmt.amount
352-        let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
353-        let outAmAmt = res._1
354-        let outPrAmt = res._2
355-        let poolStatus = parseIntValue(res._9)
356-        let state = res._10
357-        if (if (isGlobalShutdown())
358-            then true
359-            else (poolStatus == PoolShutdown))
360-            then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
361-            else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
362-        }
363-
364-
365-func commonPut (i,slippageTolerance,emitLp) = if ((size(i.payments) != 2))
366-    then throw("exactly 2 payments are expected")
367-    else {
368-        let amAssetPmt = value(i.payments[0])
369-        let prAssetPmt = value(i.payments[1])
370-        let estPut = estimatePutOperation(toBase58String(i.transactionId), slippageTolerance, amAssetPmt.amount, amAssetPmt.assetId, prAssetPmt.amount, prAssetPmt.assetId, toString(i.caller), false, emitLp)
371-        let poolStatus = parseIntValue(estPut._8)
372-        if (if (if (isGlobalShutdown())
373-            then true
374-            else (poolStatus == PoolPutDisabled))
375-            then true
376-            else (poolStatus == PoolShutdown))
377-            then throw(("Put operation is blocked by admin. Status = " + toString(poolStatus)))
378-            else estPut
379-        }
380144 
381145 
382146 func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
383147     case s: String => 
384148         fromBase58String(s)
385149     case _: Unit => 
386150         unit
387151     case _ => 
388152         throw("Match error")
389153 }
390154 
391155 
156+func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
157+    case s: String => 
158+        fromBase58String(s)
159+    case _: Unit => 
160+        unit
161+    case _ => 
162+        throw("Match error")
163+}
164+
165+
166+func balanceOrZero (assetId) = valueOrElse(getInteger(keyBalance(assetId)), 0)
167+
168+
169+func genericCalcPrice (balance,internalBaseAssetStr,baseAssetId,topUpBaseAmount,shareAssetId,decimalsMultBothAssets,decimalsMultPrice) = {
170+    let totalLockedArray = readTotalLocked(keyTotalLocked(internalBaseAssetStr))
171+    let totalLockedBaseAmount = totalLockedArray[IdxTotalLockedBase]
172+    let baseAssetBalance = balance
173+    let baseAssetBalanceConsideringLock = ((baseAssetBalance - totalLockedBaseAmount) + topUpBaseAmount)
174+    if ((0 > baseAssetBalanceConsideringLock))
175+        then throw(((("baseAssetBalanceConsideringLock < 0: baseAssetBalance=" + toString(baseAssetBalance)) + " baseAssetBalanceConsideringLock=") + toString(baseAssetBalanceConsideringLock)))
176+        else {
177+            let shareEmission = value(assetInfo(shareAssetId)).quantity
178+            let price = if ((shareEmission == 0))
179+                then (1 * decimalsMultPrice)
180+                else fraction(baseAssetBalanceConsideringLock, decimalsMultPrice, shareEmission)
181+            $Tuple5(price, baseAssetBalance, totalLockedBaseAmount, baseAssetBalanceConsideringLock, shareEmission)
182+            }
183+    }
184+
185+
186+func calcPrice (balance,internalBaseAssetStr,baseAssetId,shareAssetId,decimalsMultBothAssets,decimalsMultPrice) = genericCalcPrice(balance, internalBaseAssetStr, baseAssetId, 0, shareAssetId, decimalsMultBothAssets, decimalsMultPrice)
187+
188+
189+func privateCurrentSysParamsREST (baseAssetStr) = {
190+    let baseAssetId = fromBase58String(baseAssetStr)
191+    let cfgArray = readAssetCfgOrFail(baseAssetStr)
192+    let shareAssetStr = cfgArray[IdxCfgShareAssetId]
193+    let shareAssetId = fromBase58String(shareAssetStr)
194+    let decimalsMultBothAssets = parseIntValue(cfgArray[IdxCfgDecimalsMultBothAssets])
195+    let decimalsMultPrice = parseIntValue(cfgArray[IdxCfgDecimalsMultPrice])
196+    let internalBaseAssetStr = cfgArray[IdxCfgInternalBaseAsset]
197+    let sysState = calcPrice(balanceOrZero(baseAssetStr), internalBaseAssetStr, baseAssetId, shareAssetId, decimalsMultBothAssets, decimalsMultPrice)
198+    $Tuple6(IntegerEntry("price", sysState._1), IntegerEntry("decimalsMultPrice", decimalsMultPrice), IntegerEntry("baseAssetBalance", sysState._2), IntegerEntry("totalLockedBaseAmount", sysState._3), IntegerEntry("baseAssetBalanceConsideringLock", sysState._4), IntegerEntry("shareEmission", sysState._5))
199+    }
200+
201+
392202 func mustManager (i) = {
393-    let pd = throw("Permission denied")
203+    let pd = throw("permission denied")
394204     match managerPublicKeyOrUnit() {
395205         case pk: ByteVector => 
396206             if ((i.callerPublicKey == pk))
397207                 then true
398208                 else pd
399209         case _: Unit => 
400210             if ((i.caller == this))
401211                 then true
402212                 else pd
403213         case _ => 
404214             throw("Match error")
405215     }
406216     }
407217 
408218 
219+func mustProxyAddress (i,assetId) = {
220+    let isProxy = (toString(i.caller) == valueOrElse(getString(keyProxyAddress(assetId)), EMPTY))
221+    if (isProxy)
222+        then true
223+        else {
224+            let checkCaller = mustManager(i)
225+            if ((checkCaller == checkCaller))
226+                then true
227+                else throw("Strict value is not equal to itself.")
228+            }
229+    }
230+
231+
409232 @Callable(i)
410-func constructor (factoryContract) = {
233+func constructor (assetsStoreContract) = {
411234     let checkCaller = mustManager(i)
412235     if ((checkCaller == checkCaller))
413-        then [StringEntry(keyFactoryContract(), factoryContract)]
236+        then [StringEntry(keyAssetsStoreContract(), assetsStoreContract)]
414237         else throw("Strict value is not equal to itself.")
415238     }
416239 
417240 
418241 
419242 @Callable(i)
420-func setManager (managerPublicKey) = {
243+func adminRegisterAsset (baseAssetStr,shareAssetName,shareAssetDescr,shareAssetLogo,getDelayinBlocks,shutdownManagerAddress,proxyAddress) = {
244+    let baseAssetId = fromBase58String(baseAssetStr)
245+    let decimals = value(assetInfo(baseAssetId)).decimals
246+    let check = mustManager(i)
247+    if ((check == check))
248+        then if ((toString(addressFromStringValue(shutdownManagerAddress)) != shutdownManagerAddress))
249+            then throw("invalid shutdownManagerAddress")
250+            else if ((0 > getDelayinBlocks))
251+                then throw(("invalid getDelayinBlocks=" + toString(getDelayinBlocks)))
252+                else {
253+                    let shareAssetIssueAction = Issue(shareAssetName, shareAssetDescr, 1, decimals, true)
254+                    let shareAssetId = calculateAssetId(shareAssetIssueAction)
255+                    let shareAssetStr = toBase58String(shareAssetId)
256+                    let decimalsMultPrice = ((100 * 1000) * 1000)
257+                    let decimalsMultBothAssets = pow(10, 0, decimals, 0, 0, DOWN)
258+                    let startPrice = (1 * decimalsMultPrice)
259+                    let internalBaseAssettId = valueOrElse(getInteger(this, keyNextInternalAssetId()), 0)
260+                    let internalBaseAssetStr = toString(internalBaseAssettId)
261+                    let createOrUpdate = invoke(assetsStoreContract(), "createOrUpdate", [shareAssetStr, shareAssetLogo, false], nil)
262+                    if ((createOrUpdate == createOrUpdate))
263+                        then {
264+                            let addLabel = invoke(assetsStoreContract(), "addLabel", [shareAssetStr, "DEFI"], nil)
265+                            if ((addLabel == addLabel))
266+                                then [StringEntry(keyAssetCfg(baseAssetStr), dataAssetCfg(shareAssetStr, internalBaseAssetStr, decimalsMultBothAssets, decimalsMultPrice, getDelayinBlocks)), StringEntry(keyMappingsInternal2baseAssetId(internalBaseAssettId), baseAssetStr), StringEntry(keyMappingsBaseAsset2internalId(baseAssetStr), internalBaseAssetStr), StringEntry(keyMappingsShare2baseAssetId(shareAssetStr), baseAssetStr), StringEntry(keyMappingsBaseAsset2shareId(baseAssetStr), shareAssetStr), BooleanEntry(keyShutdownPutOperation(internalBaseAssetStr), false), StringEntry(keyShutdownManager(internalBaseAssetStr), shutdownManagerAddress), IntegerEntry(keyNextInternalAssetId(), (internalBaseAssettId + 1)), IntegerEntry(keyPriceLast(internalBaseAssetStr), startPrice), IntegerEntry(keyPriceHistory(internalBaseAssetStr, height, lastBlock.timestamp), startPrice), shareAssetIssueAction, Burn(shareAssetId, 1), StringEntry(keyProxyAddress(baseAssetStr), proxyAddress)]
267+                                else throw("Strict value is not equal to itself.")
268+                            }
269+                        else throw("Strict value is not equal to itself.")
270+                    }
271+        else throw("Strict value is not equal to itself.")
272+    }
273+
274+
275+
276+@Callable(i)
277+func shutdownPut (internalBaseAssetId) = {
278+    let internalBaseAssetIdStr = toString(internalBaseAssetId)
279+    let baseAssetIdStr = getStringOrFail(keyMappingsInternal2baseAssetId(internalBaseAssetId))
280+    let shutdownManagerAddress = getStringOrFail(keyShutdownManager(internalBaseAssetIdStr))
281+    if ((1 > size(baseAssetIdStr)))
282+        then throw("invalid internalBaseAssetId")
283+        else if ((toString(i.caller) != shutdownManagerAddress))
284+            then throw("access denied")
285+            else [BooleanEntry(keyShutdownPutOperation(toString(internalBaseAssetId)), true)]
286+    }
287+
288+
289+
290+@Callable(i)
291+func put () = {
292+    let pmt = value(i.payments[0])
293+    let baseAssetId = value(pmt.assetId)
294+    let baseAssetStr = toBase58String(baseAssetId)
295+    let userAddressStr = toString(i.caller)
296+    let cfgArray = readAssetCfgOrFail(baseAssetStr)
297+    let shareAssetStr = cfgArray[IdxCfgShareAssetId]
298+    let shareAssetId = fromBase58String(shareAssetStr)
299+    let decimalsMultBothAssets = parseIntValue(cfgArray[IdxCfgDecimalsMultBothAssets])
300+    let decimalsMultPrice = parseIntValue(cfgArray[IdxCfgDecimalsMultPrice])
301+    let internalBaseAssetStr = cfgArray[IdxCfgInternalBaseAsset]
302+    let isPutBlocked = getBooleanOrFail(keyShutdownPutOperation(internalBaseAssetStr))
303+    if (isPutBlocked)
304+        then throw("put operation is blocked")
305+        else {
306+            let balance = (balanceOrZero(baseAssetStr) + pmt.amount)
307+            let price = calcPrice(balance, internalBaseAssetStr, baseAssetId, shareAssetId, decimalsMultBothAssets, decimalsMultPrice)._1
308+            let shareAssetAmount = fraction(pmt.amount, decimalsMultPrice, price)
309+[Reissue(shareAssetId, shareAssetAmount, true), ScriptTransfer(i.caller, shareAssetAmount, shareAssetId), StringEntry(keyOperation("P", internalBaseAssetStr, userAddressStr, toBase58String(i.transactionId)), dataOperation("FINISHED", pmt.amount, price, shareAssetAmount, height, lastBlock.timestamp, height, lastBlock.timestamp)), ScriptTransfer(addressFromStringValue(value(getString(keyProxyAddress(baseAssetStr)))), pmt.amount, baseAssetId), IntegerEntry(keyBalance(baseAssetStr), balance)]
310+            }
311+    }
312+
313+
314+
315+@Callable(i)
316+func submitGetRequest () = {
317+    let pmt = value(i.payments[0])
318+    let shareAssetId = value(pmt.assetId)
319+    let shareAssetStr = toBase58String(shareAssetId)
320+    let callerPubStr = toBase58String(i.callerPublicKey)
321+    let userAddress = i.caller
322+    let userAddressStr = toString(userAddress)
323+    let shareAssetAmount = pmt.amount
324+    let baseAssetStr = getStringOrFail(keyMappingsShare2baseAssetId(shareAssetStr))
325+    let baseAssetId = fromBase58String(baseAssetStr)
326+    let cfgArray = readAssetCfgOrFail(baseAssetStr)
327+    let decimalsMultBothAssets = parseIntValue(cfgArray[IdxCfgDecimalsMultBothAssets])
328+    let decimalsMultPrice = parseIntValue(cfgArray[IdxCfgDecimalsMultPrice])
329+    let getDelayBlocks = parseIntValue(cfgArray[IdxCfgGetDelayBlocks])
330+    let internalBaseAssetStr = cfgArray[IdxCfgInternalBaseAsset]
331+    let price = calcPrice(balanceOrZero(baseAssetStr), internalBaseAssetStr, baseAssetId, shareAssetId, decimalsMultBothAssets, decimalsMultPrice)._1
332+    let baseAssetAmount = fraction(shareAssetAmount, price, decimalsMultPrice)
333+    let operationKey = keyOperation("G", internalBaseAssetStr, userAddressStr, toBase58String(i.transactionId))
334+    let operationData = dataOperation("PENDING", shareAssetAmount, price, baseAssetAmount, height, lastBlock.timestamp, (height + getDelayBlocks), 0)
335+    let balance = balanceOrZero(baseAssetStr)
336+[Burn(shareAssetId, shareAssetAmount), StringEntry(operationKey, operationData), incrementTotalLocked(keyTotalLocked(internalBaseAssetStr), shareAssetAmount, baseAssetAmount), incrementTotalLocked(keyTotalLockedByUser(internalBaseAssetStr, userAddressStr), shareAssetAmount, baseAssetAmount)]
337+    }
338+
339+
340+
341+@Callable(i)
342+func executeGetRequest (baseAssetStr,userAddressStr,getTxIdStr) = {
343+    let userAddress = addressFromStringValue(userAddressStr)
344+    let assetCfgArray = readAssetCfgOrFail(baseAssetStr)
345+    let shareAssetId = fromBase58String(assetCfgArray[IdxCfgShareAssetId])
346+    let baseAssetId = fromBase58String(baseAssetStr)
347+    let internalBaseAssetStr = assetCfgArray[IdxCfgInternalBaseAsset]
348+    let operationKey = keyOperation("G", internalBaseAssetStr, userAddressStr, getTxIdStr)
349+    let operationArray = split(getStringOrFail(operationKey), SEP)
350+    let status = operationArray[IdxOperStatus]
351+    let endHeight = parseIntValue(operationArray[IdxOperEndHeight])
352+    let inShareAmount = parseIntValue(operationArray[IdxOperInAmount])
353+    let outBaseAmount = parseIntValue(operationArray[IdxOperOutAmount])
354+    if ((status != "PENDING"))
355+        then failExecuteGet("Status is not PENDING", baseAssetStr, userAddressStr, getTxIdStr)
356+        else if ((endHeight > height))
357+            then failExecuteGet(((("EndHeight[" + toString(endHeight)) + "] > ") + toString(height)), baseAssetStr, userAddressStr, getTxIdStr)
358+            else [ScriptTransfer(userAddress, outBaseAmount, baseAssetId), StringEntry(operationKey, dataOperationExecutionUpdate(operationArray, "FINISHED", lastBlock.timestamp)), decrementTotalLocked(keyTotalLocked(internalBaseAssetStr), inShareAmount, outBaseAmount), decrementTotalLocked(keyTotalLockedByUser(internalBaseAssetStr, userAddressStr), inShareAmount, outBaseAmount), IntegerEntry(keyBalance(baseAssetStr), (balanceOrZero(baseAssetStr) - outBaseAmount))]
359+    }
360+
361+
362+
363+@Callable(i)
364+func topUpBalance (baseAssetStr,delta) = {
365+    let assetCfgArray = readAssetCfgOrFail(baseAssetStr)
366+    let pmt = value(i.payments[0])
367+    let pmtAssetId = value(pmt.assetId)
368+    let pmtAssetStr = toBase58String(pmtAssetId)
369+    let shareAssetId = fromBase58String(assetCfgArray[IdxCfgShareAssetId])
370+    let decimalsMultBothAssets = parseIntValue(assetCfgArray[IdxCfgDecimalsMultBothAssets])
371+    let decimalsMultPrice = parseIntValue(assetCfgArray[IdxCfgDecimalsMultPrice])
372+    let internalBaseAssetStr = assetCfgArray[IdxCfgInternalBaseAsset]
373+    let topUpLastHeightKEY = keyTopUpLastHeight(internalBaseAssetStr, toString(i.caller))
374+    let topUpLastHeight = valueOrElse(getInteger(this, topUpLastHeightKEY), 0)
375+    let checks = [mustProxyAddress(i, baseAssetStr), if ((topUpLastHeight != height))
376+        then true
377+        else throw("only one topUp per block is allowed")]
378+    if ((checks == checks))
379+        then if ((baseAssetStr != pmtAssetStr))
380+            then throw("attached payment's asset id is NOT matched passed baseAssetStr")
381+            else if ((size(i.payments) > 1))
382+                then throw("only one payment can be attached")
383+                else {
384+                    let newBalance = (balanceOrZero(pmtAssetStr) + delta)
385+                    let price = genericCalcPrice(newBalance, internalBaseAssetStr, pmtAssetId, pmt.amount, shareAssetId, decimalsMultBothAssets, decimalsMultPrice)._1
386+[IntegerEntry(keyPriceLast(internalBaseAssetStr), price), IntegerEntry(keyPriceHistory(internalBaseAssetStr, height, lastBlock.timestamp), price), IntegerEntry(topUpLastHeightKEY, height), IntegerEntry(keyBalance(pmtAssetStr), newBalance)]
387+                    }
388+        else throw("Strict value is not equal to itself.")
389+    }
390+
391+
392+
393+@Callable(i)
394+func currentSysParamsREST (baseAssetStr) = {
395+    let sysStateTuple = privateCurrentSysParamsREST(baseAssetStr)
396+    let price = sysStateTuple._1.value
397+    let decimalsMultPrice = sysStateTuple._2.value
398+    let baseAssetBalance = sysStateTuple._3.value
399+    let totalLockedBaseAmount = sysStateTuple._4.value
400+    let baseAssetBalanceConsideringLock = sysStateTuple._5.value
401+    let shareEmission = sysStateTuple._6.value
402+    let restData = makeString(["startCurrentSysParamsREST", toString(price), toString(decimalsMultPrice), toString(baseAssetBalance), toString(totalLockedBaseAmount), toString(baseAssetBalanceConsideringLock), toString(shareEmission), "endCurrentSysParamsREST"], SEP)
403+    throw(restData)
404+    }
405+
406+
407+
408+@Callable(i)
409+func setManager (pendingManagerPublicKey) = {
421410     let checkCaller = mustManager(i)
422411     if ((checkCaller == checkCaller))
423412         then {
424-            let checkManagerPublicKey = fromBase58String(managerPublicKey)
413+            let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
425414             if ((checkManagerPublicKey == checkManagerPublicKey))
426-                then [StringEntry(keyManagerPublicKey(), managerPublicKey)]
415+                then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
427416                 else throw("Strict value is not equal to itself.")
428417             }
429418         else throw("Strict value is not equal to itself.")
430419     }
431420 
432421 
433422 
434423 @Callable(i)
435-func put (slippageTolerance,shouldAutoStake) = {
436-    let factoryCfg = getFactoryConfig()
437-    let stakingContract = valueOrErrorMessage(addressFromString(factoryCfg[idxFactoryStakingContract]), "Error. Incorrect staking address.")
438-    let slippageContract = valueOrErrorMessage(addressFromString(factoryCfg[idxFactorySlippageContract]), "Error. Incorrect slippage contract address.")
439-    if ((0 > slippageTolerance))
440-        then throw("Invalid slippageTolerance passed")
441-        else {
442-            let estPut = commonPut(i, slippageTolerance, true)
443-            let emitLpAmt = estPut._2
444-            let lpAssetId = estPut._7
445-            let state = estPut._9
446-            let amDiff = estPut._10
447-            let prDiff = estPut._11
448-            let amId = estPut._12
449-            let prId = estPut._13
450-            let emitInv = invoke(factoryContract, "emit", [emitLpAmt], nil)
451-            if ((emitInv == emitInv))
452-                then {
453-                    let emitInvLegacy =                     match emitInv {
454-                        case legacyFactoryContract: Address => 
455-                            invoke(legacyFactoryContract, "emit", [emitLpAmt], nil)
456-                        case _ => 
457-                            unit
458-                    }
459-                    if ((emitInvLegacy == emitInvLegacy))
460-                        then {
461-                            let slippageAInv = if ((amDiff > 0))
462-                                then invoke(slippageContract, "put", nil, [AttachedPayment(amId, amDiff)])
463-                                else nil
464-                            if ((slippageAInv == slippageAInv))
465-                                then {
466-                                    let slippagePInv = if ((prDiff > 0))
467-                                        then invoke(slippageContract, "put", nil, [AttachedPayment(prId, prDiff)])
468-                                        else nil
469-                                    if ((slippagePInv == slippagePInv))
470-                                        then {
471-                                            let lpTransfer = if (shouldAutoStake)
472-                                                then {
473-                                                    let slpStakeInv = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
474-                                                    if ((slpStakeInv == slpStakeInv))
475-                                                        then nil
476-                                                        else throw("Strict value is not equal to itself.")
477-                                                    }
478-                                                else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
479-                                            (state ++ lpTransfer)
480-                                            }
481-                                        else throw("Strict value is not equal to itself.")
482-                                    }
483-                                else throw("Strict value is not equal to itself.")
484-                            }
485-                        else throw("Strict value is not equal to itself.")
486-                    }
487-                else throw("Strict value is not equal to itself.")
488-            }
489-    }
490-
491-
492-
493-@Callable(i)
494-func putForFree (maxSlippage) = if ((0 > maxSlippage))
495-    then throw("Invalid value passed")
496-    else {
497-        let estPut = commonPut(i, maxSlippage, false)
498-        estPut._9
499-        }
500-
501-
502-
503-@Callable(i)
504-func get () = {
505-    let res = commonGet(i)
506-    let outAmtAmt = res._1
507-    let outPrAmt = res._2
508-    let pmtAmt = res._3
509-    let pmtAssetId = res._4
510-    let state = res._5
511-    let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
512-    if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
513-        then state
514-        else throw("Strict value is not equal to itself.")
515-    }
516-
517-
518-
519-@Callable(i)
520-func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
521-    let res = commonGet(i)
522-    let outAmAmt = res._1
523-    let outPrAmt = res._2
524-    let pmtAmt = res._3
525-    let pmtAssetId = res._4
526-    let state = res._5
527-    if ((noLessThenAmtAsset > outAmAmt))
528-        then throw(((("noLessThenAmtAsset failed:  " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
529-        else if ((noLessThenPriceAsset > outPrAmt))
530-            then throw(((("noLessThenPriceAsset failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
531-            else {
532-                let burnLPAssetOnFactory = invoke(factoryContract, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
533-                if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
534-                    then state
535-                    else throw("Strict value is not equal to itself.")
536-                }
537-    }
538-
539-
540-
541-@Callable(i)
542-func unstakeAndGet (amount) = {
543-    let checkPayments = if ((size(i.payments) != 0))
544-        then throw("No payments are expected")
545-        else true
546-    if ((checkPayments == checkPayments))
424+func confirmManager () = {
425+    let pm = pendingManagerPublicKeyOrUnit()
426+    let hasPM = if (isDefined(pm))
427+        then true
428+        else throw("no pending manager")
429+    if ((hasPM == hasPM))
547430         then {
548-            let cfg = getPoolConfig()
549-            let factoryCfg = getFactoryConfig()
550-            let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
551-            let stakingContract = valueOrErrorMessage(addressFromString(factoryCfg[idxFactoryStakingContract]), "Error. Incorrect staking address.")
552-            let unstakeInv = invoke(stakingContract, "unstake", [toBase58String(lpAssetId), amount], nil)
553-            if ((unstakeInv == unstakeInv))
554-                then {
555-                    let res = estimateGetOperation(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
556-                    let poolStatus = parseIntValue(res._9)
557-                    let state = res._10
558-                    let checkPoolStatus = if (if (isGlobalShutdown())
559-                        then true
560-                        else (poolStatus == PoolShutdown))
561-                        then throw(("Get operation is blocked by admin. Status = " + toString(poolStatus)))
562-                        else true
563-                    if ((checkPoolStatus == checkPoolStatus))
564-                        then {
565-                            let burnLPAssetOnFactory = invoke(factoryContract, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
566-                            if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
567-                                then state
568-                                else throw("Strict value is not equal to itself.")
569-                            }
570-                        else throw("Strict value is not equal to itself.")
571-                    }
431+            let checkPM = if ((i.callerPublicKey == value(pm)))
432+                then true
433+                else throw("you are not pending manager")
434+            if ((checkPM == checkPM))
435+                then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
572436                 else throw("Strict value is not equal to itself.")
573437             }
574438         else throw("Strict value is not equal to itself.")
575439     }
576440 
577441 
578-
579-@Callable(i)
580-func activate (amtAssetStr,priceAssetStr) = if ((toString(i.caller) != toString(factoryContract)))
581-    then throw("permissions denied")
582-    else $Tuple2([StringEntry(keyAmtAsset(), amtAssetStr), StringEntry(keyPriceAsset(), priceAssetStr)], "success")
583-
584-
585-
586-@Callable(i)
587-func getPoolConfigWrapperREADONLY () = $Tuple2(nil, getPoolConfig())
588-
589-
590-
591-@Callable(i)
592-func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
593-
594-
595-
596-@Callable(i)
597-func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
598-    let prices = calcPrices(amAmt, prAmt, lpAmt)
599-    $Tuple2(nil, [toString(prices[0]), toString(prices[1]), toString(prices[2])])
442+@Verifier(tx)
443+func verify () = {
444+    let targetPublicKey =     match managerPublicKeyOrUnit() {
445+        case pk: ByteVector => 
446+            pk
447+        case _: Unit => 
448+            tx.senderPublicKey
449+        case _ => 
450+            throw("Match error")
600451     }
601-
602-
603-
604-@Callable(i)
605-func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(toX18(origVal, origScaleMult)))
606-
607-
608-
609-@Callable(i)
610-func fromX18WrapperREADONLY (val,resultScaleMult) = $Tuple2(nil, fromX18(parseBigIntValue(val), resultScaleMult))
611-
612-
613-
614-@Callable(i)
615-func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(calcPriceBigInt(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
616-
617-
618-
619-@Callable(i)
620-func estimatePutOperationWrapperREADONLY (txId58,slippageTolerance,inAmAssetAmt,inAmAssetId,inPrAssetAmt,inPrAssetId,userAddress,isEvaluate,emitLp) = $Tuple2(nil, estimatePutOperation(txId58, slippageTolerance, inAmAssetAmt, inAmAssetId, inPrAssetAmt, inPrAssetId, userAddress, isEvaluate, emitLp))
621-
622-
623-
624-@Callable(i)
625-func estimateGetOperationWrapperREADONLY (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
626-    let res = estimateGetOperation(txId58, pmtAssetId, pmtLpAmt, addressFromStringValue(userAddress))
627-    $Tuple2(nil, $Tuple10(res._1, res._2, res._3, res._4, res._5, res._6, res._7, toString(res._8), res._9, res._10))
452+    sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
628453     }
629-
630-
631-
632-@Callable(i)
633-func statsREADONLY () = {
634-    let cfg = getPoolConfig()
635-    let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
636-    let amtAssetId = cfg[idxAmtAssetId]
637-    let priceAssetId = cfg[idxPriceAssetId]
638-    let iAmtAssetId = cfg[idxIAmtAssetId]
639-    let iPriceAssetId = cfg[idxIPriceAssetId]
640-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
641-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
642-    let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
643-    let accAmtAssetBalance = getAccBalance(amtAssetId)
644-    let accPriceAssetBalance = getAccBalance(priceAssetId)
645-    let pricesList = if ((poolLPBalance == 0))
646-        then [zeroBigInt, zeroBigInt, zeroBigInt]
647-        else calcPrices(accAmtAssetBalance, accPriceAssetBalance, poolLPBalance)
648-    let curPrice = 0
649-    let lpAmtAssetShare = fromX18(pricesList[1], scale8)
650-    let lpPriceAssetShare = fromX18(pricesList[2], scale8)
651-    let poolWeight = value(getInteger(factoryContract, keyPoolWeight(toString(this))))
652-    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d", toString(accAmtAssetBalance), toString(accPriceAssetBalance), toString(poolLPBalance), toString(curPrice), toString(lpAmtAssetShare), toString(lpPriceAssetShare), toString(poolWeight)], SEP))
653-    }
654-
655-
656-
657-@Callable(i)
658-func evaluatePutByAmountAssetREADONLY (inAmAssetAmt) = {
659-    let cfg = getPoolConfig()
660-    let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
661-    let amAssetIdStr = cfg[idxAmtAssetId]
662-    let amAssetId = fromBase58String(amAssetIdStr)
663-    let prAssetIdStr = cfg[idxPriceAssetId]
664-    let prAssetId = fromBase58String(prAssetIdStr)
665-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
666-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
667-    let poolStatus = cfg[idxPoolStatus]
668-    let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
669-    let accAmtAssetBalance = getAccBalance(amAssetIdStr)
670-    let accPriceAssetBalance = getAccBalance(prAssetIdStr)
671-    let amtAssetAmtX18 = toX18(accAmtAssetBalance, amtAssetDcm)
672-    let priceAssetAmtX18 = toX18(accPriceAssetBalance, priceAssetDcm)
673-    let curPriceX18 = if ((poolLPBalance == 0))
674-        then zeroBigInt
675-        else calcPriceBigInt(priceAssetAmtX18, amtAssetAmtX18)
676-    let inAmAssetAmtX18 = toX18(inAmAssetAmt, amtAssetDcm)
677-    let inPrAssetAmtX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
678-    let inPrAssetAmt = fromX18(inPrAssetAmtX18, priceAssetDcm)
679-    let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
680-    let calcLpAmt = estPut._1
681-    let curPriceCalc = estPut._3
682-    let amBalance = estPut._4
683-    let prBalance = estPut._5
684-    let lpEmission = estPut._6
685-    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d", toString(calcLpAmt), toString(fromX18(curPriceX18, scale8)), toString(amBalance), toString(prBalance), toString(lpEmission), poolStatus, toString(inAmAssetAmt), toString(inPrAssetAmt)], SEP))
686-    }
687-
688-
689-
690-@Callable(i)
691-func evaluatePutByPriceAssetREADONLY (inPrAssetAmt) = {
692-    let cfg = getPoolConfig()
693-    let lpAssetId = fromBase58String(cfg[idxPoolLPAssetId])
694-    let amAssetIdStr = cfg[idxAmtAssetId]
695-    let amAssetId = fromBase58String(amAssetIdStr)
696-    let prAssetIdStr = cfg[idxPriceAssetId]
697-    let prAssetId = fromBase58String(prAssetIdStr)
698-    let amtAssetDcm = parseIntValue(cfg[idxAmtAssetDcm])
699-    let priceAssetDcm = parseIntValue(cfg[idxPriceAssetDcm])
700-    let poolStatus = cfg[idxPoolStatus]
701-    let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
702-    let amBalanceRaw = getAccBalance(amAssetIdStr)
703-    let prBalanceRaw = getAccBalance(prAssetIdStr)
704-    let amBalanceRawX18 = toX18(amBalanceRaw, amtAssetDcm)
705-    let prBalanceRawX18 = toX18(prBalanceRaw, priceAssetDcm)
706-    let curPriceX18 = if ((poolLPBalance == 0))
707-        then zeroBigInt
708-        else calcPriceBigInt(prBalanceRawX18, amBalanceRawX18)
709-    let inPrAssetAmtX18 = toX18(inPrAssetAmt, priceAssetDcm)
710-    let inAmAssetAmtX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
711-    let inAmAssetAmt = fromX18(inAmAssetAmtX18, amtAssetDcm)
712-    let estPut = estimatePutOperation("", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false)
713-    let calcLpAmt = estPut._1
714-    let curPriceCalc = estPut._3
715-    let amBalance = estPut._4
716-    let prBalance = estPut._5
717-    let lpEmission = estPut._6
718-    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d", toString(calcLpAmt), toString(fromX18(curPriceX18, scale8)), toString(amBalance), toString(prBalance), toString(lpEmission), poolStatus, toString(inAmAssetAmt), toString(inPrAssetAmt)], SEP))
719-    }
720-
721-
722-
723-@Callable(i)
724-func evaluateGetREADONLY (paymentLpAssetId,paymentLpAmt) = {
725-    let res = estimateGetOperation("", paymentLpAssetId, paymentLpAmt, this)
726-    let outAmAmt = res._1
727-    let outPrAmt = res._2
728-    let amBalance = res._5
729-    let prBalance = res._6
730-    let lpEmission = res._7
731-    let curPrice = res._8
732-    let poolStatus = parseIntValue(res._9)
733-    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d", toString(outAmAmt), toString(outPrAmt), toString(amBalance), toString(prBalance), toString(lpEmission), toString(curPrice), toString(poolStatus)], SEP))
734-    }
735-
736-
737-@Verifier(tx)
738-func verify () = match tx {
739-    case order: Order => 
740-        let matcherPub = getMatcherPubOrFail()
741-        let orderValid = validateMatcherOrderAllowed(order)
742-        let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
743-        let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
744-        if (if (if (orderValid)
745-            then senderValid
746-            else false)
747-            then matcherValid
748-            else false)
749-            then true
750-            else throwOrderError(orderValid, senderValid, matcherValid)
751-    case _ => 
752-        let targetPublicKey =         match managerPublicKeyOrUnit() {
753-            case pk: ByteVector => 
754-                pk
755-            case _: Unit => 
756-                tx.senderPublicKey
757-            case _ => 
758-                throw("Match error")
759-        }
760-        sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
761-}
762454 
github/deemru/w8io/169f3d6 
101.53 ms ◑