w8 · tx · EeM···5gJ

tx · EeMUW2dwaLTbNFfHdhtpuQJeDjY3VW9mSTgZfk74L5gJ

3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi:  -0.01400000 Waves

2022.03.16 16:43 [1966574] smart account 3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EeMUW2dwaLTbNFfHdhtpuQJeDjY3VW9mSTgZfk74L5gJ",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1647438221464,
    "version": 1,
    "sender": "3N7LYefWk1WhvCsY5A9nTq244SbVPmhCypi",
    "senderPublicKey": "4qGVXRFATZNzo2RZZ5UYHXojGyJgSRBwtgJcCU8rJe5A",
    "proofs": [
        "Ywp5nrbTiCGBG9DvfSb3qDzfyRJj7MQgtytuyCfe15Z3VQiR7sxCkZcCfFrcC93Ko8EbDxNEJnfPtc2KXqRHwBo"
    ],
    "script": "base64:AAIFAAAAAAAAADUIAhIFCgMICAESAwoBARIHCgUBAQEBARIDCgEBEgASAwoBARIAEgUKAwEBARIHCgUBAQEBAQAAAC8AAAAAB1dBVkVMRVQAAAAAAAX14QAAAAAABVBBVUxJAAAAAAAAD0JAAAAAAAhCSUdQQVVMSQkAATYAAAABAAAAAAAAD0JAAAAAAAhQUklDRUxFVAAAAAAAAA9CQAAAAAAETVVMVAAAAAAABfXhAAAAAAAJQklHTVVMVDE2CQABNgAAAAEAACOG8m/BAAAAAAAACU1VTFRTQ0FMRQAAAAAAAAAACAAAAAAHU0NBTEUxNgAAAAAAAAAAEAAAAAADU0VQAgAAAAJfXwAAAAAFSEFMRjgAAAAAAAL68IAAAAAAC0VVTEVSTlVNQkVSCQABNgAAAAEAAGCSoRPY1XQAAAAABnNjYWxlNgAAAAAAAA9CQAAAAAAMc2NhbGU2QmlnSW50CQABNgAAAAEAAAAAAAAPQkAAAAAADHNjYWxlOEJpZ0ludAkAATYAAAABAAAAAAAF9eEAAAAAAA1zY2FsZTEwQmlnSW50CQABNgAAAAEAAAAAAlQL5AABAAAAEmtleU5ldXRyaW5vQWRkcmVzcwAAAAACAAAAHSVzJXNfX2NvbmZpZ19fbmV1dHJpbm9BZGRyZXNzAQAAABNrZXlTd2FwQW1vdW50QVBhcmFtAAAAAAIAAAAYJXMlc19fY29uZmlnX19zd2FwQVBhcmFtAQAAABJrZXlOZXV0cmlub0Fzc2V0SWQAAAAAAgAAABFuZXV0cmlub19hc3NldF9pZAEAAAAda2V5TGlxdWlkYXRpb25Db250cmFjdEFkZHJlc3MAAAAAAgAAABRsaXF1aWRhdGlvbl9jb250cmFjdAEAAAASa2V5QXVjdGlvbkNvbnRyYWN0AAAAAAIAAAAQYXVjdGlvbl9jb250cmFjdAEAAAARa2V5Q29udG9sQ29udHJhY3QAAAAAAgAAABBjb250cm9sX2NvbnRyYWN0AQAAAA5rZXlCb25kQXNzZXRJZAAAAAACAAAADWJvbmRfYXNzZXRfaWQBAAAAEGtleUJhbGFuY2VMb2NrZWQAAAAAAgAAAA1iYWxhbmNlX2xvY2tfAQAAABVrZXlXYXZlc0xvY2tlZEJhbGFuY2UAAAAACQABLAAAAAIJAQAAABBrZXlCYWxhbmNlTG9ja2VkAAAAAAIAAAAFd2F2ZXMBAAAAGGtleU5ldXRyaW5vTG9ja2VkQmFsYW5jZQAAAAAJAAEsAAAAAgkBAAAAEGtleUJhbGFuY2VMb2NrZWQAAAAAAgAAAAhuZXV0cmlubwEAAAARc3dhcHNUaW1lZnJhbWVLRVkAAAAAAgAAAA9zd2Fwc190aW1lZnJhbWUBAAAAGmtleVVzZXJMYXN0UXVpY2tTd2FwSGVpZ2h0AAAAAQAAAAt1c2VyQWRkcmVzcwkABLkAAAACCQAETAAAAAICAAAABCVzJXMJAARMAAAAAgIAAAAXdXNlckxhc3RRdWlja1N3YXBIZWlnaHQJAARMAAAAAgUAAAALdXNlckFkZHJlc3MFAAAAA25pbAUAAAADU0VQAQAAAB1rZXlRdWlja1N3YXBVc2VyU3BlbnRJblBlcmlvZAAAAAEAAAALdXNlckFkZHJlc3MJAAS5AAAAAgkABEwAAAACAgAAAAQlcyVzCQAETAAAAAICAAAAGnF1aWNrU3dhcFVzZXJTcGVudEluUGVyaW9kCQAETAAAAAIFAAAAC3VzZXJBZGRyZXNzBQAAAANuaWwFAAAAA1NFUAEAAAAIa2V5UHJpY2UAAAAAAgAAAAVwcmljZQEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAgAAAAdhZGRyZXNzAAAAA2tleQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAAB2FkZHJlc3MFAAAAA2tleQkABLkAAAACCQAETAAAAAICAAAACm1hbmRhdG9yeSAJAARMAAAAAgkABCUAAAABBQAAAAdhZGRyZXNzCQAETAAAAAICAAAAAS4JAARMAAAAAgUAAAADa2V5CQAETAAAAAICAAAADyBpcyBub3QgZGVmaW5lZAUAAAADbmlsAgAAAAABAAAADGdldEludE9yRmFpbAAAAAIAAAAHYWRkcmVzcwAAAANrZXkJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABBoAAAACBQAAAAdhZGRyZXNzBQAAAANrZXkJAAS5AAAAAgkABEwAAAACAgAAAAptYW5kYXRvcnkgCQAETAAAAAIJAAQlAAAAAQUAAAAHYWRkcmVzcwkABEwAAAACAgAAAAEuCQAETAAAAAIFAAAAA2tleQkABEwAAAACAgAAAA8gaXMgbm90IGRlZmluZWQFAAAAA25pbAIAAAAAAQAAAA5nZXROdW1iZXJCeUtleQAAAAIAAAAHYWRkcmVzcwAAAANrZXkJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAHYWRkcmVzcwUAAAADa2V5AAAAAAAAAAAAAQAAAA1nZXRCb29sT3JGYWlsAAAAAgAAAAdhZGRyZXNzAAAAA2tleQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGwAAAAIFAAAAB2FkZHJlc3MFAAAAA2tleQkABLkAAAACCQAETAAAAAICAAAACm1hbmRhdG9yeSAJAARMAAAAAgkABCUAAAABBQAAAAdhZGRyZXNzCQAETAAAAAICAAAAAS4JAARMAAAAAgUAAAADa2V5CQAETAAAAAICAAAADyBpcyBub3QgZGVmaW5lZAUAAAADbmlsAgAAAAABAAAAFmNvbnZlcnROZXV0cmlub1RvV2F2ZXMAAAACAAAABmFtb3VudAAAAAVwcmljZQkAAGsAAAADCQAAawAAAAMFAAAABmFtb3VudAUAAAAIUFJJQ0VMRVQFAAAABXByaWNlBQAAAAdXQVZFTEVUBQAAAAVQQVVMSQEAAAAWY29udmVydFdhdmVzVG9OZXV0cmlubwAAAAIAAAAGYW1vdW50AAAABXByaWNlCQAAawAAAAMJAABrAAAAAwUAAAAGYW1vdW50BQAAAAVwcmljZQUAAAAIUFJJQ0VMRVQFAAAABVBBVUxJBQAAAAdXQVZFTEVUAQAAAAV0b1gxNgAAAAIAAAAHb3JpZ1ZhbAAAAA1vcmlnU2NhbGVNdWx0CQABPAAAAAMJAAE2AAAAAQUAAAAHb3JpZ1ZhbAUAAAAJQklHTVVMVDE2CQABNgAAAAEFAAAADW9yaWdTY2FsZU11bHQBAAAAB2Zyb21YMTYAAAACAAAAA3ZhbAAAAA9yZXN1bHRTY2FsZU11bHQJAAGgAAAAAQkAATwAAAADBQAAAAN2YWwJAAE2AAAAAQUAAAAPcmVzdWx0U2NhbGVNdWx0BQAAAAlCSUdNVUxUMTYBAAAACWFzQW55TGlzdAAAAAEAAAADdmFsBAAAAAckbWF0Y2gwBQAAAAN2YWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACUxpc3RbQW55XQQAAAAKdmFsQW55THlzdAUAAAAHJG1hdGNoMAUAAAAKdmFsQW55THlzdAkAAAIAAAABAgAAABtmYWlsIHRvIGNhc3QgaW50byBMaXN0W0FueV0BAAAABWFzSW50AAAAAQAAAAN2YWwEAAAAByRtYXRjaDAFAAAAA3ZhbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAZ2YWxJbnQFAAAAByRtYXRjaDAFAAAABnZhbEludAkAAAIAAAABAgAAABVmYWlsIHRvIGNhc3QgaW50byBJbnQBAAAACGFzU3RyaW5nAAAAAQAAAAN2YWwEAAAAByRtYXRjaDAFAAAAA3ZhbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAZ2YWxTdHIFAAAAByRtYXRjaDAFAAAABnZhbFN0cgkAAAIAAAABAgAAABhmYWlsIHRvIGNhc3QgaW50byBTdHJpbmcAAAAAEG5ldXRyaW5vQ29udHJhY3QJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAAA9nZXRTdHJpbmdPckZhaWwAAAACBQAAAAR0aGlzCQEAAAASa2V5TmV1dHJpbm9BZGRyZXNzAAAAAAAAAAAPY29udHJvbENvbnRyYWN0CQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAgUAAAAQbmV1dHJpbm9Db250cmFjdAkBAAAAEWtleUNvbnRvbENvbnRyYWN0AAAAAAAAAAAPYXVjdGlvbkNvbnRyYWN0CQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAgUAAAAQbmV1dHJpbm9Db250cmFjdAkBAAAAEmtleUF1Y3Rpb25Db250cmFjdAAAAAAAAAAAE2xpcXVpZGF0aW9uQ29udHJhY3QJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAAA9nZXRTdHJpbmdPckZhaWwAAAACBQAAABBuZXV0cmlub0NvbnRyYWN0CQEAAAAda2V5TGlxdWlkYXRpb25Db250cmFjdEFkZHJlc3MAAAAAAAAAAA9uZXV0cmlub0Fzc2V0SWQJAAJZAAAAAQkBAAAAD2dldFN0cmluZ09yRmFpbAAAAAIFAAAAEG5ldXRyaW5vQ29udHJhY3QJAQAAABJrZXlOZXV0cmlub0Fzc2V0SWQAAAAAAAAAAAtuc2J0QXNzZXRJZAkAAlkAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAABBuZXV0cmlub0NvbnRyYWN0CQEAAAAOa2V5Qm9uZEFzc2V0SWQAAAAAAQAAAB1jYWxjQ29udHJhY3ROc2J0UHJpY2VJbnRlcm5hbAAAAAEAAAASbnNidFN1cHBseU92ZXJyaWRlBAAAAA1uc2J0U3VwcGx5TUFYCAkBAAAABXZhbHVlAAAAAQkAA+wAAAABBQAAAAtuc2J0QXNzZXRJZAAAAAhxdWFudGl0eQQAAAAPbmV1dHJpbm9NZXRyaWNzCQEAAAAJYXNBbnlMaXN0AAAAAQkAA/wAAAAEBQAAAAR0aGlzAgAAABpjYWxjTmV1dGlub01ldHJpY3NSRUFET05MWQUAAAADbmlsBQAAAANuaWwDCQAAAAAAAAIFAAAAD25ldXRyaW5vTWV0cmljcwUAAAAPbmV1dHJpbm9NZXRyaWNzBAAAAApuc2J0U3VwcGx5AwkAAAAAAAACBQAAABJuc2J0U3VwcGx5T3ZlcnJpZGUFAAAABHVuaXQJAQAAAAVhc0ludAAAAAEJAAGRAAAAAgUAAAAPbmV1dHJpbm9NZXRyaWNzAAAAAAAAAAAJCQEAAAAFdmFsdWUAAAABBQAAABJuc2J0U3VwcGx5T3ZlcnJpZGUEAAAADGN1cnJlbnRQcmljZQkBAAAABWFzSW50AAAAAQkAAZEAAAACBQAAAA9uZXV0cmlub01ldHJpY3MAAAAAAAAAAAAEAAAACmtDYWxjQXJyYXkJAQAAAAlhc0FueUxpc3QAAAABCQAD/AAAAAQFAAAABHRoaXMCAAAAEmNhbGN1bGF0ZUtSRUFET05MWQkABEwAAAACCQEAAAAFYXNJbnQAAAABCQABkQAAAAIFAAAAD25ldXRyaW5vTWV0cmljcwAAAAAAAAAABAkABEwAAAACCQEAAAAFYXNJbnQAAAABCQABkQAAAAIFAAAAD25ldXRyaW5vTWV0cmljcwAAAAAAAAAABgkABEwAAAACBQAAAAxjdXJyZW50UHJpY2UJAARMAAAAAgUAAAANbnNidFN1cHBseU1BWAkABEwAAAACBQAAAApuc2J0U3VwcGx5BQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAAKa0NhbGNBcnJheQUAAAAKa0NhbGNBcnJheQQAAAAFbXVsdEsJAAGnAAAAAQkBAAAACGFzU3RyaW5nAAAAAQkAAZEAAAACBQAAAAprQ2FsY0FycmF5AAAAAAAAAAAGBAAAAAJtSwkBAAAAB2Zyb21YMTYAAAACBQAAAAVtdWx0SwUAAAAETVVMVAQAAAAJbXVsdFN0ZXAxCQAAawAAAAMFAAAADW5zYnRTdXBwbHlNQVgFAAAABE1VTFQJAABlAAAAAgUAAAANbnNidFN1cHBseU1BWAUAAAAKbnNidFN1cHBseQQAAAAJbXVsdFN0ZXAyCQAAawAAAAMFAAAACW11bHRTdGVwMQUAAAAJbXVsdFN0ZXAxBQAAAARNVUxUBAAAABJtdWx0TnNidDJ1c2RuUHJpY2UJAABrAAAAAwUAAAACbUsFAAAACW11bHRTdGVwMgUAAAAETVVMVAQAAAAObnNidDJ1c2RuUHJpY2UJAABrAAAAAwUAAAASbXVsdE5zYnQydXNkblByaWNlBQAAAAVQQVVMSQUAAAAETVVMVAQAAAAPbnNidDJ3YXZlc1ByaWNlCQAAawAAAAMFAAAADm5zYnQydXNkblByaWNlBQAAAAVQQVVMSQUAAAAMY3VycmVudFByaWNlCQAFFAAAAAIFAAAAA25pbAkABEwAAAACBQAAAA5uc2J0MnVzZG5QcmljZQkABEwAAAACBQAAAA9uc2J0MndhdmVzUHJpY2UFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAACQAAAAFpAQAAAAtjb25zdHJ1Y3RvcgAAAAMAAAAPbmV1dHJpbm9BZGRyZXNzAAAAD25zYnRMb2NrQWRkcmVzcwAAABBzd2FwQW1vdW50QVBhcmFtAwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyBQAAAAR0aGlzCQAAAgAAAAECAAAADm5vdCBhdXRob3JpemVkCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAABJrZXlOZXV0cmlub0FkZHJlc3MAAAAABQAAAA9uZXV0cmlub0FkZHJlc3MJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAABNrZXlTd2FwQW1vdW50QVBhcmFtAAAAAAUAAAAQc3dhcEFtb3VudEFQYXJhbQUAAAADbmlsAAAAAWkBAAAAFWNhbGNTd2FwTGltaXRSRUFET05MWQAAAAEAAAALZ05zYnRBbW91bnQEAAAAC2xpbWl0UGFyYW1BCQABNgAAAAEJAQAAAAxnZXRJbnRPckZhaWwAAAACBQAAAAR0aGlzCQEAAAATa2V5U3dhcEFtb3VudEFQYXJhbQAAAAAEAAAAEmdOc2J0QW1vdW50U2NhbGUxNgkBAAAABXRvWDE2AAAAAgUAAAALZ05zYnRBbW91bnQFAAAABnNjYWxlNgQAAAAMbGltaXRQb3dQYXJ0CQAAdgAAAAYFAAAAEmdOc2J0QW1vdW50U2NhbGUxNgAAAAAAAAAAEAUAAAALRVVMRVJOVU1CRVIAAAAAAAAAABAAAAAAAAAAAAgFAAAAB0NFSUxJTkcEAAAABWxpbWl0CQABPAAAAAMFAAAAC2xpbWl0UGFyYW1BBQAAAAxsaW1pdFBvd1BhcnQFAAAADXNjYWxlMTBCaWdJbnQJAAUUAAAAAgUAAAADbmlsCQABoAAAAAEFAAAABWxpbWl0AAAAAWkBAAAAEmNhbGN1bGF0ZUtSRUFET05MWQAAAAUAAAAEd1JhdwAAAAR1UmF3AAAABXByaWNlAAAABG1SYXcAAAAEc1JhdwQAAAADRVhQCQABNgAAAAEAAAAAAAApekkEAAAACEVYUFNDQUxFAAAAAAAAAAAGBAAAAAFhCQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAAD2F1Y3Rpb25Db250cmFjdAIAAAAQbnNidEN1cnZlUGFyYW1fYQAAAAAAAAAAAwQAAAAFcGF1bEIJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAPYXVjdGlvbkNvbnRyYWN0AgAAABBuc2J0Q3VydmVQYXJhbV9iCQAAaQAAAAIJAABoAAAAAgAAAAAAAAAAAwUAAAAFUEFVTEkAAAAAAAAAAAoEAAAAD3dSZXNlcnZlc0luVXNkbgkBAAAAFmNvbnZlcnRXYXZlc1RvTmV1dHJpbm8AAAACBQAAAAR3UmF3BQAAAAVwcmljZQQAAAAGbXVsdEJSCQAAawAAAAMFAAAAD3dSZXNlcnZlc0luVXNkbgUAAAAETVVMVAUAAAAEdVJhdwMJAABmAAAAAgUAAAAGbXVsdEJSAAAAAAJ8fffQCQAAAgAAAAECAAAAKUJSID4gMTA2NzguNTY0ODE2JSB3aWxsIG92ZXJmbG93IGV4cG9uZW50BAAAAAltdWx0UG93ZXIJAABoAAAAAgUAAAABYQkAAGUAAAACBQAAAAZtdWx0QlIFAAAABE1VTFQEAAAADm11bHRFeHBJblBvd2VyCQAAdgAAAAYFAAAAA0VYUAUAAAAIRVhQU0NBTEUJAAE2AAAAAQUAAAAJbXVsdFBvd2VyBQAAAAlNVUxUU0NBTEUFAAAAB1NDQUxFMTYFAAAABERPV04EAAAABW11bHRLCQABPAAAAAMJAAE2AAAAAQUAAAAFcGF1bEIFAAAADm11bHRFeHBJblBvd2VyBQAAAAhCSUdQQVVMSQkABRQAAAACBQAAAANuaWwJAARMAAAAAgUAAAABYQkABEwAAAACBQAAAAVwYXVsQgkABEwAAAACBQAAAA93UmVzZXJ2ZXNJblVzZG4JAARMAAAAAgUAAAAGbXVsdEJSCQAETAAAAAIFAAAACW11bHRQb3dlcgkABEwAAAACCQABpgAAAAEFAAAADm11bHRFeHBJblBvd2VyCQAETAAAAAIJAAGmAAAAAQUAAAAFbXVsdEsFAAAAA25pbAAAAAFpAQAAABVjdXJ2ZUZ1bmN0aW9uUkVBRE9OTFkAAAABAAAAC3dhdmVzUGF5UmF3BAAAAA9uZXV0cmlub01ldHJpY3MJAQAAAAlhc0FueUxpc3QAAAABCQAD/AAAAAQFAAAABHRoaXMCAAAAGmNhbGNOZXV0aW5vTWV0cmljc1JFQURPTkxZBQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAAPbmV1dHJpbm9NZXRyaWNzBQAAAA9uZXV0cmlub01ldHJpY3MEAAAABXByaWNlCQEAAAAFYXNJbnQAAAABCQABkQAAAAIFAAAAD25ldXRyaW5vTWV0cmljcwAAAAAAAAAAAAQAAAAEd1JhdwkBAAAABWFzSW50AAAAAQkAAZEAAAACBQAAAA9uZXV0cmlub01ldHJpY3MAAAAAAAAAAAMEAAAABHVSYXcJAQAAAAVhc0ludAAAAAEJAAGRAAAAAgUAAAAPbmV1dHJpbm9NZXRyaWNzAAAAAAAAAAAFBAAAAARzUmF3CQEAAAAFYXNJbnQAAAABCQABkQAAAAIFAAAAD25ldXRyaW5vTWV0cmljcwAAAAAAAAAACQQAAAAEbVJhdwgJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQUAAAALbnNidEFzc2V0SWQAAAAIcXVhbnRpdHkEAAAACmtDYWxjQXJyYXkJAQAAAAlhc0FueUxpc3QAAAABCQAD/AAAAAQFAAAABHRoaXMCAAAAEmNhbGN1bGF0ZUtSRUFET05MWQkABEwAAAACBQAAAAR3UmF3CQAETAAAAAIFAAAABHVSYXcJAARMAAAAAgUAAAAFcHJpY2UJAARMAAAAAgUAAAAEbVJhdwkABEwAAAACBQAAAARzUmF3BQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAAKa0NhbGNBcnJheQUAAAAKa0NhbGNBcnJheQQAAAAFbXVsdEsJAAGnAAAAAQkBAAAACGFzU3RyaW5nAAAAAQkAAZEAAAACBQAAAAprQ2FsY0FycmF5AAAAAAAAAAAGBAAAAAd1c2RuUGF5CQEAAAAWY29udmVydFdhdmVzVG9OZXV0cmlubwAAAAIFAAAAC3dhdmVzUGF5UmF3BQAAAAVwcmljZQQAAAAQYmlnTWF4TnNidFN1cHBseQkAATYAAAABBQAAAARtUmF3BAAAAA1iaWdOc2J0U3VwcGx5CQABNgAAAAEJAABlAAAAAgUAAAAEbVJhdwUAAAAEc1JhdwQAAAAFc3RlcDEJAAE8AAAAAwkAATYAAAABBQAAAAd1c2RuUGF5BQAAAAlCSUdNVUxUMTYFAAAABW11bHRLBAAAAAVzdGVwMgkAATwAAAADBQAAAAVzdGVwMQUAAAANYmlnTnNidFN1cHBseQUAAAAQYmlnTWF4TnNidFN1cHBseQQAAAAFc3RlcDMJAAGgAAAAAQkAATwAAAADBQAAAA1iaWdOc2J0U3VwcGx5BQAAABBiaWdNYXhOc2J0U3VwcGx5CQABNwAAAAIFAAAABXN0ZXAyBQAAABBiaWdNYXhOc2J0U3VwcGx5BAAAAA1uc2J0QW1vdW50UmF3CQAAZQAAAAIJAABlAAAAAgUAAAAEbVJhdwUAAAAEc1JhdwUAAAAFc3RlcDMJAAUUAAAAAgUAAAADbmlsCQAETAAAAAIFAAAADW5zYnRBbW91bnRSYXcJAARMAAAAAgUAAAAHdXNkblBheQkABEwAAAACBQAAAAR3UmF3CQAETAAAAAIFAAAABHVSYXcJAARMAAAAAgUAAAAEbVJhdwkABEwAAAACBQAAAARzUmF3CQAETAAAAAIJAQAAAAVhc0ludAAAAAEJAAGRAAAAAgUAAAAKa0NhbGNBcnJheQAAAAAAAAAAAAkABEwAAAACCQEAAAAFYXNJbnQAAAABCQABkQAAAAIFAAAACmtDYWxjQXJyYXkAAAAAAAAAAAEJAARMAAAAAgkBAAAABWFzSW50AAAAAQkAAZEAAAACBQAAAAprQ2FsY0FycmF5AAAAAAAAAAACCQAETAAAAAIFAAAABXByaWNlCQAETAAAAAIJAQAAAAVhc0ludAAAAAEJAAGRAAAAAgUAAAAKa0NhbGNBcnJheQAAAAAAAAAAAwkABEwAAAACCQEAAAAFYXNJbnQAAAABCQABkQAAAAIFAAAACmtDYWxjQXJyYXkAAAAAAAAAAAQJAARMAAAAAgkAAZEAAAACBQAAAAprQ2FsY0FycmF5AAAAAAAAAAAFCQAETAAAAAIJAAGRAAAAAgUAAAAKa0NhbGNBcnJheQAAAAAAAAAABgkABEwAAAACCQABpgAAAAEFAAAABXN0ZXAxCQAETAAAAAIJAAGmAAAAAQUAAAAFc3RlcDIJAARMAAAAAgUAAAAFc3RlcDMFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAAHWNhbGNDb250cmFjdE5zYnRQcmljZVJFQURPTkxZAAAAAAkBAAAAHWNhbGNDb250cmFjdE5zYnRQcmljZUludGVybmFsAAAAAQUAAAAEdW5pdAAAAAFpAQAAACVjYWxjQ29udHJhY3ROc2J0UHJpY2VCeVN1cHBseVJFQURPTkxZAAAAAQAAAApuc2J0U3VwcGx5CQEAAAAdY2FsY0NvbnRyYWN0TnNidFByaWNlSW50ZXJuYWwAAAABBQAAAApuc2J0U3VwcGx5AAAAAWkBAAAAGmNhbGNOZXV0aW5vTWV0cmljc1JFQURPTkxZAAAAAAQAAAAMY3VycmVudFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAA9jb250cm9sQ29udHJhY3QJAQAAAAhrZXlQcmljZQAAAAAEAAAAFW5ldXRyaW5vTG9ja2VkQmFsYW5jZQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAABBuZXV0cmlub0NvbnRyYWN0CQEAAAAYa2V5TmV1dHJpbm9Mb2NrZWRCYWxhbmNlAAAAAAAAAAAAAAAAAAQAAAASd2F2ZXNMb2NrZWRCYWxhbmNlCQEAAAALdmFsdWVPckVsc2UAAAACCQAEGgAAAAIFAAAAEG5ldXRyaW5vQ29udHJhY3QJAQAAABVrZXlXYXZlc0xvY2tlZEJhbGFuY2UAAAAAAAAAAAAAAAAABAAAAAdyZXNlcnZlCQAAZQAAAAIICQAD7wAAAAEFAAAAEG5ldXRyaW5vQ29udHJhY3QAAAAHcmVndWxhcgUAAAASd2F2ZXNMb2NrZWRCYWxhbmNlBAAAAA5yZXNlcnZlc0luVXNkbgkBAAAAFmNvbnZlcnRXYXZlc1RvTmV1dHJpbm8AAAACBQAAAAdyZXNlcnZlBQAAAAxjdXJyZW50UHJpY2UEAAAADm5ldXRyaW5vU3VwcGx5CQAAZQAAAAIJAABlAAAAAgkAAGQAAAACBQAAABVuZXV0cmlub0xvY2tlZEJhbGFuY2UICQEAAAAFdmFsdWUAAAABCQAD7AAAAAEFAAAAD25ldXRyaW5vQXNzZXRJZAAAAAhxdWFudGl0eQkAA/AAAAACBQAAABBuZXV0cmlub0NvbnRyYWN0BQAAAA9uZXV0cmlub0Fzc2V0SWQJAAPwAAAAAgUAAAATbGlxdWlkYXRpb25Db250cmFjdAUAAAAPbmV1dHJpbm9Bc3NldElkBAAAAAdzdXJwbHVzCQAAZQAAAAIFAAAADnJlc2VydmVzSW5Vc2RuBQAAAA5uZXV0cmlub1N1cHBseQQAAAAHZGVmaWNpdAkAAGUAAAACBQAAAA5uZXV0cmlub1N1cHBseQUAAAAOcmVzZXJ2ZXNJblVzZG4EAAAADnN1cnBsdXNQZXJjZW50AwkAAAAAAAACBQAAAA5uZXV0cmlub1N1cHBseQAAAAAAAAAAAAAAAAAAAAAAAAkAAGgAAAACCQAAawAAAAMFAAAAB3N1cnBsdXMFAAAABVBBVUxJBQAAAA5uZXV0cmlub1N1cHBseQAAAAAAAAAAZAQAAAACQlIDCQAAAAAAAAIFAAAADm5ldXRyaW5vU3VwcGx5AAAAAAAAAAAAAAAAAAAAAAAACQAAawAAAAMFAAAADnJlc2VydmVzSW5Vc2RuBQAAAAVQQVVMSQUAAAAObmV1dHJpbm9TdXBwbHkEAAAADW5zYnRTdXBwbHlNQVgICQEAAAAFdmFsdWUAAAABCQAD7AAAAAEFAAAAC25zYnRBc3NldElkAAAACHF1YW50aXR5BAAAAApuc2J0U3VwcGx5CQAAZQAAAAIFAAAADW5zYnRTdXBwbHlNQVgJAAPwAAAAAgUAAAAPYXVjdGlvbkNvbnRyYWN0BQAAAAtuc2J0QXNzZXRJZAkABRQAAAACBQAAAANuaWwJAARMAAAAAgUAAAAMY3VycmVudFByaWNlCQAETAAAAAIFAAAAFW5ldXRyaW5vTG9ja2VkQmFsYW5jZQkABEwAAAACBQAAABJ3YXZlc0xvY2tlZEJhbGFuY2UJAARMAAAAAgUAAAAHcmVzZXJ2ZQkABEwAAAACBQAAAA5yZXNlcnZlc0luVXNkbgkABEwAAAACBQAAAA5uZXV0cmlub1N1cHBseQkABEwAAAACBQAAAAdzdXJwbHVzCQAETAAAAAIFAAAADnN1cnBsdXNQZXJjZW50CQAETAAAAAIFAAAAAkJSCQAETAAAAAIFAAAACm5zYnRTdXBwbHkJAARMAAAAAgUAAAANbnNidFN1cHBseU1BWAUAAAADbmlsAAAAAWkBAAAAIWdldFVuc3Rha2VDb21pc3Npb25BbW91bnRSRUFET05MWQAAAAMAAAAGYW1vdW50AAAAC3N0YXJ0SGVpZ2h0AAAACGhhbGZMaWZlCQAFFAAAAAIFAAAAA25pbAkAAGsAAAADBQAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAAAgAAAAAAAAAAAAkAAGsAAAADCQEAAAABLQAAAAEJAABlAAAAAgUAAAAGaGVpZ2h0BQAAAAtzdGFydEhlaWdodAUAAAAETVVMVAUAAAAIaGFsZkxpZmUAAAAAAAAAAAgAAAAAAAAAAAgFAAAABkhBTEZVUAUAAAAETVVMVAAAAAFpAQAAABNtZXJnZVN0YWtlc1JFQURPTkxZAAAABQAAAAdhbW91bnQxAAAAB2hlaWdodDEAAAAHYW1vdW50MgAAAAdoZWlnaHQyAAAACGhhbGZMaWZlBAAAAAF3CQAAawAAAAMFAAAAB2Ftb3VudDIJAABsAAAABgAAAAAAAAAAAgAAAAAAAAAAAAkAAGsAAAADCQAAZQAAAAIFAAAAB2hlaWdodDIFAAAAB2hlaWdodDEFAAAABE1VTFQFAAAACGhhbGZMaWZlAAAAAAAAAAAIAAAAAAAAAAAIBQAAAAZIQUxGVVAFAAAABE1VTFQEAAAAAXYJAABrAAAAAwkAAGQAAAACBQAAAAdhbW91bnQxBQAAAAdhbW91bnQyBQAAAARNVUxUCQAAZAAAAAIFAAAAB2Ftb3VudDEFAAAAAXcJAAUUAAAAAgUAAAADbmlsCQAAZAAAAAIFAAAAB2hlaWdodDEJAABpAAAAAgkAAGUAAAACBQAAAAVIQUxGOAkAAGgAAAACBQAAAAhoYWxmTGlmZQkAAG0AAAAGBQAAAAF2AAAAAAAAAAAIAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAIBQAAAAZIQUxGVVAFAAAABE1VTFQAAAAAeQmg5w==",
    "chainId": 84,
    "height": 1966574,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7TVQfj8ojaYSeqXN5ezyjW3JNk6SfPuoLyo6j1n7yutg
Next: 29bcfrjpeZeVUggTeBN1Qx9m5L6KgiLMdfzbqPUaGL9g

Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let WAVELET = 100000000
5 5  
6 6  let PAULI = 1000000
7 7  
8 8  let BIGPAULI = toBigInt(1000000)
9 9  
10 10  let PRICELET = 1000000
11 11  
12 12  let MULT = 100000000
13 13  
14 14  let BIGMULT16 = toBigInt(10000000000000000)
15 15  
16 16  let MULTSCALE = 8
17 17  
18 18  let SCALE16 = 16
19 19  
20 20  let SEP = "__"
21 21  
22 22  let HALF8 = 50000000
23 23  
24 24  let EULERNUMBER = toBigInt(27182818284590452)
25 25  
26 26  let scale6 = 1000000
27 27  
28 28  let scale6BigInt = toBigInt(1000000)
29 29  
30 30  let scale8BigInt = toBigInt(100000000)
31 31  
32 32  let scale10BigInt = toBigInt(10000000000)
33 33  
34 34  func keyNeutrinoAddress () = "%s%s__config__neutrinoAddress"
35 35  
36 36  
37 37  func keySwapAmountAParam () = "%s%s__config__swapAParam"
38 38  
39 39  
40 40  func keyNeutrinoAssetId () = "neutrino_asset_id"
41 41  
42 42  
43 43  func keyLiquidationContractAddress () = "liquidation_contract"
44 44  
45 45  
46 46  func keyAuctionContract () = "auction_contract"
47 47  
48 48  
49 49  func keyContolContract () = "control_contract"
50 50  
51 51  
52 52  func keyBondAssetId () = "bond_asset_id"
53 53  
54 54  
55 55  func keyBalanceLocked () = "balance_lock_"
56 56  
57 57  
58 58  func keyWavesLockedBalance () = (keyBalanceLocked() + "waves")
59 59  
60 60  
61 61  func keyNeutrinoLockedBalance () = (keyBalanceLocked() + "neutrino")
62 62  
63 63  
64 64  func swapsTimeframeKEY () = "swaps_timeframe"
65 65  
66 66  
67 67  func keyUserLastQuickSwapHeight (userAddress) = makeString(["%s%s", "userLastQuickSwapHeight", userAddress], SEP)
68 68  
69 69  
70 70  func keyQuickSwapUserSpentInPeriod (userAddress) = makeString(["%s%s", "quickSwapUserSpentInPeriod", userAddress], SEP)
71 71  
72 72  
73 73  func keyPrice () = "price"
74 74  
75 75  
76 76  func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
77 77  
78 78  
79 79  func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
80 80  
81 81  
82 82  func getNumberByKey (address,key) = valueOrElse(getInteger(address, key), 0)
83 83  
84 84  
85 85  func getBoolOrFail (address,key) = valueOrErrorMessage(getBoolean(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
86 86  
87 87  
88 88  func convertNeutrinoToWaves (amount,price) = fraction(fraction(amount, PRICELET, price), WAVELET, PAULI)
89 89  
90 90  
91 91  func convertWavesToNeutrino (amount,price) = fraction(fraction(amount, price, PRICELET), PAULI, WAVELET)
92 92  
93 93  
94 94  func toX16 (origVal,origScaleMult) = fraction(toBigInt(origVal), BIGMULT16, toBigInt(origScaleMult))
95 95  
96 96  
97 97  func fromX16 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), BIGMULT16))
98 98  
99 99  
100 100  func asAnyList (val) = match val {
101 101      case valAnyLyst: List[Any] => 
102 102          valAnyLyst
103 103      case _ => 
104 104          throw("fail to cast into List[Any]")
105 105  }
106 106  
107 107  
108 108  func asInt (val) = match val {
109 109      case valInt: Int => 
110 110          valInt
111 111      case _ => 
112 112          throw("fail to cast into Int")
113 113  }
114 114  
115 115  
116 116  func asString (val) = match val {
117 117      case valStr: String => 
118 118          valStr
119 119      case _ => 
120 120          throw("fail to cast into String")
121 121  }
122 122  
123 123  
124 124  let neutrinoContract = addressFromStringValue(getStringOrFail(this, keyNeutrinoAddress()))
125 125  
126 126  let controlContract = addressFromStringValue(getStringOrFail(neutrinoContract, keyContolContract()))
127 127  
128 128  let auctionContract = addressFromStringValue(getStringOrFail(neutrinoContract, keyAuctionContract()))
129 129  
130 130  let liquidationContract = addressFromStringValue(getStringOrFail(neutrinoContract, keyLiquidationContractAddress()))
131 131  
132 132  let neutrinoAssetId = fromBase58String(getStringOrFail(neutrinoContract, keyNeutrinoAssetId()))
133 133  
134 134  let nsbtAssetId = fromBase58String(getStringValue(neutrinoContract, keyBondAssetId()))
135 135  
136 136  func calcContractNsbtPriceInternal (nsbtSupplyOverride) = {
137 137      let nsbtSupplyMAX = value(assetInfo(nsbtAssetId)).quantity
138 138      let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
139 139      if ((neutrinoMetrics == neutrinoMetrics))
140 140          then {
141 141              let nsbtSupply = if ((nsbtSupplyOverride == unit))
142 142                  then asInt(neutrinoMetrics[9])
143 143                  else value(nsbtSupplyOverride)
144 144              let currentPrice = asInt(neutrinoMetrics[0])
145 145              let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [asInt(neutrinoMetrics[4]), asInt(neutrinoMetrics[6]), currentPrice, nsbtSupplyMAX, nsbtSupply], nil))
146 146              if ((kCalcArray == kCalcArray))
147 147                  then {
148 148                      let multK = parseBigIntValue(asString(kCalcArray[6]))
149 149                      let mK = fromX16(multK, MULT)
150 150                      let multStep1 = fraction(nsbtSupplyMAX, MULT, (nsbtSupplyMAX - nsbtSupply))
151 151                      let multStep2 = fraction(multStep1, multStep1, MULT)
152 152                      let multNsbt2usdnPrice = fraction(mK, multStep2, MULT)
153 153                      let nsbt2usdnPrice = fraction(multNsbt2usdnPrice, PAULI, MULT)
154 154                      let nsbt2wavesPrice = fraction(nsbt2usdnPrice, PAULI, currentPrice)
155 155                      $Tuple2(nil, [nsbt2usdnPrice, nsbt2wavesPrice])
156 156                      }
157 157                  else throw("Strict value is not equal to itself.")
158 158              }
159 159          else throw("Strict value is not equal to itself.")
160 160      }
161 161  
162 162  
163 163  @Callable(i)
164 164  func constructor (neutrinoAddress,nsbtLockAddress,swapAmountAParam) = if ((i.caller != this))
165 165      then throw("not authorized")
166 166      else [StringEntry(keyNeutrinoAddress(), neutrinoAddress), IntegerEntry(keySwapAmountAParam(), swapAmountAParam)]
167 167  
168 168  
169 169  
170 170  @Callable(i)
171 171  func calcSwapLimitREADONLY (gNsbtAmount) = {
172 172      let limitParamA = toBigInt(getIntOrFail(this, keySwapAmountAParam()))
173 173      let gNsbtAmountScale16 = toX16(gNsbtAmount, scale6)
174 174      let limitPowPart = pow(gNsbtAmountScale16, 16, EULERNUMBER, 16, 8, CEILING)
175 175      let limit = fraction(limitParamA, limitPowPart, scale10BigInt)
176 176      $Tuple2(nil, toInt(limit))
177 177      }
178 178  
179 179  
180 180  
181 181  @Callable(i)
182 182  func calculateKREADONLY (wRaw,uRaw,price,mRaw,sRaw) = {
183 183      let EXP = toBigInt(2718281)
184 184      let EXPSCALE = 6
185 185      let a = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_a"), 3)
186 186      let paulB = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_b"), ((3 * PAULI) / 10))
187 187      let wReservesInUsdn = convertWavesToNeutrino(wRaw, price)
188 188      let multBR = fraction(wReservesInUsdn, MULT, uRaw)
189 189      if ((multBR > 10678564816))
190 190          then throw("BR > 10678.564816% will overflow exponent")
191 191          else {
192 192              let multPower = (a * (multBR - MULT))
193 193              let multExpInPower = pow(EXP, EXPSCALE, toBigInt(multPower), MULTSCALE, SCALE16, DOWN)
194 194              let multK = fraction(toBigInt(paulB), multExpInPower, BIGPAULI)
195 195              $Tuple2(nil, [a, paulB, wReservesInUsdn, multBR, multPower, toString(multExpInPower), toString(multK)])
196 196              }
197 197      }
198 198  
199 199  
200 200  
201 201  @Callable(i)
202 202  func curveFunctionREADONLY (wavesPayRaw) = {
203 203      let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
204 204      if ((neutrinoMetrics == neutrinoMetrics))
205 205          then {
206 206              let price = asInt(neutrinoMetrics[0])
207 207              let wRaw = asInt(neutrinoMetrics[3])
208 208              let uRaw = asInt(neutrinoMetrics[5])
209 209              let sRaw = asInt(neutrinoMetrics[9])
210 210              let mRaw = value(assetInfo(nsbtAssetId)).quantity
211 211              let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
212 212              if ((kCalcArray == kCalcArray))
213 213                  then {
214 214                      let multK = parseBigIntValue(asString(kCalcArray[6]))
215 215                      let usdnPay = convertWavesToNeutrino(wavesPayRaw, price)
216 216                      let bigMaxNsbtSupply = toBigInt(mRaw)
217 217                      let bigNsbtSupply = toBigInt((mRaw - sRaw))
218 218                      let step1 = fraction(toBigInt(usdnPay), BIGMULT16, multK)
219 219                      let step2 = fraction(step1, bigNsbtSupply, bigMaxNsbtSupply)
220 220                      let step3 = toInt(fraction(bigNsbtSupply, bigMaxNsbtSupply, (step2 + bigMaxNsbtSupply)))
221 221                      let nsbtAmountRaw = ((mRaw - sRaw) - step3)
222 222                      $Tuple2(nil, [nsbtAmountRaw, usdnPay, wRaw, uRaw, mRaw, sRaw, asInt(kCalcArray[0]), asInt(kCalcArray[1]), asInt(kCalcArray[2]), price, asInt(kCalcArray[3]), asInt(kCalcArray[4]), kCalcArray[5], kCalcArray[6], toString(step1), toString(step2), step3])
223 223                      }
224 224                  else throw("Strict value is not equal to itself.")
225 225              }
226 226          else throw("Strict value is not equal to itself.")
227 227      }
228 228  
229 229  
230 230  
231 231  @Callable(i)
232 232  func calcContractNsbtPriceREADONLY () = calcContractNsbtPriceInternal(unit)
233 233  
234 234  
235 235  
236 236  @Callable(i)
237 237  func calcContractNsbtPriceBySupplyREADONLY (nsbtSupply) = calcContractNsbtPriceInternal(nsbtSupply)
238 238  
239 239  
240 240  
241 241  @Callable(i)
242 242  func calcNeutinoMetricsREADONLY () = {
243 243      let currentPrice = getIntegerValue(controlContract, keyPrice())
244 244      let neutrinoLockedBalance = valueOrElse(getInteger(neutrinoContract, keyNeutrinoLockedBalance()), 0)
245 245      let wavesLockedBalance = valueOrElse(getInteger(neutrinoContract, keyWavesLockedBalance()), 0)
246 246      let reserve = (wavesBalance(neutrinoContract).regular - wavesLockedBalance)
247 247      let reservesInUsdn = convertWavesToNeutrino(reserve, currentPrice)
248 248      let neutrinoSupply = (((neutrinoLockedBalance + value(assetInfo(neutrinoAssetId)).quantity) - assetBalance(neutrinoContract, neutrinoAssetId)) - assetBalance(liquidationContract, neutrinoAssetId))
249 249      let surplus = (reservesInUsdn - neutrinoSupply)
250 250      let deficit = (neutrinoSupply - reservesInUsdn)
251 251      let surplusPercent = if ((neutrinoSupply == 0))
252 252          then 0
253 253          else (fraction(surplus, PAULI, neutrinoSupply) * 100)
254 254      let BR = if ((neutrinoSupply == 0))
255 255          then 0
256 256          else fraction(reservesInUsdn, PAULI, neutrinoSupply)
257 257      let nsbtSupplyMAX = value(assetInfo(nsbtAssetId)).quantity
258 258      let nsbtSupply = (nsbtSupplyMAX - assetBalance(auctionContract, nsbtAssetId))
259 259      $Tuple2(nil, [currentPrice, neutrinoLockedBalance, wavesLockedBalance, reserve, reservesInUsdn, neutrinoSupply, surplus, surplusPercent, BR, nsbtSupply, nsbtSupplyMAX])
260 260      }
261 261  
262 262  
263 263  
264 264  @Callable(i)
265 265  func getUnstakeComissionAmountREADONLY (amount,startHeight,halfLife) = $Tuple2(nil, fraction(amount, pow(2, 0, fraction(-((height - startHeight)), MULT, halfLife), 8, 8, HALFUP), MULT))
266 266  
267 267  
268 268  
269 269  @Callable(i)
270 270  func mergeStakesREADONLY (amount1,height1,amount2,height2,halfLife) = {
271 271      let w = fraction(amount2, pow(2, 0, fraction((height2 - height1), MULT, halfLife), 8, 8, HALFUP), MULT)
272 272      let v = fraction((amount1 + amount2), MULT, (amount1 + w))
273 273      $Tuple2(nil, (height1 + ((HALF8 - (halfLife * log(v, 8, 2, 0, 8, HALFUP))) / MULT)))
274 274      }
275 275  
276 276

Old	New	Differences
1	1	{-# STDLIB_VERSION 5 #-}
2	2	{-# SCRIPT_TYPE ACCOUNT #-}
3	3	{-# CONTENT_TYPE DAPP #-}
4	4	let WAVELET = 100000000
5	5
6	6	let PAULI = 1000000
7	7
8	8	let BIGPAULI = toBigInt(1000000)
9	9
10	10	let PRICELET = 1000000
11	11
12	12	let MULT = 100000000
13	13
14	14	let BIGMULT16 = toBigInt(10000000000000000)
15	15
16	16	let MULTSCALE = 8
17	17
18	18	let SCALE16 = 16
19	19
20	20	let SEP = "__"
21	21
22	22	let HALF8 = 50000000
23	23
24	24	let EULERNUMBER = toBigInt(27182818284590452)
25	25
26	26	let scale6 = 1000000
27	27
28	28	let scale6BigInt = toBigInt(1000000)
29	29
30	30	let scale8BigInt = toBigInt(100000000)
31	31
32	32	let scale10BigInt = toBigInt(10000000000)
33	33
34	34	func keyNeutrinoAddress () = "%s%s__config__neutrinoAddress"
35	35
36	36
37	37	func keySwapAmountAParam () = "%s%s__config__swapAParam"
38	38
39	39
40	40	func keyNeutrinoAssetId () = "neutrino_asset_id"
41	41
42	42
43	43	func keyLiquidationContractAddress () = "liquidation_contract"
44	44
45	45
46	46	func keyAuctionContract () = "auction_contract"
47	47
48	48
49	49	func keyContolContract () = "control_contract"
50	50
51	51
52	52	func keyBondAssetId () = "bond_asset_id"
53	53
54	54
55	55	func keyBalanceLocked () = "balance_lock_"
56	56
57	57
58	58	func keyWavesLockedBalance () = (keyBalanceLocked() + "waves")
59	59
60	60
61	61	func keyNeutrinoLockedBalance () = (keyBalanceLocked() + "neutrino")
62	62
63	63
64	64	func swapsTimeframeKEY () = "swaps_timeframe"
65	65
66	66
67	67	func keyUserLastQuickSwapHeight (userAddress) = makeString(["%s%s", "userLastQuickSwapHeight", userAddress], SEP)
68	68
69	69
70	70	func keyQuickSwapUserSpentInPeriod (userAddress) = makeString(["%s%s", "quickSwapUserSpentInPeriod", userAddress], SEP)
71	71
72	72
73	73	func keyPrice () = "price"
74	74
75	75
76	76	func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
77	77
78	78
79	79	func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
80	80
81	81
82	82	func getNumberByKey (address,key) = valueOrElse(getInteger(address, key), 0)
83	83
84	84
85	85	func getBoolOrFail (address,key) = valueOrErrorMessage(getBoolean(address, key), makeString(["mandatory ", toString(address), ".", key, " is not defined"], ""))
86	86
87	87
88	88	func convertNeutrinoToWaves (amount,price) = fraction(fraction(amount, PRICELET, price), WAVELET, PAULI)
89	89
90	90
91	91	func convertWavesToNeutrino (amount,price) = fraction(fraction(amount, price, PRICELET), PAULI, WAVELET)
92	92
93	93
94	94	func toX16 (origVal,origScaleMult) = fraction(toBigInt(origVal), BIGMULT16, toBigInt(origScaleMult))
95	95
96	96
97	97	func fromX16 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), BIGMULT16))
98	98
99	99
100	100	func asAnyList (val) = match val {
101	101	case valAnyLyst: List[Any] =>
102	102	valAnyLyst
103	103	case _ =>
104	104	throw("fail to cast into List[Any]")
105	105	}
106	106
107	107
108	108	func asInt (val) = match val {
109	109	case valInt: Int =>
110	110	valInt
111	111	case _ =>
112	112	throw("fail to cast into Int")
113	113	}
114	114
115	115
116	116	func asString (val) = match val {
117	117	case valStr: String =>
118	118	valStr
119	119	case _ =>
120	120	throw("fail to cast into String")
121	121	}
122	122
123	123
124	124	let neutrinoContract = addressFromStringValue(getStringOrFail(this, keyNeutrinoAddress()))
125	125
126	126	let controlContract = addressFromStringValue(getStringOrFail(neutrinoContract, keyContolContract()))
127	127
128	128	let auctionContract = addressFromStringValue(getStringOrFail(neutrinoContract, keyAuctionContract()))
129	129
130	130	let liquidationContract = addressFromStringValue(getStringOrFail(neutrinoContract, keyLiquidationContractAddress()))
131	131
132	132	let neutrinoAssetId = fromBase58String(getStringOrFail(neutrinoContract, keyNeutrinoAssetId()))
133	133
134	134	let nsbtAssetId = fromBase58String(getStringValue(neutrinoContract, keyBondAssetId()))
135	135
136	136	func calcContractNsbtPriceInternal (nsbtSupplyOverride) = {
137	137	let nsbtSupplyMAX = value(assetInfo(nsbtAssetId)).quantity
138	138	let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
139	139	if ((neutrinoMetrics == neutrinoMetrics))
140	140	then {
141	141	let nsbtSupply = if ((nsbtSupplyOverride == unit))
142	142	then asInt(neutrinoMetrics[9])
143	143	else value(nsbtSupplyOverride)
144	144	let currentPrice = asInt(neutrinoMetrics[0])
145	145	let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [asInt(neutrinoMetrics[4]), asInt(neutrinoMetrics[6]), currentPrice, nsbtSupplyMAX, nsbtSupply], nil))
146	146	if ((kCalcArray == kCalcArray))
147	147	then {
148	148	let multK = parseBigIntValue(asString(kCalcArray[6]))
149	149	let mK = fromX16(multK, MULT)
150	150	let multStep1 = fraction(nsbtSupplyMAX, MULT, (nsbtSupplyMAX - nsbtSupply))
151	151	let multStep2 = fraction(multStep1, multStep1, MULT)
152	152	let multNsbt2usdnPrice = fraction(mK, multStep2, MULT)
153	153	let nsbt2usdnPrice = fraction(multNsbt2usdnPrice, PAULI, MULT)
154	154	let nsbt2wavesPrice = fraction(nsbt2usdnPrice, PAULI, currentPrice)
155	155	$Tuple2(nil, [nsbt2usdnPrice, nsbt2wavesPrice])
156	156	}
157	157	else throw("Strict value is not equal to itself.")
158	158	}
159	159	else throw("Strict value is not equal to itself.")
160	160	}
161	161
162	162
163	163	@Callable(i)
164	164	func constructor (neutrinoAddress,nsbtLockAddress,swapAmountAParam) = if ((i.caller != this))
165	165	then throw("not authorized")
166	166	else [StringEntry(keyNeutrinoAddress(), neutrinoAddress), IntegerEntry(keySwapAmountAParam(), swapAmountAParam)]
167	167
168	168
169	169
170	170	@Callable(i)
171	171	func calcSwapLimitREADONLY (gNsbtAmount) = {
172	172	let limitParamA = toBigInt(getIntOrFail(this, keySwapAmountAParam()))
173	173	let gNsbtAmountScale16 = toX16(gNsbtAmount, scale6)
174	174	let limitPowPart = pow(gNsbtAmountScale16, 16, EULERNUMBER, 16, 8, CEILING)
175	175	let limit = fraction(limitParamA, limitPowPart, scale10BigInt)
176	176	$Tuple2(nil, toInt(limit))
177	177	}
178	178
179	179
180	180
181	181	@Callable(i)
182	182	func calculateKREADONLY (wRaw,uRaw,price,mRaw,sRaw) = {
183	183	let EXP = toBigInt(2718281)
184	184	let EXPSCALE = 6
185	185	let a = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_a"), 3)
186	186	let paulB = valueOrElse(getInteger(auctionContract, "nsbtCurveParam_b"), ((3 * PAULI) / 10))
187	187	let wReservesInUsdn = convertWavesToNeutrino(wRaw, price)
188	188	let multBR = fraction(wReservesInUsdn, MULT, uRaw)
189	189	if ((multBR > 10678564816))
190	190	then throw("BR > 10678.564816% will overflow exponent")
191	191	else {
192	192	let multPower = (a * (multBR - MULT))
193	193	let multExpInPower = pow(EXP, EXPSCALE, toBigInt(multPower), MULTSCALE, SCALE16, DOWN)
194	194	let multK = fraction(toBigInt(paulB), multExpInPower, BIGPAULI)
195	195	$Tuple2(nil, [a, paulB, wReservesInUsdn, multBR, multPower, toString(multExpInPower), toString(multK)])
196	196	}
197	197	}
198	198
199	199
200	200
201	201	@Callable(i)
202	202	func curveFunctionREADONLY (wavesPayRaw) = {
203	203	let neutrinoMetrics = asAnyList(invoke(this, "calcNeutinoMetricsREADONLY", nil, nil))
204	204	if ((neutrinoMetrics == neutrinoMetrics))
205	205	then {
206	206	let price = asInt(neutrinoMetrics[0])
207	207	let wRaw = asInt(neutrinoMetrics[3])
208	208	let uRaw = asInt(neutrinoMetrics[5])
209	209	let sRaw = asInt(neutrinoMetrics[9])
210	210	let mRaw = value(assetInfo(nsbtAssetId)).quantity
211	211	let kCalcArray = asAnyList(invoke(this, "calculateKREADONLY", [wRaw, uRaw, price, mRaw, sRaw], nil))
212	212	if ((kCalcArray == kCalcArray))
213	213	then {
214	214	let multK = parseBigIntValue(asString(kCalcArray[6]))
215	215	let usdnPay = convertWavesToNeutrino(wavesPayRaw, price)
216	216	let bigMaxNsbtSupply = toBigInt(mRaw)
217	217	let bigNsbtSupply = toBigInt((mRaw - sRaw))
218	218	let step1 = fraction(toBigInt(usdnPay), BIGMULT16, multK)
219	219	let step2 = fraction(step1, bigNsbtSupply, bigMaxNsbtSupply)
220	220	let step3 = toInt(fraction(bigNsbtSupply, bigMaxNsbtSupply, (step2 + bigMaxNsbtSupply)))
221	221	let nsbtAmountRaw = ((mRaw - sRaw) - step3)
222	222	$Tuple2(nil, [nsbtAmountRaw, usdnPay, wRaw, uRaw, mRaw, sRaw, asInt(kCalcArray[0]), asInt(kCalcArray[1]), asInt(kCalcArray[2]), price, asInt(kCalcArray[3]), asInt(kCalcArray[4]), kCalcArray[5], kCalcArray[6], toString(step1), toString(step2), step3])
223	223	}
224	224	else throw("Strict value is not equal to itself.")
225	225	}
226	226	else throw("Strict value is not equal to itself.")
227	227	}
228	228
229	229
230	230
231	231	@Callable(i)
232	232	func calcContractNsbtPriceREADONLY () = calcContractNsbtPriceInternal(unit)
233	233
234	234
235	235
236	236	@Callable(i)
237	237	func calcContractNsbtPriceBySupplyREADONLY (nsbtSupply) = calcContractNsbtPriceInternal(nsbtSupply)
238	238
239	239
240	240
241	241	@Callable(i)
242	242	func calcNeutinoMetricsREADONLY () = {
243	243	let currentPrice = getIntegerValue(controlContract, keyPrice())
244	244	let neutrinoLockedBalance = valueOrElse(getInteger(neutrinoContract, keyNeutrinoLockedBalance()), 0)
245	245	let wavesLockedBalance = valueOrElse(getInteger(neutrinoContract, keyWavesLockedBalance()), 0)
246	246	let reserve = (wavesBalance(neutrinoContract).regular - wavesLockedBalance)
247	247	let reservesInUsdn = convertWavesToNeutrino(reserve, currentPrice)
248	248	let neutrinoSupply = (((neutrinoLockedBalance + value(assetInfo(neutrinoAssetId)).quantity) - assetBalance(neutrinoContract, neutrinoAssetId)) - assetBalance(liquidationContract, neutrinoAssetId))
249	249	let surplus = (reservesInUsdn - neutrinoSupply)
250	250	let deficit = (neutrinoSupply - reservesInUsdn)
251	251	let surplusPercent = if ((neutrinoSupply == 0))
252	252	then 0
253	253	else (fraction(surplus, PAULI, neutrinoSupply) * 100)
254	254	let BR = if ((neutrinoSupply == 0))
255	255	then 0
256	256	else fraction(reservesInUsdn, PAULI, neutrinoSupply)
257	257	let nsbtSupplyMAX = value(assetInfo(nsbtAssetId)).quantity
258	258	let nsbtSupply = (nsbtSupplyMAX - assetBalance(auctionContract, nsbtAssetId))
259	259	$Tuple2(nil, [currentPrice, neutrinoLockedBalance, wavesLockedBalance, reserve, reservesInUsdn, neutrinoSupply, surplus, surplusPercent, BR, nsbtSupply, nsbtSupplyMAX])
260	260	}
261	261
262	262
263	263
264	264	@Callable(i)
265	265	func getUnstakeComissionAmountREADONLY (amount,startHeight,halfLife) = $Tuple2(nil, fraction(amount, pow(2, 0, fraction(-((height - startHeight)), MULT, halfLife), 8, 8, HALFUP), MULT))
266	266
267	267
268	268
269	269	@Callable(i)
270	270	func mergeStakesREADONLY (amount1,height1,amount2,height2,halfLife) = {
271	271	let w = fraction(amount2, pow(2, 0, fraction((height2 - height1), MULT, halfLife), 8, 8, HALFUP), MULT)
272	272	let v = fraction((amount1 + amount2), MULT, (amount1 + w))
273	273	$Tuple2(nil, (height1 + ((HALF8 - (halfLife * log(v, 8, 2, 0, 8, HALFUP))) / MULT)))
274	274	}
275	275
276	276

github/deemru/w8io/3ef1775 
78.04 ms ◑