w8 · tx · HLN···a2A

tx · HLNGxu9TLaerUEpJcQtmogbk9NNM9ti9MR3q4pH2aa2A

3N1Epwa6GQuTQr2K9WzeUcqSFCdERwuvL5T:  -0.02800000 Waves

2022.06.14 19:34 [2096298] smart account 3N1Epwa6GQuTQr2K9WzeUcqSFCdERwuvL5T > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HLNGxu9TLaerUEpJcQtmogbk9NNM9ti9MR3q4pH2aa2A",
    "fee": 2800000,
    "feeAssetId": null,
    "timestamp": 1655224507770,
    "version": 1,
    "sender": "3N1Epwa6GQuTQr2K9WzeUcqSFCdERwuvL5T",
    "senderPublicKey": "7iXEgsFNsnbLZ3ca4tmz8jffnyxMu9keuBV6CuQPJLuA",
    "proofs": [
        "pfBCom4PU6mMRApZT3zbzkp3JYziivjbpGuEGCzomyPLVBDPzyW6GXr6BkJH4528aUeYSGjbyMjeDB5cuV3NXDx"
    ],
    "script": "base64:AAIFAAAAAAAAADYIAhINCgsICAgICAgBCAEIARIECgIICBIFCgMICAQSBAoCCAgSAwoBARIECgIICBIDCgEIEgAAAAAgAAAAAAlzZXBhcmF0b3ICAAAAAl9fAAAAAAxrZXlGZWVBbW91bnQJAAS5AAAAAgkABEwAAAACAgAAAAIlcwkABEwAAAACAgAAAANmZWUFAAAAA25pbAUAAAAJc2VwYXJhdG9yAAAAAA5rZXlVc2RuQXNzZXRJZAkABLkAAAACCQAETAAAAAICAAAAAiVzCQAETAAAAAICAAAAC3VzZG5Bc3NldElkBQAAAANuaWwFAAAACXNlcGFyYXRvcgAAAAAOa2V5RXBvY2hMZW5ndGgJAAS5AAAAAgkABEwAAAACAgAAAAIlcwkABEwAAAACAgAAAAtlcG9jaExlbmd0aAUAAAADbmlsBQAAAAlzZXBhcmF0b3IAAAAAEWtleUZpbmFsaXplUmV3YXJkCQAEuQAAAAIJAARMAAAAAgIAAAACJXMJAARMAAAAAgIAAAAOZmluYWxpemVSZXdhcmQFAAAAA25pbAUAAAAJc2VwYXJhdG9yAAAAAAxrZXlXeEFzc2V0SWQJAAS5AAAAAgkABEwAAAACAgAAAAIlcwkABEwAAAACAgAAAAl3eEFzc2V0SWQFAAAAA25pbAUAAAAJc2VwYXJhdG9yAAAAABZrZXlBc3NldHNTdG9yZUNvbnRyYWN0CQAEuQAAAAIJAARMAAAAAgIAAAACJXMJAARMAAAAAgIAAAATYXNzZXRzU3RvcmVDb250cmFjdAUAAAADbmlsBQAAAAlzZXBhcmF0b3IAAAAAE2tleVVzZXJQb29sQ29udHJhY3QJAAS5AAAAAgkABEwAAAACAgAAAAIlcwkABEwAAAACAgAAABB1c2VyUG9vbENvbnRyYWN0BQAAAANuaWwFAAAACXNlcGFyYXRvcgAAAAATa2V5RW1pc3Npb25Db250cmFjdAkABLkAAAACCQAETAAAAAICAAAAAiVzCQAETAAAAAICAAAAEGVtaXNzaW9uQ29udHJhY3QFAAAAA25pbAUAAAAJc2VwYXJhdG9yAAAAABNrZXlCb29zdGluZ0NvbnRyYWN0CQAEuQAAAAIJAARMAAAAAgIAAAACJXMJAARMAAAAAgIAAAAQYm9vc3RpbmdDb250cmFjdAUAAAADbmlsBQAAAAlzZXBhcmF0b3IAAAAAEmtleUZhY3RvcnlDb250cmFjdAkABLkAAAACCQAETAAAAAICAAAAAiVzCQAETAAAAAICAAAAD2ZhY3RvcnlDb250cmFjdAUAAAADbmlsBQAAAAlzZXBhcmF0b3IAAAAAGWtleVZvdGluZ0VtaXNzaW9uQ29udHJhY3QJAAS5AAAAAgkABEwAAAACAgAAAAIlcwkABEwAAAACAgAAABZ2b3RpbmdFbWlzc2lvbkNvbnRyYWN0BQAAAANuaWwFAAAACXNlcGFyYXRvcgEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAQAAAANrZXkJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkJAAEsAAAAAgUAAAADa2V5AgAAAA8gaXMgbm90IGRlZmluZWQBAAAAEGtleUluTGlzdEFzc2V0SWQAAAACAAAADWFtb3VudEFzc2V0SWQAAAAMcHJpY2VBc3NldElkCQAEuQAAAAIJAARMAAAAAgIAAAAGJXMlcyVzCQAETAAAAAICAAAABmluTGlzdAkABEwAAAACBQAAAA1hbW91bnRBc3NldElkCQAETAAAAAIFAAAADHByaWNlQXNzZXRJZAUAAAADbmlsBQAAAAlzZXBhcmF0b3IBAAAAD2tleVN1Z2dlc3RJbmRleAAAAAIAAAANYW1vdW50QXNzZXRJZAAAAAxwcmljZUFzc2V0SWQJAAS5AAAAAgkABEwAAAACAgAAAAYlcyVzJXMJAARMAAAAAgIAAAAMc3VnZ2VzdEluZGV4CQAETAAAAAIFAAAADWFtb3VudEFzc2V0SWQJAARMAAAAAgUAAAAMcHJpY2VBc3NldElkBQAAAANuaWwFAAAACXNlcGFyYXRvcgEAAAAOa2V5U3RhcnRIZWlnaHQAAAADAAAADWFtb3VudEFzc2V0SWQAAAAMcHJpY2VBc3NldElkAAAADHN1Z2dlc3RJbmRleAkABLkAAAACCQAETAAAAAICAAAACCVzJXMlcyVkCQAETAAAAAICAAAAC3N0YXJ0SGVpZ2h0CQAETAAAAAIFAAAADWFtb3VudEFzc2V0SWQJAARMAAAAAgUAAAAMcHJpY2VBc3NldElkCQAETAAAAAIJAAGkAAAAAQUAAAAMc3VnZ2VzdEluZGV4BQAAAANuaWwFAAAACXNlcGFyYXRvcgEAAAAPa2V5Vm90aW5nUmVzdWx0AAAAAwAAAA1hbW91bnRBc3NldElkAAAADHByaWNlQXNzZXRJZAAAAAxzdWdnZXN0SW5kZXgJAAS5AAAAAgkABEwAAAACAgAAAAglcyVzJXMlZAkABEwAAAACAgAAAAx2b3RpbmdSZXN1bHQJAARMAAAAAgUAAAANYW1vdW50QXNzZXRJZAkABEwAAAACBQAAAAxwcmljZUFzc2V0SWQJAARMAAAAAgkAAaQAAAABBQAAAAxzdWdnZXN0SW5kZXgFAAAAA25pbAUAAAAJc2VwYXJhdG9yAQAAAAp0b3RhbFZvdGVzAAAAAgAAAAh0b3RhbFllcwAAAAd0b3RhbE5vCQAEuQAAAAIJAARMAAAAAgIAAAAEJWQlZAkABEwAAAACBQAAAAh0b3RhbFllcwkABEwAAAACBQAAAAd0b3RhbE5vBQAAAANuaWwFAAAACXNlcGFyYXRvcgEAAAAHa2V5Vm90ZQAAAAQAAAANYW1vdW50QXNzZXRJZAAAAAxwcmljZUFzc2V0SWQAAAAMc3VnZ2VzdEluZGV4AAAADHZvdGVyQWRkcmVzcwkABLkAAAACCQAETAAAAAICAAAACiVzJXMlcyVkJXMJAARMAAAAAgIAAAAEdm90ZQkABEwAAAACBQAAAA1hbW91bnRBc3NldElkCQAETAAAAAIFAAAADHByaWNlQXNzZXRJZAkABEwAAAACCQABpAAAAAEFAAAADHN1Z2dlc3RJbmRleAkABEwAAAACBQAAAAx2b3RlckFkZHJlc3MFAAAAA25pbAUAAAAJc2VwYXJhdG9yAQAAAAxrZXlWb3RlVmFsdWUAAAACAAAACWd3eEFtb3VudAAAAAR2b3RlBAAAAANrZXkDBQAAAAR2b3RlCQAEuQAAAAIJAARMAAAAAgIAAAAEJWQlcwkABEwAAAACBQAAAAlnd3hBbW91bnQJAARMAAAAAgIAAAADeWVzBQAAAANuaWwFAAAACXNlcGFyYXRvcgkABLkAAAACCQAETAAAAAICAAAABCVkJXMJAARMAAAAAgUAAAAJZ3d4QW1vdW50CQAETAAAAAICAAAAAm5vBQAAAANuaWwFAAAACXNlcGFyYXRvcgUAAAADa2V5AQAAABNrZXlNYW5hZ2VyUHVibGljS2V5AAAAAAIAAAAUJXNfX21hbmFnZXJQdWJsaWNLZXkBAAAAGmtleVBlbmRpbmdNYW5hZ2VyUHVibGljS2V5AAAAAAIAAAAbJXNfX3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AAAAABNhc3NldHNTdG9yZUNvbnRyYWN0CQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAQUAAAAWa2V5QXNzZXRzU3RvcmVDb250cmFjdAAAAAAQYm9vc3RpbmdDb250cmFjdAkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEFAAAAE2tleUJvb3N0aW5nQ29udHJhY3QAAAAAEGVtaXNzaW9uQ29udHJhY3QJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAAA9nZXRTdHJpbmdPckZhaWwAAAABBQAAABNrZXlFbWlzc2lvbkNvbnRyYWN0AAAAAA9mYWN0b3J5Q29udHJhY3QJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAAA9nZXRTdHJpbmdPckZhaWwAAAABBQAAABJrZXlGYWN0b3J5Q29udHJhY3QAAAAAEHVzZXJQb29sQ29udHJhY3QJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEJAQAAAA9nZXRTdHJpbmdPckZhaWwAAAABBQAAABNrZXlVc2VyUG9vbENvbnRyYWN0AAAAABZ2b3RpbmdFbWlzc2lvbkNvbnRyYWN0CQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABCQEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAQUAAAAZa2V5Vm90aW5nRW1pc3Npb25Db250cmFjdAEAAAAWbWFuYWdlclB1YmxpY0tleU9yVW5pdAAAAAAEAAAAByRtYXRjaDAJAAQiAAAAAQkBAAAAE2tleU1hbmFnZXJQdWJsaWNLZXkAAAAAAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXMFAAAAByRtYXRjaDAJAAJZAAAAAQUAAAABcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAUAAAAEdW5pdAkAAAIAAAABAgAAAAtNYXRjaCBlcnJvcgEAAAAdcGVuZGluZ01hbmFnZXJQdWJsaWNLZXlPclVuaXQAAAAABAAAAAckbWF0Y2gwCQAEIgAAAAEJAQAAABprZXlQZW5kaW5nTWFuYWdlclB1YmxpY0tleQAAAAADCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABcwUAAAAHJG1hdGNoMAkAAlkAAAABBQAAAAFzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0BQAAAAR1bml0CQAAAgAAAAECAAAAC01hdGNoIGVycm9yAQAAAAttdXN0TWFuYWdlcgAAAAEAAAABaQQAAAACcGQJAAACAAAAAQIAAAARcGVybWlzc2lvbiBkZW5pZWQEAAAAByRtYXRjaDAJAQAAABZtYW5hZ2VyUHVibGljS2V5T3JVbml0AAAAAAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAKQnl0ZVZlY3RvcgQAAAACcGsFAAAAByRtYXRjaDADCQAAAAAAAAIIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQUAAAACcGsGBQAAAAJwZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAMJAAAAAAAAAggFAAAAAWkAAAAGY2FsbGVyBQAAAAR0aGlzBgUAAAACcGQJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IBAAAABWFzSW50AAAAAQAAAAN2YWwEAAAAByRtYXRjaDAFAAAAA3ZhbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAZ2YWxJbnQFAAAAByRtYXRjaDAFAAAABnZhbEludAkAAAIAAAABAgAAABtmYWlsZWQgdG8gY2FzdCBpbnRvIEludGVnZXIAAAAIAAAAAWkBAAAAC2NvbnN0cnVjdG9yAAAACwAAABZhc3NldHNTdG9yZUNvbnRyYWN0UHJtAAAAE2Jvb3N0aW5nQ29udHJhY3RQcm0AAAATZW1pc3Npb25Db250cmFjdFBybQAAABJmYWN0b3J5Q29udHJhY3RQcm0AAAATdXNlclBvb2xDb250cmFjdFBybQAAABl2b3RpbmdFbWlzc2lvbkNvbnRyYWN0UHJtAAAADGZlZUFtb3VudFBybQAAAAx3eEFzc2V0SWRQcm0AAAARdm90aW5nRHVyYXRpb25Qcm0AAAAOdXNkbkFzc2V0SWRQcm0AAAARZmluYWxpemVSZXdhcmRQcm0EAAAABmNoZWNrcwkABEwAAAACCQEAAAALbXVzdE1hbmFnZXIAAAABBQAAAAFpCQAETAAAAAIDCQEAAAAJaXNEZWZpbmVkAAAAAQkABCYAAAABBQAAABZhc3NldHNTdG9yZUNvbnRyYWN0UHJtBgkAAAIAAAABAgAAACRJbnZhbGlkIGFzc2V0X3N0b3JlIGNvbnRyYWN0IGFkZHJlc3MJAARMAAAAAgMJAQAAAAlpc0RlZmluZWQAAAABCQAEJgAAAAEFAAAAE2Jvb3N0aW5nQ29udHJhY3RQcm0GCQAAAgAAAAECAAAAIUludmFsaWQgYm9vc3RpbmcgY29udHJhY3QgYWRkcmVzcwkABEwAAAACAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQmAAAAAQUAAAATdXNlclBvb2xDb250cmFjdFBybQYJAAACAAAAAQIAAAAjSW52YWxpZCB1c2VyX3Bvb2xzIGNvbnRyYWN0IGFkZHJlc3MJAARMAAAAAgMJAQAAAAlpc0RlZmluZWQAAAABCQAEJgAAAAEFAAAAE2VtaXNzaW9uQ29udHJhY3RQcm0GCQAAAgAAAAECAAAAIUludmFsaWQgZW1pc3Npb24gY29udHJhY3QgYWRkcmVzcwkABEwAAAACAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQmAAAAAQUAAAASZmFjdG9yeUNvbnRyYWN0UHJtBgkAAAIAAAABAgAAACBJbnZhbGlkIGZhY3RvcnkgY29udHJhY3QgYWRkcmVzcwkABEwAAAACAwkAAGcAAAACBQAAAAxmZWVBbW91bnRQcm0AAAAAAAAAAAAGCQAAAgAAAAECAAAAEkludmFsaWQgZmVlIGFtb3VudAkABEwAAAACAwkAAGYAAAACBQAAABF2b3RpbmdEdXJhdGlvblBybQAAAAAAAAAAAAYJAAACAAAAAQIAAAAXSW52YWxpZCB2b3RpbmcgZHVyYXRpb24JAARMAAAAAgMJAABmAAAAAgUAAAARZmluYWxpemVSZXdhcmRQcm0AAAAAAAAAAAAGCQAAAgAAAAECAAAAF0ludmFsaWQgZmluYWxpemUgcmV3YXJkCQAETAAAAAIDCQEAAAAJaXNEZWZpbmVkAAAAAQkAA+wAAAABCQACWQAAAAEFAAAADHd4QXNzZXRJZFBybQYJAAACAAAAAQIAAAATSW52YWxpZCBXWCBhc3NldCBJRAkABEwAAAACAwkBAAAACWlzRGVmaW5lZAAAAAEJAAPsAAAAAQkAAlkAAAABBQAAAA51c2RuQXNzZXRJZFBybQYJAAACAAAAAQIAAAAVSW52YWxpZCBVU0ROIGFzc2V0IElEBQAAAANuaWwDCQAAAAAAAAIFAAAABmNoZWNrcwUAAAAGY2hlY2tzCQAFFAAAAAIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAWa2V5QXNzZXRzU3RvcmVDb250cmFjdAUAAAAWYXNzZXRzU3RvcmVDb250cmFjdFBybQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAABNrZXlCb29zdGluZ0NvbnRyYWN0BQAAABNib29zdGluZ0NvbnRyYWN0UHJtCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAE2tleUVtaXNzaW9uQ29udHJhY3QFAAAAE2VtaXNzaW9uQ29udHJhY3RQcm0JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAASa2V5RmFjdG9yeUNvbnRyYWN0BQAAABJmYWN0b3J5Q29udHJhY3RQcm0JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAATa2V5VXNlclBvb2xDb250cmFjdAUAAAATdXNlclBvb2xDb250cmFjdFBybQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAABlrZXlWb3RpbmdFbWlzc2lvbkNvbnRyYWN0BQAAABl2b3RpbmdFbWlzc2lvbkNvbnRyYWN0UHJtCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAAxrZXlGZWVBbW91bnQFAAAADGZlZUFtb3VudFBybQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAOa2V5RXBvY2hMZW5ndGgFAAAAEXZvdGluZ0R1cmF0aW9uUHJtCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABFrZXlGaW5hbGl6ZVJld2FyZAUAAAARZmluYWxpemVSZXdhcmRQcm0JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAMa2V5V3hBc3NldElkBQAAAAx3eEFzc2V0SWRQcm0JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAOa2V5VXNkbkFzc2V0SWQFAAAADnVzZG5Bc3NldElkUHJtBQAAAANuaWwFAAAABHVuaXQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAAB3N1Z2dlc3QAAAACAAAADWFtb3VudEFzc2V0SWQAAAAMcHJpY2VBc3NldElkBAAAAAdwYXltZW50CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAARpbmZvCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAPsAAAAAQkAAlkAAAABBQAAAA1hbW91bnRBc3NldElkAgAAABhpbnZhbGlkIGFtb3VudEFzc2V0SWQgSUQEAAAABmNoZWNrcwkABEwAAAACAwkAAAAAAAACCAUAAAAEaW5mbwAAAAZpc3N1ZXIIBQAAAAFpAAAABmNhbGxlcgYJAAACAAAAAQIAAAApYXNzZXQgY2FuIG9ubHkgYmUgc3VnZ2VzdGVkIGJ5IGl0cyBpc3N1ZXIJAARMAAAAAgMJAAAAAAAAAggFAAAABGluZm8AAAAIc2NyaXB0ZWQHBgkAAAIAAAABAgAAAA5hc3NldCBpcyBzbWFydAkABEwAAAACAwkAAAAAAAACCQACWAAAAAEJAQAAAAV2YWx1ZQAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQJAQAAAAV2YWx1ZQAAAAEJAAQiAAAAAQUAAAAMa2V5V3hBc3NldElkBgkAAAIAAAABAgAAABFpbnZhbGlkIGZlZSBhc3NldAkABEwAAAACAwkAAAAAAAACCAUAAAAHcGF5bWVudAAAAAZhbW91bnQJAQAAAAV2YWx1ZQAAAAEJAAQfAAAAAQUAAAAMa2V5RmVlQW1vdW50BgkAAAIAAAABAgAAABJpbnZhbGlkIGZlZSBhbW91bnQJAARMAAAAAgMJAAAAAAAAAgUAAAAMcHJpY2VBc3NldElkCQEAAAAFdmFsdWUAAAABCQAEIgAAAAEFAAAADmtleVVzZG5Bc3NldElkBgkAAAIAAAABAgAAABhwcmljZUFzc2V0SWQgaXMgbm90IFVTRE4JAARMAAAAAgMJAAAAAAAAAgkABB8AAAABCQEAAAAQa2V5SW5MaXN0QXNzZXRJZAAAAAIFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAUAAAAEdW5pdAYJAAACAAAAAQIAAAAWYWxyZWFkeSBpbiB2b3RpbmcgbGlzdAUAAAADbmlsAwkAAAAAAAACBQAAAAZjaGVja3MFAAAABmNoZWNrcwQAAAAMZW5zdXJlQWN0aXZlBAAAAAckbWF0Y2gwCQAD/AAAAAQFAAAAEHVzZXJQb29sQ29udHJhY3QCAAAADnN0YXR1c1JFQURPTkxZCQAETAAAAAIFAAAADWFtb3VudEFzc2V0SWQJAARMAAAAAgUAAAAMcHJpY2VBc3NldElkBQAAAANuaWwFAAAAA25pbAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFzBQAAAAckbWF0Y2gwAwkAAAAAAAACBQAAAAFzAgAAAAZhY3RpdmUGCQAAAgAAAAECAAAAF3VzZXIgcG9vbCBpcyBub3QgYWN0aXZlCQAAAgAAAAECAAAAF3VzZXIgcG9vbCBpcyBub3QgYWN0aXZlAwkAAAAAAAACBQAAAAxlbnN1cmVBY3RpdmUFAAAADGVuc3VyZUFjdGl2ZQQAAAAZZW5zdXJlQW1vdW50QXNzZXRWZXJpZmllZAQAAAAHJG1hdGNoMAkAA/wAAAAEBQAAABNhc3NldHNTdG9yZUNvbnRyYWN0AgAAABJpc1ZlcmlmaWVkUkVBRE9OTFkJAARMAAAAAgUAAAANYW1vdW50QXNzZXRJZAUAAAADbmlsBQAAAANuaWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAB0Jvb2xlYW4EAAAAAWIFAAAAByRtYXRjaDADBQAAAAFiBgkAAAIAAAABAgAAABVhc3NldCBpcyBub3QgdmVyaWZpZWQJAAACAAAAAQIAAAAVYXNzZXQgaXMgbm90IHZlcmlmaWVkAwkAAAAAAAACBQAAABllbnN1cmVBbW91bnRBc3NldFZlcmlmaWVkBQAAABllbnN1cmVBbW91bnRBc3NldFZlcmlmaWVkBAAAAApidXJuRmVlSW52CQAD/AAAAAQFAAAAEGVtaXNzaW9uQ29udHJhY3QCAAAABGJ1cm4FAAAAA25pbAkABEwAAAACCQEAAAAPQXR0YWNoZWRQYXltZW50AAAAAggFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAgFAAAAB3BheW1lbnQAAAAGYW1vdW50BQAAAANuaWwDCQAAAAAAAAIFAAAACmJ1cm5GZWVJbnYFAAAACmJ1cm5GZWVJbnYEAAAAD25ld1N1Z2dlc3RJbmRleAQAAAAHJG1hdGNoMAkABB8AAAABCQEAAAAPa2V5U3VnZ2VzdEluZGV4AAAAAgUAAAANYW1vdW50QXNzZXRJZAUAAAAMcHJpY2VBc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA2ludAUAAAAHJG1hdGNoMAkAAGQAAAACBQAAAANpbnQAAAAAAAAAAAEAAAAAAAAAAAAJAAUUAAAAAgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAEGtleUluTGlzdEFzc2V0SWQAAAACBQAAAA1hbW91bnRBc3NldElkBQAAAAxwcmljZUFzc2V0SWQFAAAAD25ld1N1Z2dlc3RJbmRleAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAADmtleVN0YXJ0SGVpZ2h0AAAAAwUAAAANYW1vdW50QXNzZXRJZAUAAAAMcHJpY2VBc3NldElkBQAAAA9uZXdTdWdnZXN0SW5kZXgFAAAABmhlaWdodAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAPa2V5Vm90aW5nUmVzdWx0AAAAAwUAAAANYW1vdW50QXNzZXRJZAUAAAAMcHJpY2VBc3NldElkBQAAAA9uZXdTdWdnZXN0SW5kZXgJAQAAAAp0b3RhbFZvdGVzAAAAAgIAAAABMAIAAAABMAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAD2tleVN1Z2dlc3RJbmRleAAAAAIFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAUAAAAPbmV3U3VnZ2VzdEluZGV4BQAAAANuaWwFAAAABHVuaXQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAABHZvdGUAAAADAAAADWFtb3VudEFzc2V0SWQAAAAMcHJpY2VBc3NldElkAAAAB2luRmF2b3IEAAAADHN1Z2dlc3RJbmRleAkBAAAABXZhbHVlAAAAAQkABB8AAAABCQEAAAAQa2V5SW5MaXN0QXNzZXRJZAAAAAIFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAQAAAASdm90aW5nRmluaXNoSGVpZ2h0CQAAZAAAAAIJAQAAAAV2YWx1ZQAAAAEJAAQfAAAAAQkBAAAADmtleVN0YXJ0SGVpZ2h0AAAAAwUAAAANYW1vdW50QXNzZXRJZAUAAAAMcHJpY2VBc3NldElkBQAAAAxzdWdnZXN0SW5kZXgJAQAAAAV2YWx1ZQAAAAEJAAQfAAAAAQUAAAAOa2V5RXBvY2hMZW5ndGgEAAAABmNoZWNrcwkABEwAAAACAwkBAAAACWlzRGVmaW5lZAAAAAEJAAQfAAAAAQkBAAAAEGtleUluTGlzdEFzc2V0SWQAAAACBQAAAA1hbW91bnRBc3NldElkBQAAAAxwcmljZUFzc2V0SWQGCQAAAgAAAAECAAAAInRoZSB0b2tlbiBpc24ndCBvbiB0aGUgdm90aW5nIGxpc3QJAARMAAAAAgMJAABmAAAAAgUAAAASdm90aW5nRmluaXNoSGVpZ2h0BQAAAAZoZWlnaHQGCQAAAgAAAAECAAAAEHRvbyBsYXRlIHRvIHZvdGUFAAAAA25pbAMJAAAAAAAAAgUAAAAGY2hlY2tzBQAAAAZjaGVja3MEAAAACWd3eEFtb3VudAkAA/wAAAAEBQAAABBib29zdGluZ0NvbnRyYWN0AgAAACBnZXRVc2VyR3d4QW1vdW50QXRIZWlnaHRSRUFET05MWQkABEwAAAACCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgkABEwAAAACBQAAABJ2b3RpbmdGaW5pc2hIZWlnaHQFAAAAA25pbAUAAAADbmlsBAAAAAdub3RaZXJvAwkAAGYAAAACCQEAAAAFYXNJbnQAAAABBQAAAAlnd3hBbW91bnQAAAAAAAAAAAAGCQAAAgAAAAECAAAAEnlvdSBkb24ndCBoYXZlIGd3eAMJAAAAAAAAAgUAAAAHbm90WmVybwUAAAAHbm90WmVybwQAAAAEdm90ZQQAAAAHJG1hdGNoMAkABCIAAAABCQEAAAAHa2V5Vm90ZQAAAAQFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAUAAAAMc3VnZ2VzdEluZGV4CQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFzBQAAAAckbWF0Y2gwBAAAAAR2b3RlCQAEtQAAAAIFAAAAAXMFAAAACXNlcGFyYXRvcgQAAAAJdm90ZVZhbHVlCQABkQAAAAIFAAAABHZvdGUAAAAAAAAAAAEEAAAACHZvdGVUeXBlCQABkQAAAAIFAAAABHZvdGUAAAAAAAAAAAIEAAAAEWlzVm90ZVR5cGVTaW1pbGFyAwMJAAAAAAAAAgUAAAAIdm90ZVR5cGUCAAAAA3llcwkAAAAAAAACBQAAAAdpbkZhdm9yBgcGAwkAAAAAAAACBQAAAAh2b3RlVHlwZQIAAAACbm8JAAAAAAAAAgUAAAAHaW5GYXZvcgcHBAAAABJpc1ZvdGVWYWx1ZVNpbWlsYXIDBQAAABFpc1ZvdGVUeXBlU2ltaWxhcgkAAAAAAAACCQEAAAAFYXNJbnQAAAABBQAAAAlnd3hBbW91bnQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQUAAAAJdm90ZVZhbHVlBwQAAAAQaXNOZXdWb3RlU2ltaWxhcgMDBQAAABFpc1ZvdGVUeXBlU2ltaWxhcgUAAAASaXNWb3RlVmFsdWVTaW1pbGFyBwkAAAIAAAABAgAAABF5b3UgYWxyZWFkeSB2b3RlZAkAA/wAAAAEBQAAAAR0aGlzAgAAAApjYW5jZWxWb3RlCQAETAAAAAIFAAAADWFtb3VudEFzc2V0SWQJAARMAAAAAgUAAAAMcHJpY2VBc3NldElkBQAAAANuaWwFAAAAA25pbAUAAAAQaXNOZXdWb3RlU2ltaWxhcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAQAAAABdQUAAAAHJG1hdGNoMAUAAAABdQkAAAIAAAABAgAAAAtNYXRjaCBlcnJvcgMJAAAAAAAAAgUAAAAEdm90ZQUAAAAEdm90ZQQAAAAMdm90aW5nUmVzdWx0CQAEtQAAAAIJAQAAAAV2YWx1ZQAAAAEJAAQiAAAAAQkBAAAAD2tleVZvdGluZ1Jlc3VsdAAAAAMFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAUAAAAMc3VnZ2VzdEluZGV4BQAAAAlzZXBhcmF0b3IEAAAADXBvc2l0aXZlVm90ZXMJAAGRAAAAAgUAAAAMdm90aW5nUmVzdWx0AAAAAAAAAAABBAAAAA1uZWdhdGl2ZVZvdGVzCQABkQAAAAIFAAAADHZvdGluZ1Jlc3VsdAAAAAAAAAAAAgQAAAAbbmV3UG9zaXRpdmVBbmROZWdhdGl2ZVZvdGVzAwUAAAAHaW5GYXZvcgQAAAAQbmV3UG9zaXRpdmVWb3RlcwkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEFAAAADXBvc2l0aXZlVm90ZXMJAQAAAAVhc0ludAAAAAEFAAAACWd3eEFtb3VudAkABEwAAAACCQABpAAAAAEFAAAAEG5ld1Bvc2l0aXZlVm90ZXMJAARMAAAAAgUAAAANbmVnYXRpdmVWb3RlcwUAAAADbmlsBAAAABBuZXdOZWdhdGl2ZVZvdGVzCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQUAAAANbmVnYXRpdmVWb3RlcwkBAAAABWFzSW50AAAAAQUAAAAJZ3d4QW1vdW50CQAETAAAAAIFAAAADXBvc2l0aXZlVm90ZXMJAARMAAAAAgkAAaQAAAABBQAAABBuZXdOZWdhdGl2ZVZvdGVzBQAAAANuaWwEAAAAB3ZvdGVLZXkJAQAAAAdrZXlWb3RlAAAABAUAAAANYW1vdW50QXNzZXRJZAUAAAAMcHJpY2VBc3NldElkBQAAAAxzdWdnZXN0SW5kZXgJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAAAl2b3RlVmFsdWUJAQAAAAxrZXlWb3RlVmFsdWUAAAACCQABpAAAAAEJAQAAAAVhc0ludAAAAAEFAAAACWd3eEFtb3VudAUAAAAHaW5GYXZvcgkABRQAAAACCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAAA9rZXlWb3RpbmdSZXN1bHQAAAADBQAAAA1hbW91bnRBc3NldElkBQAAAAxwcmljZUFzc2V0SWQFAAAADHN1Z2dlc3RJbmRleAkBAAAACnRvdGFsVm90ZXMAAAACCQABkQAAAAIFAAAAG25ld1Bvc2l0aXZlQW5kTmVnYXRpdmVWb3RlcwAAAAAAAAAAAAkAAZEAAAACBQAAABtuZXdQb3NpdGl2ZUFuZE5lZ2F0aXZlVm90ZXMAAAAAAAAAAAEJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAHdm90ZUtleQUAAAAJdm90ZVZhbHVlBQAAAANuaWwFAAAABHVuaXQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAAKY2FuY2VsVm90ZQAAAAIAAAANYW1vdW50QXNzZXRJZAAAAAxwcmljZUFzc2V0SWQEAAAAC3VzZXJBZGRyZXNzAwkAAAAAAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABHRoaXMJAAQlAAAAAQgFAAAAAWkAAAAMb3JpZ2luQ2FsbGVyCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAMc3VnZ2VzdEluZGV4CQEAAAAFdmFsdWUAAAABCQAEHwAAAAEJAQAAABBrZXlJbkxpc3RBc3NldElkAAAAAgUAAAANYW1vdW50QXNzZXRJZAUAAAAMcHJpY2VBc3NldElkBAAAAAZjaGVja3MJAARMAAAAAgMJAQAAAAlpc0RlZmluZWQAAAABCQAEIgAAAAEJAQAAAA9rZXlWb3RpbmdSZXN1bHQAAAADBQAAAA1hbW91bnRBc3NldElkBQAAAAxwcmljZUFzc2V0SWQFAAAADHN1Z2dlc3RJbmRleAYJAAACAAAAAQIAAAAXbm8gdm90ZSBmb3IgYXNzZXRzIHBhaXIFAAAAA25pbAMJAAAAAAAAAgUAAAAGY2hlY2tzBQAAAAZjaGVja3MEAAAABHZvdGUJAAS1AAAAAgkBAAAABXZhbHVlAAAAAQkABCIAAAABCQEAAAAHa2V5Vm90ZQAAAAQFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAUAAAAMc3VnZ2VzdEluZGV4BQAAAAt1c2VyQWRkcmVzcwUAAAAJc2VwYXJhdG9yBAAAAAl2b3RlVmFsdWUJAAGRAAAAAgUAAAAEdm90ZQAAAAAAAAAAAQQAAAAIdm90ZVR5cGUJAAGRAAAAAgUAAAAEdm90ZQAAAAAAAAAAAgQAAAAMdm90aW5nUmVzdWx0CQAEtQAAAAIJAQAAAAV2YWx1ZQAAAAEJAAQiAAAAAQkBAAAAD2tleVZvdGluZ1Jlc3VsdAAAAAMFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAUAAAAMc3VnZ2VzdEluZGV4BQAAAAlzZXBhcmF0b3IEAAAADXBvc2l0aXZlVm90ZXMJAAGRAAAAAgUAAAAMdm90aW5nUmVzdWx0AAAAAAAAAAABBAAAAA1uZWdhdGl2ZVZvdGVzCQABkQAAAAIFAAAADHZvdGluZ1Jlc3VsdAAAAAAAAAAAAgQAAAAHYWN0aW9ucwMJAAAAAAAAAgUAAAAIdm90ZVR5cGUCAAAAA3llcwQAAAAQbmV3UG9zaXRpdmVWb3RlcwkAAGUAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEFAAAADXBvc2l0aXZlVm90ZXMJAQAAAA1wYXJzZUludFZhbHVlAAAAAQUAAAAJdm90ZVZhbHVlCQAFFAAAAAIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAD2tleVZvdGluZ1Jlc3VsdAAAAAMFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAUAAAAMc3VnZ2VzdEluZGV4CQEAAAAKdG90YWxWb3RlcwAAAAIJAAGkAAAAAQUAAAAQbmV3UG9zaXRpdmVWb3RlcwUAAAANbmVnYXRpdmVWb3RlcwkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABCQEAAAAHa2V5Vm90ZQAAAAQFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAUAAAAMc3VnZ2VzdEluZGV4BQAAAAt1c2VyQWRkcmVzcwUAAAADbmlsBQAAAAR1bml0BAAAABBuZXdOZWdhdGl2ZVZvdGVzCQAAZQAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQUAAAANbmVnYXRpdmVWb3RlcwkBAAAADXBhcnNlSW50VmFsdWUAAAABBQAAAAl2b3RlVmFsdWUJAAUUAAAAAgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAPa2V5Vm90aW5nUmVzdWx0AAAAAwUAAAANYW1vdW50QXNzZXRJZAUAAAAMcHJpY2VBc3NldElkBQAAAAxzdWdnZXN0SW5kZXgJAQAAAAp0b3RhbFZvdGVzAAAAAgUAAAANcG9zaXRpdmVWb3RlcwkAAaQAAAABBQAAABBuZXdOZWdhdGl2ZVZvdGVzCQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAQAAAAdrZXlWb3RlAAAABAUAAAANYW1vdW50QXNzZXRJZAUAAAAMcHJpY2VBc3NldElkBQAAAAxzdWdnZXN0SW5kZXgFAAAAC3VzZXJBZGRyZXNzBQAAAANuaWwFAAAABHVuaXQFAAAAB2FjdGlvbnMJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAABnNldEZlZQAAAAEAAAAGbmV3RmVlBAAAAAZjaGVja3MJAARMAAAAAgkBAAAAC211c3RNYW5hZ2VyAAAAAQUAAAABaQUAAAADbmlsAwkAAAAAAAACBQAAAAZjaGVja3MFAAAABmNoZWNrcwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAMa2V5RmVlQW1vdW50BQAAAAZuZXdGZWUFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAAIZmluYWxpemUAAAACAAAADWFtb3VudEFzc2V0SWQAAAAMcHJpY2VBc3NldElkBAAAAAxzdWdnZXN0SW5kZXgJAQAAAAV2YWx1ZQAAAAEJAAQfAAAAAQkBAAAAEGtleUluTGlzdEFzc2V0SWQAAAACBQAAAA1hbW91bnRBc3NldElkBQAAAAxwcmljZUFzc2V0SWQEAAAAEnZvdGluZ0ZpbmlzaEhlaWdodAkAAGQAAAACCQEAAAAFdmFsdWUAAAABCQAEHwAAAAEJAQAAAA5rZXlTdGFydEhlaWdodAAAAAMFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAUAAAAMc3VnZ2VzdEluZGV4CQEAAAAFdmFsdWUAAAABCQAEHwAAAAEFAAAADmtleUVwb2NoTGVuZ3RoBAAAAAZjaGVja3MJAARMAAAAAgMJAQAAAAlpc0RlZmluZWQAAAABCQAEHwAAAAEJAQAAABBrZXlJbkxpc3RBc3NldElkAAAAAgUAAAANYW1vdW50QXNzZXRJZAUAAAAMcHJpY2VBc3NldElkBgkAAAIAAAABAgAAAA5ubyBhc3NldHMgcGFpcgkABEwAAAACAwkAAGcAAAACBQAAAAZoZWlnaHQFAAAAEnZvdGluZ0ZpbmlzaEhlaWdodAYJAAACAAAAAQIAAAAiaW5zdWZmaWNpZW50IGhlaWdodCBmb3IgY29tcGxldGlvbgUAAAADbmlsAwkAAAAAAAACBQAAAAZjaGVja3MFAAAABmNoZWNrcwQAAAAMdm90aW5nUmVzdWx0CQAEtQAAAAIJAQAAAAV2YWx1ZQAAAAEJAAQiAAAAAQkBAAAAD2tleVZvdGluZ1Jlc3VsdAAAAAMFAAAADWFtb3VudEFzc2V0SWQFAAAADHByaWNlQXNzZXRJZAUAAAAMc3VnZ2VzdEluZGV4BQAAAAlzZXBhcmF0b3IEAAAADXBvc2l0aXZlVm90ZXMJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAx2b3RpbmdSZXN1bHQAAAAAAAAAAAEEAAAADW5lZ2F0aXZlVm90ZXMJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAx2b3RpbmdSZXN1bHQAAAAAAAAAAAIEAAAAB2FjdGlvbnMDCQAAZgAAAAIFAAAADXBvc2l0aXZlVm90ZXMFAAAADW5lZ2F0aXZlVm90ZXMEAAAAA3JlcwkAA/wAAAAEBQAAAA9mYWN0b3J5Q29udHJhY3QCAAAAFnNldFd4RW1pc3Npb25Qb29sTGFiZWwJAARMAAAAAgUAAAANYW1vdW50QXNzZXRJZAkABEwAAAACBQAAAAxwcmljZUFzc2V0SWQFAAAAA25pbAUAAAADbmlsAwkAAAAAAAACBQAAAANyZXMFAAAAA3JlcwkABRQAAAACCQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAQAAABBrZXlJbkxpc3RBc3NldElkAAAAAgUAAAANYW1vdW50QXNzZXRJZAUAAAAMcHJpY2VBc3NldElkBQAAAANuaWwFAAAABHVuaXQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAFFAAAAAIJAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQkBAAAAEGtleUluTGlzdEFzc2V0SWQAAAACBQAAAA1hbW91bnRBc3NldElkBQAAAAxwcmljZUFzc2V0SWQFAAAAA25pbAUAAAAEdW5pdAUAAAAHYWN0aW9ucwkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAAKc2V0TWFuYWdlcgAAAAEAAAAXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkEAAAAC2NoZWNrQ2FsbGVyCQEAAAALbXVzdE1hbmFnZXIAAAABBQAAAAFpAwkAAAAAAAACBQAAAAtjaGVja0NhbGxlcgUAAAALY2hlY2tDYWxsZXIEAAAAFWNoZWNrTWFuYWdlclB1YmxpY0tleQkAAlkAAAABBQAAABdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQMJAAAAAAAAAgUAAAAVY2hlY2tNYW5hZ2VyUHVibGljS2V5BQAAABVjaGVja01hbmFnZXJQdWJsaWNLZXkJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAGmtleVBlbmRpbmdNYW5hZ2VyUHVibGljS2V5AAAAAAUAAAAXcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAADmNvbmZpcm1NYW5hZ2VyAAAAAAQAAAACcG0JAQAAAB1wZW5kaW5nTWFuYWdlclB1YmxpY0tleU9yVW5pdAAAAAAEAAAABWhhc1BNAwkBAAAACWlzRGVmaW5lZAAAAAEFAAAAAnBtBgkAAAIAAAABAgAAABJubyBwZW5kaW5nIG1hbmFnZXIDCQAAAAAAAAIFAAAABWhhc1BNBQAAAAVoYXNQTQQAAAAHY2hlY2tQTQMJAAAAAAAAAggFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5CQEAAAAFdmFsdWUAAAABBQAAAAJwbQYJAAACAAAAAQIAAAAbeW91IGFyZSBub3QgcGVuZGluZyBtYW5hZ2VyAwkAAAAAAAACBQAAAAdjaGVja1BNBQAAAAdjaGVja1BNCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAABNrZXlNYW5hZ2VyUHVibGljS2V5AAAAAAkAAlgAAAABCQEAAAAFdmFsdWUAAAABBQAAAAJwbQkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABCQEAAAAaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkAAAAABQAAAANuaWwJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAD3RhcmdldFB1YmxpY0tleQQAAAAHJG1hdGNoMAkBAAAAFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQAAAAAAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAApCeXRlVmVjdG9yBAAAAAJwawUAAAAHJG1hdGNoMAUAAAACcGsDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXkJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAABQAAAA90YXJnZXRQdWJsaWNLZXlleeBJ",
    "chainId": 84,
    "height": 2096298,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: AWDnkZCp8uKMFFqTrCi2aaBWcdHFrCrbozUJjkekZen8
Next: 8gaRocQYr2GYogxYRLUVwJdYCQy12wjjgWee8HoUifki

Diff: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let SCALE8 = 8
4 + let separator = "__"
5 5  
6 - let MULT8 = 100000000
6 + let keyFeeAmount = makeString(["%s", "fee"], separator)
7 7  
8 - let SCALE18 = 18
8 + let keyUsdnAssetId = makeString(["%s", "usdnAssetId"], separator)
9 9  
10 - let MULT18 = toBigInt(1000000000000000000)
10 + let keyEpochLength = makeString(["%s", "epochLength"], separator)
11 11  
12 - let SEP = "__"
12 + let keyFinalizeReward = makeString(["%s", "finalizeReward"], separator)
13 13  
14 - let POOLWEIGHTMULT = MULT8
14 + let keyWxAssetId = makeString(["%s", "wxAssetId"], separator)
15 15  
16 - let zeroBigInt = toBigInt(0)
16 + let keyAssetsStoreContract = makeString(["%s", "assetsStoreContract"], separator)
17 17  
18 - let oneBigInt = toBigInt(1)
18 + let keyUserPoolContract = makeString(["%s", "userPoolContract"], separator)
19 19  
20 - func asAnyList (val) = match val {
21 -     case valAnyLyst: List[Any] => 
22 -         valAnyLyst
23 -     case _ => 
24 -         throw("fail to cast into List[Any]")
25 - }
20 + let keyEmissionContract = makeString(["%s", "emissionContract"], separator)
21 + 
22 + let keyBoostingContract = makeString(["%s", "boostingContract"], separator)
23 + 
24 + let keyFactoryContract = makeString(["%s", "factoryContract"], separator)
25 + 
26 + let keyVotingEmissionContract = makeString(["%s", "votingEmissionContract"], separator)
27 + 
28 + func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (key + " is not defined"))
26 29  
27 30  
28 - func asInt (val) = match val {
29 -     case valInt: Int => 
30 -         valInt
31 -     case _ => 
32 -         throw("fail to cast into Int")
33 - }
31 + func keyInListAssetId (amountAssetId,priceAssetId) = makeString(["%s%s%s", "inList", amountAssetId, priceAssetId], separator)
34 32  
35 33  
36 - func asString (val) = match val {
37 -     case valStr: String => 
38 -         valStr
39 -     case _ => 
40 -         throw("fail to cast into Int")
41 - }
34 + func keySuggestIndex (amountAssetId,priceAssetId) = makeString(["%s%s%s", "suggestIndex", amountAssetId, priceAssetId], separator)
42 35  
43 36  
44 - func asByteVector (val) = match val {
45 -     case valBin: ByteVector => 
46 -         valBin
47 -     case _ => 
48 -         throw("fail to cast into Int")
49 - }
37 + func keyStartHeight (amountAssetId,priceAssetId,suggestIndex) = makeString(["%s%s%s%d", "startHeight", amountAssetId, priceAssetId, toString(suggestIndex)], separator)
50 38  
51 39  
52 - func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (("mandatory this." + key) + " is not defined"))
40 + func keyVotingResult (amountAssetId,priceAssetId,suggestIndex) = makeString(["%s%s%s%d", "votingResult", amountAssetId, priceAssetId, toString(suggestIndex)], separator)
53 41  
54 42  
55 - func getStringByAddressOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
43 + func totalVotes (totalYes,totalNo) = makeString(["%d%d", totalYes, totalNo], separator)
56 44  
57 45  
58 - func getIntOrZero (address,key) = valueOrElse(getInteger(address, key), 0)
46 + func keyVote (amountAssetId,priceAssetId,suggestIndex,voterAddress) = makeString(["%s%s%s%d%s", "vote", amountAssetId, priceAssetId, toString(suggestIndex), voterAddress], separator)
59 47  
60 48  
61 - func getIntOrDefault (address,key,defaultVal) = valueOrElse(getInteger(address, key), defaultVal)
62 - 
63 - 
64 - func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), (("mandatory this." + key) + " is not defined"))
65 - 
66 - 
67 - func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULT18, toBigInt(origScaleMult))
68 - 
69 - 
70 - func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULT18))
71 - 
72 - 
73 - func keyFactoryAddress () = "%s%s__config__factoryAddress"
74 - 
75 - 
76 - let IdxFactoryCfgStakingDapp = 1
77 - 
78 - let IdxFactoryCfgBoostingDapp = 2
79 - 
80 - let IdxFactoryCfgIdoDapp = 3
81 - 
82 - let IdxFactoryCfgTeamDapp = 4
83 - 
84 - let IdxFactoryCfgEmissionDapp = 5
85 - 
86 - let IdxFactoryCfgRestDapp = 6
87 - 
88 - let IdxFactoryCfgSlippageDapp = 7
89 - 
90 - func keyFactoryCfg () = "%s__factoryConfig"
49 + func keyVoteValue (gwxAmount,vote) = {
50 +     let key = if (vote)
51 +         then makeString(["%d%s", gwxAmount, "yes"], separator)
52 +         else makeString(["%d%s", gwxAmount, "no"], separator)
53 +     key
54 +     }
91 55  
92 56  
93 57  func keyManagerPublicKey () = "%s__managerPublicKey"
96 60  func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
97 61  
98 62  
99 - func keyStablePoolAddonAddr () = "%s__stablePoolAddonAddr"
63 + let assetsStoreContract = addressFromStringValue(getStringOrFail(keyAssetsStoreContract))
100 64  
65 + let boostingContract = addressFromStringValue(getStringOrFail(keyBoostingContract))
101 66  
102 - func keyFactoryLp2AssetsMapping (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
67 + let emissionContract = addressFromStringValue(getStringOrFail(keyEmissionContract))
103 68  
69 + let factoryContract = addressFromStringValue(getStringOrFail(keyFactoryContract))
104 70  
105 - func keyFactoryLpList () = "%s__lpTokensList"
71 + let userPoolContract = addressFromStringValue(getStringOrFail(keyUserPoolContract))
106 72  
107 - 
108 - func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
109 - 
110 - 
111 - func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
112 - 
113 - 
114 - func readLpList (factory) = split(valueOrElse(getString(factory, keyFactoryLpList()), ""), SEP)
115 - 
116 - 
117 - func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
118 - 
119 - 
120 - func getBoostingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgBoostingDapp])
121 - 
122 - 
123 - func getEmissionAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgEmissionDapp])
124 - 
125 - 
126 - func getStakingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgStakingDapp])
127 - 
128 - 
129 - func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
130 - 
131 - 
132 - func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
133 - 
134 - 
135 - func keyEmissionStartBlock () = "%s%s__emission__startBlock"
136 - 
137 - 
138 - func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
139 - 
140 - 
141 - func keyEmissionEndBlock () = "%s%s__emission__endBlock"
142 - 
143 - 
144 - func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
145 - 
146 - 
147 - func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
148 - 
149 - 
150 - func keyClaimedByUser (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimed", userAddressStr, lpAssetIdStr], SEP)
151 - 
152 - 
153 - func keyClaimedByUserMinReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedMinReward", userAddressStr, lpAssetIdStr], SEP)
154 - 
155 - 
156 - func keyClaimedByUserBoostReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedBoostReward", userAddressStr, lpAssetIdStr], SEP)
157 - 
158 - 
159 - func keyClaimedTotal (lpAssetIdStr) = makeString(["%s%s%s__claimed", "total", lpAssetIdStr], SEP)
160 - 
161 - 
162 - func readStaked (key) = valueOrElse(getInteger(this, key), 0)
163 - 
164 - 
165 - func keyLastTotalLpBalance (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "bal"], SEP)
166 - 
167 - 
168 - func keyLastUserLpBalance (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "bal"], SEP)
169 - 
170 - 
171 - func keyTotalLpBalanceIntegral (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "balINT"], SEP)
172 - 
173 - 
174 - func keyUserLpBalanceIntegral (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "balINT"], SEP)
175 - 
176 - 
177 - func keyTotalLpBalanceIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "lastUpd"], SEP)
178 - 
179 - 
180 - func keyUserLpBalanceIntegralLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "lastUpd"], SEP)
181 - 
182 - 
183 - func keyWxPerLpIntegral (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpInt"], SEP)
184 - 
185 - 
186 - func keyWxPerLpIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpIntH"], SEP)
187 - 
188 - 
189 - func keyWxToClaimUser (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpInt"], SEP)
190 - 
191 - 
192 - func keyWxPerLpIntegralUserLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpIntH"], SEP)
193 - 
194 - 
195 - func keyWxPerLp (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLp"], SEP)
196 - 
197 - 
198 - func keyWxPerLpX18 (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLpX18"], SEP)
199 - 
200 - 
201 - func keyWxPerLpIntegralUserLast (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "uIntL"], SEP)
202 - 
203 - 
204 - func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
205 - 
206 - 
207 - func formatHistoryRecord (userAddress,lpAssetId,type,amount) = makeString(["%s%s%s%d%d%d", userAddress, lpAssetId, type, toString(height), toString(lastBlock.timestamp), toString(amount)], SEP)
208 - 
209 - 
210 - func OperationHistoryEntry (type,userAddress,lpAssetId,amount,txId) = StringEntry(keyOperationHistoryRecord(type, userAddress, toBase58String(txId)), formatHistoryRecord(userAddress, lpAssetId, type, amount))
211 - 
212 - 
213 - let factoryAddress = getStringOrFail(this, keyFactoryAddress())
214 - 
215 - let factoryContract = addressFromStringValue(factoryAddress)
216 - 
217 - let factoryCfg = readFactoryCfgOrFail(factoryContract)
218 - 
219 - let emissionContract = getEmissionAddressOrFail(factoryCfg)
220 - 
221 - let boostingContract = getBoostingAddressOrFail(factoryCfg)
222 - 
223 - func calcWxPerLpIntegralUserLast (stakedByUser,wxPerLpIntegralUserLastUpdHeightOrZero,wxPerLpIntegralNew,wxPerLpIntegralUserLastKEY) = if (if ((wxPerLpIntegralUserLastUpdHeightOrZero == zeroBigInt))
224 -     then (stakedByUser > zeroBigInt)
225 -     else false)
226 -     then zeroBigInt
227 -     else if ((stakedByUser == zeroBigInt))
228 -         then wxPerLpIntegralNew
229 -         else if (if ((wxPerLpIntegralUserLastUpdHeightOrZero > zeroBigInt))
230 -             then (stakedByUser > zeroBigInt)
231 -             else false)
232 -             then value(parseBigInt(getStringOrFail(this, wxPerLpIntegralUserLastKEY)))
233 -             else throw("calcWxPerLpIntegralUserLast: unexpected state")
234 - 
235 - 
236 - func refreshPoolINTEGRALS (lpAssetIdStr,poolAddressStr,lpDeltaAmount) = {
237 -     let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
238 -     let stakedTotal = toBigInt(readStaked(stakedTotalKEY))
239 -     let nonZeroStakedTotal = if ((stakedTotal == zeroBigInt))
240 -         then oneBigInt
241 -         else stakedTotal
242 -     let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
243 -     let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
244 -     let MULT3 = 1000
245 -     let wxEmissionPerBlockX3 = (getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent()) * MULT3)
246 -     let poolWxEmissionPerBlockX3 = fraction(wxEmissionPerBlockX3, poolWeight, (POOLWEIGHTMULT * 3))
247 -     let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
248 -     let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
249 -     let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
250 -     let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
251 -     let wxPerLpIntegral = getIntOrZero(this, wxPerLpIntegralKEY)
252 -     let wxPerLpOrZeroX3 = 0
253 -     let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
254 -     let wxPerLpX3 = if ((wxPerLpOrZeroX3 != 0))
255 -         then toBigInt(wxPerLpOrZeroX3)
256 -         else fraction(toBigInt(poolWxEmissionPerBlockX3), toBigInt(MULT8), nonZeroStakedTotal)
257 -     let stakedTotalNew = (stakedTotal + toBigInt(lpDeltaAmount))
258 -     let nonZeroStakedTotalNew = if ((stakedTotalNew == zeroBigInt))
259 -         then oneBigInt
260 -         else stakedTotalNew
261 -     let wxPerLpIntegralNew = (toBigInt(wxPerLpIntegral) + (wxPerLpX3 * toBigInt(dh)))
262 -     let wxPerLpX3New = (toBigInt(poolWxEmissionPerBlockX3) / nonZeroStakedTotalNew)
263 -     let wxPerLpIntegralLastUpdHeightNew = height
264 -     let debug = makeString(["wxPerLpIntegralNew=", toString(wxPerLpIntegralNew), "dh=", toString(dh), "wxPerLpX3=", toString(wxPerLpX3), "stakedTotal=", toString(stakedTotal), "poolWxEmissionPerBlockX3=", toString(poolWxEmissionPerBlockX3), "wxEmissionPerBlockX3=", toString(wxEmissionPerBlockX3), "poolWeight=", toString(poolWeight)], "::")
265 -     $Tuple3(wxPerLpIntegralNew, [StringEntry(wxPerLpIntegralKEY, toString(wxPerLpIntegralNew)), IntegerEntry(wxPerLpIntegralLastUpdHeightKEY, wxPerLpIntegralLastUpdHeightNew), StringEntry(wxPerLpKEY, toString(wxPerLpX3New))], debug)
266 -     }
267 - 
268 - 
269 - func refreshINTEGRALS (lpAssetIdStr,userAddressStr,poolAddressStr,lpDeltaAmount) = {
270 -     let $t01119411316 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
271 -     let wxPerLpIntegralNew = $t01119411316._1
272 -     let poolIntegralSTATE = $t01119411316._2
273 -     let poolDEBUG = $t01119411316._3
274 -     let MULT3 = 1000
275 -     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
276 -     let stakedByUser = readStaked(stakedByUserKEY)
277 -     let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
278 -     let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
279 -     let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
280 -     let wxToClaimUser = getIntOrZero(this, wxToClaimUserKEY)
281 -     let wxPerLpIntegralUserLastUpdHeightOrZero = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
282 -     let wxPerLpIntegralUserLast = calcWxPerLpIntegralUserLast(toBigInt(stakedByUser), toBigInt(wxPerLpIntegralUserLastUpdHeightOrZero), wxPerLpIntegralNew, wxPerLpIntegralUserLastKEY)
283 -     let MULT11 = (MULT8 * MULT3)
284 -     let wxToClaimUserNew = (toBigInt(wxToClaimUser) + fraction((wxPerLpIntegralNew - wxPerLpIntegralUserLast), toBigInt(stakedByUser), toBigInt(MULT11)))
285 -     let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
286 -     let wxPerLpIntegralUserLastUpdHeightNew = height
287 -     let debug = makeString(["wxToClaimUserNew=", toString(wxToClaimUserNew), "wxPerLpIntegralUserLast=", toString(wxPerLpIntegralUserLast), "stakedByUser=", toString(stakedByUser), "poolDEBUG=", poolDEBUG, "height=", toString(height)], "::")
288 -     $Tuple3(wxToClaimUserNew, (poolIntegralSTATE ++ [StringEntry(wxToClaimUserKEY, toString(wxToClaimUserNew)), IntegerEntry(wxPerLpIntegralUserLastUpdHeightKEY, wxPerLpIntegralUserLastUpdHeightNew), StringEntry(wxPerLpIntegralUserLastKEY, toString(wxPerLpIntegralUserLastNew))]), debug)
289 -     }
290 - 
73 + let votingEmissionContract = addressFromStringValue(getStringOrFail(keyVotingEmissionContract))
291 74  
292 75  func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
293 76      case s: String => 
310 93  
311 94  
312 95  func mustManager (i) = {
313 -     let pd = throw("Permission denied")
96 +     let pd = throw("permission denied")
314 97      match managerPublicKeyOrUnit() {
315 98          case pk: ByteVector => 
316 99              if ((i.callerPublicKey == pk))
326 109      }
327 110  
328 111  
112 + func asInt (val) = match val {
113 +     case valInt: Int => 
114 +         valInt
115 +     case _ => 
116 +         throw("failed to cast into Integer")
117 + }
118 + 
119 + 
329 120  @Callable(i)
330 - func constructor (factoryAddressStr) = {
331 -     let checkCaller = mustManager(i)
332 -     if ((checkCaller == checkCaller))
333 -         then [StringEntry(keyFactoryAddress(), factoryAddressStr)]
121 + func constructor (assetsStoreContractPrm,boostingContractPrm,emissionContractPrm,factoryContractPrm,userPoolContractPrm,votingEmissionContractPrm,feeAmountPrm,wxAssetIdPrm,votingDurationPrm,usdnAssetIdPrm,finalizeRewardPrm) = {
122 +     let checks = [mustManager(i), if (isDefined(addressFromString(assetsStoreContractPrm)))
123 +         then true
124 +         else throw("Invalid asset_store contract address"), if (isDefined(addressFromString(boostingContractPrm)))
125 +         then true
126 +         else throw("Invalid boosting contract address"), if (isDefined(addressFromString(userPoolContractPrm)))
127 +         then true
128 +         else throw("Invalid user_pools contract address"), if (isDefined(addressFromString(emissionContractPrm)))
129 +         then true
130 +         else throw("Invalid emission contract address"), if (isDefined(addressFromString(factoryContractPrm)))
131 +         then true
132 +         else throw("Invalid factory contract address"), if ((feeAmountPrm >= 0))
133 +         then true
134 +         else throw("Invalid fee amount"), if ((votingDurationPrm > 0))
135 +         then true
136 +         else throw("Invalid voting duration"), if ((finalizeRewardPrm > 0))
137 +         then true
138 +         else throw("Invalid finalize reward"), if (isDefined(assetInfo(fromBase58String(wxAssetIdPrm))))
139 +         then true
140 +         else throw("Invalid WX asset ID"), if (isDefined(assetInfo(fromBase58String(usdnAssetIdPrm))))
141 +         then true
142 +         else throw("Invalid USDN asset ID")]
143 +     if ((checks == checks))
144 +         then $Tuple2([StringEntry(keyAssetsStoreContract, assetsStoreContractPrm), StringEntry(keyBoostingContract, boostingContractPrm), StringEntry(keyEmissionContract, emissionContractPrm), StringEntry(keyFactoryContract, factoryContractPrm), StringEntry(keyUserPoolContract, userPoolContractPrm), StringEntry(keyVotingEmissionContract, votingEmissionContractPrm), IntegerEntry(keyFeeAmount, feeAmountPrm), IntegerEntry(keyEpochLength, votingDurationPrm), IntegerEntry(keyFinalizeReward, finalizeRewardPrm), StringEntry(keyWxAssetId, wxAssetIdPrm), StringEntry(keyUsdnAssetId, usdnAssetIdPrm)], unit)
145 +         else throw("Strict value is not equal to itself.")
146 +     }
147 + 
148 + 
149 + 
150 + @Callable(i)
151 + func suggest (amountAssetId,priceAssetId) = {
152 +     let payment = value(i.payments[0])
153 +     let info = valueOrErrorMessage(assetInfo(fromBase58String(amountAssetId)), "invalid amountAssetId ID")
154 +     let checks = [if ((info.issuer == i.caller))
155 +         then true
156 +         else throw("asset can only be suggested by its issuer"), if ((info.scripted == false))
157 +         then true
158 +         else throw("asset is smart"), if ((toBase58String(value(payment.assetId)) == value(getString(keyWxAssetId))))
159 +         then true
160 +         else throw("invalid fee asset"), if ((payment.amount == value(getInteger(keyFeeAmount))))
161 +         then true
162 +         else throw("invalid fee amount"), if ((priceAssetId == value(getString(keyUsdnAssetId))))
163 +         then true
164 +         else throw("priceAssetId is not USDN"), if ((getInteger(keyInListAssetId(amountAssetId, priceAssetId)) == unit))
165 +         then true
166 +         else throw("already in voting list")]
167 +     if ((checks == checks))
168 +         then {
169 +             let ensureActive =             match invoke(userPoolContract, "statusREADONLY", [amountAssetId, priceAssetId], nil) {
170 +                 case s: String => 
171 +                     if ((s == "active"))
172 +                         then true
173 +                         else throw("user pool is not active")
174 +                 case _ => 
175 +                     throw("user pool is not active")
176 +             }
177 +             if ((ensureActive == ensureActive))
178 +                 then {
179 +                     let ensureAmountAssetVerified =                     match invoke(assetsStoreContract, "isVerifiedREADONLY", [amountAssetId], nil) {
180 +                         case b: Boolean => 
181 +                             if (b)
182 +                                 then true
183 +                                 else throw("asset is not verified")
184 +                         case _ => 
185 +                             throw("asset is not verified")
186 +                     }
187 +                     if ((ensureAmountAssetVerified == ensureAmountAssetVerified))
188 +                         then {
189 +                             let burnFeeInv = invoke(emissionContract, "burn", nil, [AttachedPayment(payment.assetId, payment.amount)])
190 +                             if ((burnFeeInv == burnFeeInv))
191 +                                 then {
192 +                                     let newSuggestIndex =                                     match getInteger(keySuggestIndex(amountAssetId, priceAssetId)) {
193 +                                         case int: Int => 
194 +                                             (int + 1)
195 +                                         case _ => 
196 +                                             0
197 +                                     }
198 +                                     $Tuple2([IntegerEntry(keyInListAssetId(amountAssetId, priceAssetId), newSuggestIndex), IntegerEntry(keyStartHeight(amountAssetId, priceAssetId, newSuggestIndex), height), StringEntry(keyVotingResult(amountAssetId, priceAssetId, newSuggestIndex), totalVotes("0", "0")), IntegerEntry(keySuggestIndex(amountAssetId, priceAssetId), newSuggestIndex)], unit)
199 +                                     }
200 +                                 else throw("Strict value is not equal to itself.")
201 +                             }
202 +                         else throw("Strict value is not equal to itself.")
203 +                     }
204 +                 else throw("Strict value is not equal to itself.")
205 +             }
206 +         else throw("Strict value is not equal to itself.")
207 +     }
208 + 
209 + 
210 + 
211 + @Callable(i)
212 + func vote (amountAssetId,priceAssetId,inFavor) = {
213 +     let suggestIndex = value(getInteger(keyInListAssetId(amountAssetId, priceAssetId)))
214 +     let votingFinishHeight = (value(getInteger(keyStartHeight(amountAssetId, priceAssetId, suggestIndex))) + value(getInteger(keyEpochLength)))
215 +     let checks = [if (isDefined(getInteger(keyInListAssetId(amountAssetId, priceAssetId))))
216 +         then true
217 +         else throw("the token isn't on the voting list"), if ((votingFinishHeight > height))
218 +         then true
219 +         else throw("too late to vote")]
220 +     if ((checks == checks))
221 +         then {
222 +             let gwxAmount = invoke(boostingContract, "getUserGwxAmountAtHeightREADONLY", [toString(i.caller), votingFinishHeight], nil)
223 +             let notZero = if ((asInt(gwxAmount) > 0))
224 +                 then true
225 +                 else throw("you don't have gwx")
226 +             if ((notZero == notZero))
227 +                 then {
228 +                     let vote =                     match getString(keyVote(amountAssetId, priceAssetId, suggestIndex, toString(i.caller))) {
229 +                         case s: String => 
230 +                             let vote = split(s, separator)
231 +                             let voteValue = vote[1]
232 +                             let voteType = vote[2]
233 +                             let isVoteTypeSimilar = if (if ((voteType == "yes"))
234 +                                 then (inFavor == true)
235 +                                 else false)
236 +                                 then true
237 +                                 else if ((voteType == "no"))
238 +                                     then (inFavor == false)
239 +                                     else false
240 +                             let isVoteValueSimilar = if (isVoteTypeSimilar)
241 +                                 then (asInt(gwxAmount) == parseIntValue(voteValue))
242 +                                 else false
243 +                             let isNewVoteSimilar = if (if (isVoteTypeSimilar)
244 +                                 then isVoteValueSimilar
245 +                                 else false)
246 +                                 then throw("you already voted")
247 +                                 else invoke(this, "cancelVote", [amountAssetId, priceAssetId], nil)
248 +                             isNewVoteSimilar
249 +                         case u: Unit => 
250 +                             u
251 +                         case _ => 
252 +                             throw("Match error")
253 +                     }
254 +                     if ((vote == vote))
255 +                         then {
256 +                             let votingResult = split(value(getString(keyVotingResult(amountAssetId, priceAssetId, suggestIndex))), separator)
257 +                             let positiveVotes = votingResult[1]
258 +                             let negativeVotes = votingResult[2]
259 +                             let newPositiveAndNegativeVotes = if (inFavor)
260 +                                 then {
261 +                                     let newPositiveVotes = (parseIntValue(positiveVotes) + asInt(gwxAmount))
262 + [toString(newPositiveVotes), negativeVotes]
263 +                                     }
264 +                                 else {
265 +                                     let newNegativeVotes = (parseIntValue(negativeVotes) + asInt(gwxAmount))
266 + [positiveVotes, toString(newNegativeVotes)]
267 +                                     }
268 +                             let voteKey = keyVote(amountAssetId, priceAssetId, suggestIndex, toString(i.caller))
269 +                             let voteValue = keyVoteValue(toString(asInt(gwxAmount)), inFavor)
270 +                             $Tuple2([StringEntry(keyVotingResult(amountAssetId, priceAssetId, suggestIndex), totalVotes(newPositiveAndNegativeVotes[0], newPositiveAndNegativeVotes[1])), StringEntry(voteKey, voteValue)], unit)
271 +                             }
272 +                         else throw("Strict value is not equal to itself.")
273 +                     }
274 +                 else throw("Strict value is not equal to itself.")
275 +             }
276 +         else throw("Strict value is not equal to itself.")
277 +     }
278 + 
279 + 
280 + 
281 + @Callable(i)
282 + func cancelVote (amountAssetId,priceAssetId) = {
283 +     let userAddress = if ((i.caller == this))
284 +         then toString(i.originCaller)
285 +         else toString(i.caller)
286 +     let suggestIndex = value(getInteger(keyInListAssetId(amountAssetId, priceAssetId)))
287 +     let checks = [if (isDefined(getString(keyVotingResult(amountAssetId, priceAssetId, suggestIndex))))
288 +         then true
289 +         else throw("no vote for assets pair")]
290 +     if ((checks == checks))
291 +         then {
292 +             let vote = split(value(getString(keyVote(amountAssetId, priceAssetId, suggestIndex, userAddress))), separator)
293 +             let voteValue = vote[1]
294 +             let voteType = vote[2]
295 +             let votingResult = split(value(getString(keyVotingResult(amountAssetId, priceAssetId, suggestIndex))), separator)
296 +             let positiveVotes = votingResult[1]
297 +             let negativeVotes = votingResult[2]
298 +             let actions = if ((voteType == "yes"))
299 +                 then {
300 +                     let newPositiveVotes = (parseIntValue(positiveVotes) - parseIntValue(voteValue))
301 +                     $Tuple2([StringEntry(keyVotingResult(amountAssetId, priceAssetId, suggestIndex), totalVotes(toString(newPositiveVotes), negativeVotes)), DeleteEntry(keyVote(amountAssetId, priceAssetId, suggestIndex, userAddress))], unit)
302 +                     }
303 +                 else {
304 +                     let newNegativeVotes = (parseIntValue(negativeVotes) - parseIntValue(voteValue))
305 +                     $Tuple2([StringEntry(keyVotingResult(amountAssetId, priceAssetId, suggestIndex), totalVotes(positiveVotes, toString(newNegativeVotes))), DeleteEntry(keyVote(amountAssetId, priceAssetId, suggestIndex, userAddress))], unit)
306 +                     }
307 +             actions
308 +             }
309 +         else throw("Strict value is not equal to itself.")
310 +     }
311 + 
312 + 
313 + 
314 + @Callable(i)
315 + func setFee (newFee) = {
316 +     let checks = [mustManager(i)]
317 +     if ((checks == checks))
318 +         then [IntegerEntry(keyFeeAmount, newFee)]
319 +         else throw("Strict value is not equal to itself.")
320 +     }
321 + 
322 + 
323 + 
324 + @Callable(i)
325 + func finalize (amountAssetId,priceAssetId) = {
326 +     let suggestIndex = value(getInteger(keyInListAssetId(amountAssetId, priceAssetId)))
327 +     let votingFinishHeight = (value(getInteger(keyStartHeight(amountAssetId, priceAssetId, suggestIndex))) + value(getInteger(keyEpochLength)))
328 +     let checks = [if (isDefined(getInteger(keyInListAssetId(amountAssetId, priceAssetId))))
329 +         then true
330 +         else throw("no assets pair"), if ((height >= votingFinishHeight))
331 +         then true
332 +         else throw("insufficient height for completion")]
333 +     if ((checks == checks))
334 +         then {
335 +             let votingResult = split(value(getString(keyVotingResult(amountAssetId, priceAssetId, suggestIndex))), separator)
336 +             let positiveVotes = parseIntValue(votingResult[1])
337 +             let negativeVotes = parseIntValue(votingResult[2])
338 +             let actions = if ((positiveVotes > negativeVotes))
339 +                 then {
340 +                     let res = invoke(factoryContract, "setWxEmissionPoolLabel", [amountAssetId, priceAssetId], nil)
341 +                     if ((res == res))
342 +                         then $Tuple2([DeleteEntry(keyInListAssetId(amountAssetId, priceAssetId))], unit)
343 +                         else throw("Strict value is not equal to itself.")
344 +                     }
345 +                 else $Tuple2([DeleteEntry(keyInListAssetId(amountAssetId, priceAssetId))], unit)
346 +             actions
347 +             }
334 348          else throw("Strict value is not equal to itself.")
335 349      }
336 350  
356 370      let pm = pendingManagerPublicKeyOrUnit()
357 371      let hasPM = if (isDefined(pm))
358 372          then true
359 -         else throw("No pending manager")
373 +         else throw("no pending manager")
360 374      if ((hasPM == hasPM))
361 375          then {
362 376              let checkPM = if ((i.callerPublicKey == value(pm)))
363 377                  then true
364 -                 else throw("You are not pending manager")
378 +                 else throw("you are not pending manager")
365 379              if ((checkPM == checkPM))
366 380                  then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
367 381                  else throw("Strict value is not equal to itself.")
368 382              }
369 383          else throw("Strict value is not equal to itself.")
370 384      }
371 - 
372 - 
373 - 
374 - @Callable(i)
375 - func stake () = if ((size(i.payments) != 1))
376 -     then throw("invalid payment - exact one payment must be attached")
377 -     else {
378 -         let pmt = i.payments[0]
379 -         let lpAssetId = value(pmt.assetId)
380 -         let lpAssetIdStr = toBase58String(lpAssetId)
381 -         let amount = pmt.amount
382 -         let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
383 -         let callerStr = toString(i.caller)
384 -         let userAddressStr = if ((callerStr == poolAddressStr))
385 -             then toString(i.originCaller)
386 -             else callerStr
387 -         let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
388 -         let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
389 -         let stakedByUser = readStaked(stakedByUserKEY)
390 -         let stakedTotal = readStaked(stakedTotalKEY)
391 -         let $t01541515532 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
392 -         let wxToClaimUserNew = $t01541515532._1
393 -         let integralSTATE = $t01541515532._2
394 -         let debug = $t01541515532._3
395 -         ([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE)
396 -         }
397 - 
398 - 
399 - 
400 - @Callable(i)
401 - func unstake (lpAssetIdStr,amount) = {
402 -     let lpAssetId = fromBase58String(lpAssetIdStr)
403 -     let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
404 -     let poolAddon = valueOrElse(getString(this, keyStablePoolAddonAddr()), poolAddressStr)
405 -     let callerStr = toString(i.caller)
406 -     let userAddressStr = if (if ((callerStr == poolAddressStr))
407 -         then true
408 -         else (callerStr == poolAddon))
409 -         then toString(i.originCaller)
410 -         else callerStr
411 -     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
412 -     let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
413 -     let stakedByUser = readStaked(stakedByUserKEY)
414 -     let stakedTotal = readStaked(stakedTotalKEY)
415 -     let $t01666916787 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))
416 -     let wxToClaimUserNew = $t01666916787._1
417 -     let integralSTATE = $t01666916787._2
418 -     let debug = $t01666916787._3
419 -     if ((amount > stakedByUser))
420 -         then throw("passed amount is less then available")
421 -         else ([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE)
422 -     }
423 - 
424 - 
425 - 
426 - @Callable(i)
427 - func claimWx (lpAssetIdStr) = {
428 -     let userAddress = i.caller
429 -     let userAddressStr = toString(i.caller)
430 -     let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
431 -     let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
432 -     let claimedTotalKEY = keyClaimedTotal(lpAssetIdStr)
433 -     let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
434 -     let claimedByUserBoostRewardKEY = keyClaimedByUserBoostReward(lpAssetIdStr, userAddressStr)
435 -     let claimedByUser = toBigInt(getIntOrZero(this, claimedByUserKEY))
436 -     let claimedByUserMinReward = toBigInt(getIntOrZero(this, claimedByUserMinRewardKEY))
437 -     let claimedByUserBoostReward = toBigInt(getIntOrZero(this, claimedByUserBoostRewardKEY))
438 -     let claimedTotal = toBigInt(getIntOrZero(this, claimedTotalKEY))
439 -     let $t01802318135 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
440 -     let wxToClaimUserNew = $t01802318135._1
441 -     let integralSTATE = $t01802318135._2
442 -     let debug = $t01802318135._3
443 -     let availableToClaim = (wxToClaimUserNew - claimedByUser)
444 -     if ((zeroBigInt >= availableToClaim))
445 -         then throw("nothing to claim")
446 -         else {
447 -             let wxAmountBoostTotal = asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0])
448 -             let minRewardPart = availableToClaim
449 -             let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
450 -             let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [minRewardPart], nil))[0])
451 -             let emitBoost = asAnyList(invoke(emissionContract, "emit", [boostRewardPart], nil))
452 -             if ((emitBoost == emitBoost))
453 -                 then {
454 -                     let claimedByUserValue = (claimedByUser + availableToClaim)
455 -                     let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
456 -                     let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserMinReward + minRewardPart)
457 -                     let claimedTotalPlusAvailableToClaim = (claimedByUserMinReward + minRewardPart)
458 - [StringEntry(claimedByUserKEY, toString(claimedByUserValue)), StringEntry(claimedByUserMinRewardKEY, toString(claimedByUserMinRewardPlusPart)), StringEntry(claimedByUserBoostRewardKEY, toString(claimedByUserBoostRewardPlusBoostRewardPart)), StringEntry(claimedTotalKEY, toString(claimedTotalPlusAvailableToClaim)), ScriptTransfer(userAddress, toInt(minRewardPart), wxAssetId), ScriptTransfer(userAddress, toInt(boostRewardPart), wxAssetId), OperationHistoryEntry("claim", userAddressStr, lpAssetIdStr, toInt(availableToClaim), i.transactionId)]
459 -                     }
460 -                 else throw("Strict value is not equal to itself.")
461 -             }
462 -     }
463 - 
464 - 
465 - 
466 - @Callable(i)
467 - func claimWxREADONLY (lpAssetIdStr,userAddressStr) = {
468 -     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
469 -     let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
470 -     let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
471 -     let stakedByUser = readStaked(stakedByUserKEY)
472 -     let stakedTotal = readStaked(stakedTotalKEY)
473 -     let claimedByUser = getIntOrZero(this, claimedByUserKEY)
474 -     let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
475 -     let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
476 -     let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
477 -     let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
478 -     let passedBlocks = if ((emissionStartBlock > height))
479 -         then 0
480 -         else (height - emissionStartBlock)
481 -     let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
482 -     let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
483 -     let $t02072020832 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
484 -     let wxToClaimUserNew = $t02072020832._1
485 -     let integralSTATE = $t02072020832._2
486 -     let debug = $t02072020832._3
487 -     let availableToClaim = (wxToClaimUserNew - toBigInt(claimedByUser))
488 -     let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
489 -     let wxAmountBoostTotal = asInt(boostInvResult[0])
490 -     let boostDebug = asString(boostInvResult[1])
491 -     let minRewardPart = availableToClaim
492 -     let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
493 -     let totalReward = (minRewardPart + boostRewardPart)
494 -     $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), ((((debug + "::") + toString(userWxReward)) + "::BOOSTDEBUG::") + boostDebug)], SEP))
495 -     }
496 - 
497 - 
498 - 
499 - @Callable(i)
500 - func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
501 -     then throw("permissions denied")
502 -     else {
503 -         let $t02174521855 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
504 -         let wxPerLpIntegralNew = $t02174521855._1
505 -         let poolIntegralSTATE = $t02174521855._2
506 -         let poolDEBUG = $t02174521855._3
507 -         poolIntegralSTATE
508 -         }
509 385  
510 386  
511 387  @Verifier(tx)
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let SCALE8 = 8
4 + let separator = "__"
5 5  
6 - let MULT8 = 100000000
6 + let keyFeeAmount = makeString(["%s", "fee"], separator)
7 7  
8 - let SCALE18 = 18
8 + let keyUsdnAssetId = makeString(["%s", "usdnAssetId"], separator)
9 9  
10 - let MULT18 = toBigInt(1000000000000000000)
10 + let keyEpochLength = makeString(["%s", "epochLength"], separator)
11 11  
12 - let SEP = "__"
12 + let keyFinalizeReward = makeString(["%s", "finalizeReward"], separator)
13 13  
14 - let POOLWEIGHTMULT = MULT8
14 + let keyWxAssetId = makeString(["%s", "wxAssetId"], separator)
15 15  
16 - let zeroBigInt = toBigInt(0)
16 + let keyAssetsStoreContract = makeString(["%s", "assetsStoreContract"], separator)
17 17  
18 - let oneBigInt = toBigInt(1)
18 + let keyUserPoolContract = makeString(["%s", "userPoolContract"], separator)
19 19  
20 - func asAnyList (val) = match val {
21 -     case valAnyLyst: List[Any] => 
22 -         valAnyLyst
23 -     case _ => 
24 -         throw("fail to cast into List[Any]")
25 - }
20 + let keyEmissionContract = makeString(["%s", "emissionContract"], separator)
21 + 
22 + let keyBoostingContract = makeString(["%s", "boostingContract"], separator)
23 + 
24 + let keyFactoryContract = makeString(["%s", "factoryContract"], separator)
25 + 
26 + let keyVotingEmissionContract = makeString(["%s", "votingEmissionContract"], separator)
27 + 
28 + func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (key + " is not defined"))
26 29  
27 30  
28 - func asInt (val) = match val {
29 -     case valInt: Int => 
30 -         valInt
31 -     case _ => 
32 -         throw("fail to cast into Int")
33 - }
31 + func keyInListAssetId (amountAssetId,priceAssetId) = makeString(["%s%s%s", "inList", amountAssetId, priceAssetId], separator)
34 32  
35 33  
36 - func asString (val) = match val {
37 -     case valStr: String => 
38 -         valStr
39 -     case _ => 
40 -         throw("fail to cast into Int")
41 - }
34 + func keySuggestIndex (amountAssetId,priceAssetId) = makeString(["%s%s%s", "suggestIndex", amountAssetId, priceAssetId], separator)
42 35  
43 36  
44 - func asByteVector (val) = match val {
45 -     case valBin: ByteVector => 
46 -         valBin
47 -     case _ => 
48 -         throw("fail to cast into Int")
49 - }
37 + func keyStartHeight (amountAssetId,priceAssetId,suggestIndex) = makeString(["%s%s%s%d", "startHeight", amountAssetId, priceAssetId, toString(suggestIndex)], separator)
50 38  
51 39  
52 - func getStringOrFail (address,key) = valueOrErrorMessage(getString(address, key), (("mandatory this." + key) + " is not defined"))
40 + func keyVotingResult (amountAssetId,priceAssetId,suggestIndex) = makeString(["%s%s%s%d", "votingResult", amountAssetId, priceAssetId, toString(suggestIndex)], separator)
53 41  
54 42  
55 - func getStringByAddressOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
43 + func totalVotes (totalYes,totalNo) = makeString(["%d%d", totalYes, totalNo], separator)
56 44  
57 45  
58 - func getIntOrZero (address,key) = valueOrElse(getInteger(address, key), 0)
46 + func keyVote (amountAssetId,priceAssetId,suggestIndex,voterAddress) = makeString(["%s%s%s%d%s", "vote", amountAssetId, priceAssetId, toString(suggestIndex), voterAddress], separator)
59 47  
60 48  
61 - func getIntOrDefault (address,key,defaultVal) = valueOrElse(getInteger(address, key), defaultVal)
62 - 
63 - 
64 - func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), (("mandatory this." + key) + " is not defined"))
65 - 
66 - 
67 - func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULT18, toBigInt(origScaleMult))
68 - 
69 - 
70 - func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULT18))
71 - 
72 - 
73 - func keyFactoryAddress () = "%s%s__config__factoryAddress"
74 - 
75 - 
76 - let IdxFactoryCfgStakingDapp = 1
77 - 
78 - let IdxFactoryCfgBoostingDapp = 2
79 - 
80 - let IdxFactoryCfgIdoDapp = 3
81 - 
82 - let IdxFactoryCfgTeamDapp = 4
83 - 
84 - let IdxFactoryCfgEmissionDapp = 5
85 - 
86 - let IdxFactoryCfgRestDapp = 6
87 - 
88 - let IdxFactoryCfgSlippageDapp = 7
89 - 
90 - func keyFactoryCfg () = "%s__factoryConfig"
49 + func keyVoteValue (gwxAmount,vote) = {
50 +     let key = if (vote)
51 +         then makeString(["%d%s", gwxAmount, "yes"], separator)
52 +         else makeString(["%d%s", gwxAmount, "no"], separator)
53 +     key
54 +     }
91 55  
92 56  
93 57  func keyManagerPublicKey () = "%s__managerPublicKey"
94 58  
95 59  
96 60  func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
97 61  
98 62  
99 - func keyStablePoolAddonAddr () = "%s__stablePoolAddonAddr"
63 + let assetsStoreContract = addressFromStringValue(getStringOrFail(keyAssetsStoreContract))
100 64  
65 + let boostingContract = addressFromStringValue(getStringOrFail(keyBoostingContract))
101 66  
102 - func keyFactoryLp2AssetsMapping (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
67 + let emissionContract = addressFromStringValue(getStringOrFail(keyEmissionContract))
103 68  
69 + let factoryContract = addressFromStringValue(getStringOrFail(keyFactoryContract))
104 70  
105 - func keyFactoryLpList () = "%s__lpTokensList"
71 + let userPoolContract = addressFromStringValue(getStringOrFail(keyUserPoolContract))
106 72  
107 - 
108 - func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
109 - 
110 - 
111 - func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
112 - 
113 - 
114 - func readLpList (factory) = split(valueOrElse(getString(factory, keyFactoryLpList()), ""), SEP)
115 - 
116 - 
117 - func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
118 - 
119 - 
120 - func getBoostingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgBoostingDapp])
121 - 
122 - 
123 - func getEmissionAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgEmissionDapp])
124 - 
125 - 
126 - func getStakingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgStakingDapp])
127 - 
128 - 
129 - func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
130 - 
131 - 
132 - func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
133 - 
134 - 
135 - func keyEmissionStartBlock () = "%s%s__emission__startBlock"
136 - 
137 - 
138 - func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
139 - 
140 - 
141 - func keyEmissionEndBlock () = "%s%s__emission__endBlock"
142 - 
143 - 
144 - func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
145 - 
146 - 
147 - func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
148 - 
149 - 
150 - func keyClaimedByUser (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimed", userAddressStr, lpAssetIdStr], SEP)
151 - 
152 - 
153 - func keyClaimedByUserMinReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedMinReward", userAddressStr, lpAssetIdStr], SEP)
154 - 
155 - 
156 - func keyClaimedByUserBoostReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedBoostReward", userAddressStr, lpAssetIdStr], SEP)
157 - 
158 - 
159 - func keyClaimedTotal (lpAssetIdStr) = makeString(["%s%s%s__claimed", "total", lpAssetIdStr], SEP)
160 - 
161 - 
162 - func readStaked (key) = valueOrElse(getInteger(this, key), 0)
163 - 
164 - 
165 - func keyLastTotalLpBalance (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "bal"], SEP)
166 - 
167 - 
168 - func keyLastUserLpBalance (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "bal"], SEP)
169 - 
170 - 
171 - func keyTotalLpBalanceIntegral (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "balINT"], SEP)
172 - 
173 - 
174 - func keyUserLpBalanceIntegral (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "balINT"], SEP)
175 - 
176 - 
177 - func keyTotalLpBalanceIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "lastUpd"], SEP)
178 - 
179 - 
180 - func keyUserLpBalanceIntegralLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "lastUpd"], SEP)
181 - 
182 - 
183 - func keyWxPerLpIntegral (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpInt"], SEP)
184 - 
185 - 
186 - func keyWxPerLpIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpIntH"], SEP)
187 - 
188 - 
189 - func keyWxToClaimUser (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpInt"], SEP)
190 - 
191 - 
192 - func keyWxPerLpIntegralUserLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpIntH"], SEP)
193 - 
194 - 
195 - func keyWxPerLp (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLp"], SEP)
196 - 
197 - 
198 - func keyWxPerLpX18 (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLpX18"], SEP)
199 - 
200 - 
201 - func keyWxPerLpIntegralUserLast (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "uIntL"], SEP)
202 - 
203 - 
204 - func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
205 - 
206 - 
207 - func formatHistoryRecord (userAddress,lpAssetId,type,amount) = makeString(["%s%s%s%d%d%d", userAddress, lpAssetId, type, toString(height), toString(lastBlock.timestamp), toString(amount)], SEP)
208 - 
209 - 
210 - func OperationHistoryEntry (type,userAddress,lpAssetId,amount,txId) = StringEntry(keyOperationHistoryRecord(type, userAddress, toBase58String(txId)), formatHistoryRecord(userAddress, lpAssetId, type, amount))
211 - 
212 - 
213 - let factoryAddress = getStringOrFail(this, keyFactoryAddress())
214 - 
215 - let factoryContract = addressFromStringValue(factoryAddress)
216 - 
217 - let factoryCfg = readFactoryCfgOrFail(factoryContract)
218 - 
219 - let emissionContract = getEmissionAddressOrFail(factoryCfg)
220 - 
221 - let boostingContract = getBoostingAddressOrFail(factoryCfg)
222 - 
223 - func calcWxPerLpIntegralUserLast (stakedByUser,wxPerLpIntegralUserLastUpdHeightOrZero,wxPerLpIntegralNew,wxPerLpIntegralUserLastKEY) = if (if ((wxPerLpIntegralUserLastUpdHeightOrZero == zeroBigInt))
224 -     then (stakedByUser > zeroBigInt)
225 -     else false)
226 -     then zeroBigInt
227 -     else if ((stakedByUser == zeroBigInt))
228 -         then wxPerLpIntegralNew
229 -         else if (if ((wxPerLpIntegralUserLastUpdHeightOrZero > zeroBigInt))
230 -             then (stakedByUser > zeroBigInt)
231 -             else false)
232 -             then value(parseBigInt(getStringOrFail(this, wxPerLpIntegralUserLastKEY)))
233 -             else throw("calcWxPerLpIntegralUserLast: unexpected state")
234 - 
235 - 
236 - func refreshPoolINTEGRALS (lpAssetIdStr,poolAddressStr,lpDeltaAmount) = {
237 -     let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
238 -     let stakedTotal = toBigInt(readStaked(stakedTotalKEY))
239 -     let nonZeroStakedTotal = if ((stakedTotal == zeroBigInt))
240 -         then oneBigInt
241 -         else stakedTotal
242 -     let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
243 -     let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
244 -     let MULT3 = 1000
245 -     let wxEmissionPerBlockX3 = (getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent()) * MULT3)
246 -     let poolWxEmissionPerBlockX3 = fraction(wxEmissionPerBlockX3, poolWeight, (POOLWEIGHTMULT * 3))
247 -     let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
248 -     let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
249 -     let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
250 -     let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
251 -     let wxPerLpIntegral = getIntOrZero(this, wxPerLpIntegralKEY)
252 -     let wxPerLpOrZeroX3 = 0
253 -     let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
254 -     let wxPerLpX3 = if ((wxPerLpOrZeroX3 != 0))
255 -         then toBigInt(wxPerLpOrZeroX3)
256 -         else fraction(toBigInt(poolWxEmissionPerBlockX3), toBigInt(MULT8), nonZeroStakedTotal)
257 -     let stakedTotalNew = (stakedTotal + toBigInt(lpDeltaAmount))
258 -     let nonZeroStakedTotalNew = if ((stakedTotalNew == zeroBigInt))
259 -         then oneBigInt
260 -         else stakedTotalNew
261 -     let wxPerLpIntegralNew = (toBigInt(wxPerLpIntegral) + (wxPerLpX3 * toBigInt(dh)))
262 -     let wxPerLpX3New = (toBigInt(poolWxEmissionPerBlockX3) / nonZeroStakedTotalNew)
263 -     let wxPerLpIntegralLastUpdHeightNew = height
264 -     let debug = makeString(["wxPerLpIntegralNew=", toString(wxPerLpIntegralNew), "dh=", toString(dh), "wxPerLpX3=", toString(wxPerLpX3), "stakedTotal=", toString(stakedTotal), "poolWxEmissionPerBlockX3=", toString(poolWxEmissionPerBlockX3), "wxEmissionPerBlockX3=", toString(wxEmissionPerBlockX3), "poolWeight=", toString(poolWeight)], "::")
265 -     $Tuple3(wxPerLpIntegralNew, [StringEntry(wxPerLpIntegralKEY, toString(wxPerLpIntegralNew)), IntegerEntry(wxPerLpIntegralLastUpdHeightKEY, wxPerLpIntegralLastUpdHeightNew), StringEntry(wxPerLpKEY, toString(wxPerLpX3New))], debug)
266 -     }
267 - 
268 - 
269 - func refreshINTEGRALS (lpAssetIdStr,userAddressStr,poolAddressStr,lpDeltaAmount) = {
270 -     let $t01119411316 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
271 -     let wxPerLpIntegralNew = $t01119411316._1
272 -     let poolIntegralSTATE = $t01119411316._2
273 -     let poolDEBUG = $t01119411316._3
274 -     let MULT3 = 1000
275 -     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
276 -     let stakedByUser = readStaked(stakedByUserKEY)
277 -     let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
278 -     let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
279 -     let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
280 -     let wxToClaimUser = getIntOrZero(this, wxToClaimUserKEY)
281 -     let wxPerLpIntegralUserLastUpdHeightOrZero = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
282 -     let wxPerLpIntegralUserLast = calcWxPerLpIntegralUserLast(toBigInt(stakedByUser), toBigInt(wxPerLpIntegralUserLastUpdHeightOrZero), wxPerLpIntegralNew, wxPerLpIntegralUserLastKEY)
283 -     let MULT11 = (MULT8 * MULT3)
284 -     let wxToClaimUserNew = (toBigInt(wxToClaimUser) + fraction((wxPerLpIntegralNew - wxPerLpIntegralUserLast), toBigInt(stakedByUser), toBigInt(MULT11)))
285 -     let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
286 -     let wxPerLpIntegralUserLastUpdHeightNew = height
287 -     let debug = makeString(["wxToClaimUserNew=", toString(wxToClaimUserNew), "wxPerLpIntegralUserLast=", toString(wxPerLpIntegralUserLast), "stakedByUser=", toString(stakedByUser), "poolDEBUG=", poolDEBUG, "height=", toString(height)], "::")
288 -     $Tuple3(wxToClaimUserNew, (poolIntegralSTATE ++ [StringEntry(wxToClaimUserKEY, toString(wxToClaimUserNew)), IntegerEntry(wxPerLpIntegralUserLastUpdHeightKEY, wxPerLpIntegralUserLastUpdHeightNew), StringEntry(wxPerLpIntegralUserLastKEY, toString(wxPerLpIntegralUserLastNew))]), debug)
289 -     }
290 - 
73 + let votingEmissionContract = addressFromStringValue(getStringOrFail(keyVotingEmissionContract))
291 74  
292 75  func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
293 76      case s: String => 
294 77          fromBase58String(s)
295 78      case _: Unit => 
296 79          unit
297 80      case _ => 
298 81          throw("Match error")
299 82  }
300 83  
301 84  
302 85  func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
303 86      case s: String => 
304 87          fromBase58String(s)
305 88      case _: Unit => 
306 89          unit
307 90      case _ => 
308 91          throw("Match error")
309 92  }
310 93  
311 94  
312 95  func mustManager (i) = {
313 -     let pd = throw("Permission denied")
96 +     let pd = throw("permission denied")
314 97      match managerPublicKeyOrUnit() {
315 98          case pk: ByteVector => 
316 99              if ((i.callerPublicKey == pk))
317 100                  then true
318 101                  else pd
319 102          case _: Unit => 
320 103              if ((i.caller == this))
321 104                  then true
322 105                  else pd
323 106          case _ => 
324 107              throw("Match error")
325 108      }
326 109      }
327 110  
328 111  
112 + func asInt (val) = match val {
113 +     case valInt: Int => 
114 +         valInt
115 +     case _ => 
116 +         throw("failed to cast into Integer")
117 + }
118 + 
119 + 
329 120  @Callable(i)
330 - func constructor (factoryAddressStr) = {
331 -     let checkCaller = mustManager(i)
332 -     if ((checkCaller == checkCaller))
333 -         then [StringEntry(keyFactoryAddress(), factoryAddressStr)]
121 + func constructor (assetsStoreContractPrm,boostingContractPrm,emissionContractPrm,factoryContractPrm,userPoolContractPrm,votingEmissionContractPrm,feeAmountPrm,wxAssetIdPrm,votingDurationPrm,usdnAssetIdPrm,finalizeRewardPrm) = {
122 +     let checks = [mustManager(i), if (isDefined(addressFromString(assetsStoreContractPrm)))
123 +         then true
124 +         else throw("Invalid asset_store contract address"), if (isDefined(addressFromString(boostingContractPrm)))
125 +         then true
126 +         else throw("Invalid boosting contract address"), if (isDefined(addressFromString(userPoolContractPrm)))
127 +         then true
128 +         else throw("Invalid user_pools contract address"), if (isDefined(addressFromString(emissionContractPrm)))
129 +         then true
130 +         else throw("Invalid emission contract address"), if (isDefined(addressFromString(factoryContractPrm)))
131 +         then true
132 +         else throw("Invalid factory contract address"), if ((feeAmountPrm >= 0))
133 +         then true
134 +         else throw("Invalid fee amount"), if ((votingDurationPrm > 0))
135 +         then true
136 +         else throw("Invalid voting duration"), if ((finalizeRewardPrm > 0))
137 +         then true
138 +         else throw("Invalid finalize reward"), if (isDefined(assetInfo(fromBase58String(wxAssetIdPrm))))
139 +         then true
140 +         else throw("Invalid WX asset ID"), if (isDefined(assetInfo(fromBase58String(usdnAssetIdPrm))))
141 +         then true
142 +         else throw("Invalid USDN asset ID")]
143 +     if ((checks == checks))
144 +         then $Tuple2([StringEntry(keyAssetsStoreContract, assetsStoreContractPrm), StringEntry(keyBoostingContract, boostingContractPrm), StringEntry(keyEmissionContract, emissionContractPrm), StringEntry(keyFactoryContract, factoryContractPrm), StringEntry(keyUserPoolContract, userPoolContractPrm), StringEntry(keyVotingEmissionContract, votingEmissionContractPrm), IntegerEntry(keyFeeAmount, feeAmountPrm), IntegerEntry(keyEpochLength, votingDurationPrm), IntegerEntry(keyFinalizeReward, finalizeRewardPrm), StringEntry(keyWxAssetId, wxAssetIdPrm), StringEntry(keyUsdnAssetId, usdnAssetIdPrm)], unit)
145 +         else throw("Strict value is not equal to itself.")
146 +     }
147 + 
148 + 
149 + 
150 + @Callable(i)
151 + func suggest (amountAssetId,priceAssetId) = {
152 +     let payment = value(i.payments[0])
153 +     let info = valueOrErrorMessage(assetInfo(fromBase58String(amountAssetId)), "invalid amountAssetId ID")
154 +     let checks = [if ((info.issuer == i.caller))
155 +         then true
156 +         else throw("asset can only be suggested by its issuer"), if ((info.scripted == false))
157 +         then true
158 +         else throw("asset is smart"), if ((toBase58String(value(payment.assetId)) == value(getString(keyWxAssetId))))
159 +         then true
160 +         else throw("invalid fee asset"), if ((payment.amount == value(getInteger(keyFeeAmount))))
161 +         then true
162 +         else throw("invalid fee amount"), if ((priceAssetId == value(getString(keyUsdnAssetId))))
163 +         then true
164 +         else throw("priceAssetId is not USDN"), if ((getInteger(keyInListAssetId(amountAssetId, priceAssetId)) == unit))
165 +         then true
166 +         else throw("already in voting list")]
167 +     if ((checks == checks))
168 +         then {
169 +             let ensureActive =             match invoke(userPoolContract, "statusREADONLY", [amountAssetId, priceAssetId], nil) {
170 +                 case s: String => 
171 +                     if ((s == "active"))
172 +                         then true
173 +                         else throw("user pool is not active")
174 +                 case _ => 
175 +                     throw("user pool is not active")
176 +             }
177 +             if ((ensureActive == ensureActive))
178 +                 then {
179 +                     let ensureAmountAssetVerified =                     match invoke(assetsStoreContract, "isVerifiedREADONLY", [amountAssetId], nil) {
180 +                         case b: Boolean => 
181 +                             if (b)
182 +                                 then true
183 +                                 else throw("asset is not verified")
184 +                         case _ => 
185 +                             throw("asset is not verified")
186 +                     }
187 +                     if ((ensureAmountAssetVerified == ensureAmountAssetVerified))
188 +                         then {
189 +                             let burnFeeInv = invoke(emissionContract, "burn", nil, [AttachedPayment(payment.assetId, payment.amount)])
190 +                             if ((burnFeeInv == burnFeeInv))
191 +                                 then {
192 +                                     let newSuggestIndex =                                     match getInteger(keySuggestIndex(amountAssetId, priceAssetId)) {
193 +                                         case int: Int => 
194 +                                             (int + 1)
195 +                                         case _ => 
196 +                                             0
197 +                                     }
198 +                                     $Tuple2([IntegerEntry(keyInListAssetId(amountAssetId, priceAssetId), newSuggestIndex), IntegerEntry(keyStartHeight(amountAssetId, priceAssetId, newSuggestIndex), height), StringEntry(keyVotingResult(amountAssetId, priceAssetId, newSuggestIndex), totalVotes("0", "0")), IntegerEntry(keySuggestIndex(amountAssetId, priceAssetId), newSuggestIndex)], unit)
199 +                                     }
200 +                                 else throw("Strict value is not equal to itself.")
201 +                             }
202 +                         else throw("Strict value is not equal to itself.")
203 +                     }
204 +                 else throw("Strict value is not equal to itself.")
205 +             }
206 +         else throw("Strict value is not equal to itself.")
207 +     }
208 + 
209 + 
210 + 
211 + @Callable(i)
212 + func vote (amountAssetId,priceAssetId,inFavor) = {
213 +     let suggestIndex = value(getInteger(keyInListAssetId(amountAssetId, priceAssetId)))
214 +     let votingFinishHeight = (value(getInteger(keyStartHeight(amountAssetId, priceAssetId, suggestIndex))) + value(getInteger(keyEpochLength)))
215 +     let checks = [if (isDefined(getInteger(keyInListAssetId(amountAssetId, priceAssetId))))
216 +         then true
217 +         else throw("the token isn't on the voting list"), if ((votingFinishHeight > height))
218 +         then true
219 +         else throw("too late to vote")]
220 +     if ((checks == checks))
221 +         then {
222 +             let gwxAmount = invoke(boostingContract, "getUserGwxAmountAtHeightREADONLY", [toString(i.caller), votingFinishHeight], nil)
223 +             let notZero = if ((asInt(gwxAmount) > 0))
224 +                 then true
225 +                 else throw("you don't have gwx")
226 +             if ((notZero == notZero))
227 +                 then {
228 +                     let vote =                     match getString(keyVote(amountAssetId, priceAssetId, suggestIndex, toString(i.caller))) {
229 +                         case s: String => 
230 +                             let vote = split(s, separator)
231 +                             let voteValue = vote[1]
232 +                             let voteType = vote[2]
233 +                             let isVoteTypeSimilar = if (if ((voteType == "yes"))
234 +                                 then (inFavor == true)
235 +                                 else false)
236 +                                 then true
237 +                                 else if ((voteType == "no"))
238 +                                     then (inFavor == false)
239 +                                     else false
240 +                             let isVoteValueSimilar = if (isVoteTypeSimilar)
241 +                                 then (asInt(gwxAmount) == parseIntValue(voteValue))
242 +                                 else false
243 +                             let isNewVoteSimilar = if (if (isVoteTypeSimilar)
244 +                                 then isVoteValueSimilar
245 +                                 else false)
246 +                                 then throw("you already voted")
247 +                                 else invoke(this, "cancelVote", [amountAssetId, priceAssetId], nil)
248 +                             isNewVoteSimilar
249 +                         case u: Unit => 
250 +                             u
251 +                         case _ => 
252 +                             throw("Match error")
253 +                     }
254 +                     if ((vote == vote))
255 +                         then {
256 +                             let votingResult = split(value(getString(keyVotingResult(amountAssetId, priceAssetId, suggestIndex))), separator)
257 +                             let positiveVotes = votingResult[1]
258 +                             let negativeVotes = votingResult[2]
259 +                             let newPositiveAndNegativeVotes = if (inFavor)
260 +                                 then {
261 +                                     let newPositiveVotes = (parseIntValue(positiveVotes) + asInt(gwxAmount))
262 + [toString(newPositiveVotes), negativeVotes]
263 +                                     }
264 +                                 else {
265 +                                     let newNegativeVotes = (parseIntValue(negativeVotes) + asInt(gwxAmount))
266 + [positiveVotes, toString(newNegativeVotes)]
267 +                                     }
268 +                             let voteKey = keyVote(amountAssetId, priceAssetId, suggestIndex, toString(i.caller))
269 +                             let voteValue = keyVoteValue(toString(asInt(gwxAmount)), inFavor)
270 +                             $Tuple2([StringEntry(keyVotingResult(amountAssetId, priceAssetId, suggestIndex), totalVotes(newPositiveAndNegativeVotes[0], newPositiveAndNegativeVotes[1])), StringEntry(voteKey, voteValue)], unit)
271 +                             }
272 +                         else throw("Strict value is not equal to itself.")
273 +                     }
274 +                 else throw("Strict value is not equal to itself.")
275 +             }
276 +         else throw("Strict value is not equal to itself.")
277 +     }
278 + 
279 + 
280 + 
281 + @Callable(i)
282 + func cancelVote (amountAssetId,priceAssetId) = {
283 +     let userAddress = if ((i.caller == this))
284 +         then toString(i.originCaller)
285 +         else toString(i.caller)
286 +     let suggestIndex = value(getInteger(keyInListAssetId(amountAssetId, priceAssetId)))
287 +     let checks = [if (isDefined(getString(keyVotingResult(amountAssetId, priceAssetId, suggestIndex))))
288 +         then true
289 +         else throw("no vote for assets pair")]
290 +     if ((checks == checks))
291 +         then {
292 +             let vote = split(value(getString(keyVote(amountAssetId, priceAssetId, suggestIndex, userAddress))), separator)
293 +             let voteValue = vote[1]
294 +             let voteType = vote[2]
295 +             let votingResult = split(value(getString(keyVotingResult(amountAssetId, priceAssetId, suggestIndex))), separator)
296 +             let positiveVotes = votingResult[1]
297 +             let negativeVotes = votingResult[2]
298 +             let actions = if ((voteType == "yes"))
299 +                 then {
300 +                     let newPositiveVotes = (parseIntValue(positiveVotes) - parseIntValue(voteValue))
301 +                     $Tuple2([StringEntry(keyVotingResult(amountAssetId, priceAssetId, suggestIndex), totalVotes(toString(newPositiveVotes), negativeVotes)), DeleteEntry(keyVote(amountAssetId, priceAssetId, suggestIndex, userAddress))], unit)
302 +                     }
303 +                 else {
304 +                     let newNegativeVotes = (parseIntValue(negativeVotes) - parseIntValue(voteValue))
305 +                     $Tuple2([StringEntry(keyVotingResult(amountAssetId, priceAssetId, suggestIndex), totalVotes(positiveVotes, toString(newNegativeVotes))), DeleteEntry(keyVote(amountAssetId, priceAssetId, suggestIndex, userAddress))], unit)
306 +                     }
307 +             actions
308 +             }
309 +         else throw("Strict value is not equal to itself.")
310 +     }
311 + 
312 + 
313 + 
314 + @Callable(i)
315 + func setFee (newFee) = {
316 +     let checks = [mustManager(i)]
317 +     if ((checks == checks))
318 +         then [IntegerEntry(keyFeeAmount, newFee)]
319 +         else throw("Strict value is not equal to itself.")
320 +     }
321 + 
322 + 
323 + 
324 + @Callable(i)
325 + func finalize (amountAssetId,priceAssetId) = {
326 +     let suggestIndex = value(getInteger(keyInListAssetId(amountAssetId, priceAssetId)))
327 +     let votingFinishHeight = (value(getInteger(keyStartHeight(amountAssetId, priceAssetId, suggestIndex))) + value(getInteger(keyEpochLength)))
328 +     let checks = [if (isDefined(getInteger(keyInListAssetId(amountAssetId, priceAssetId))))
329 +         then true
330 +         else throw("no assets pair"), if ((height >= votingFinishHeight))
331 +         then true
332 +         else throw("insufficient height for completion")]
333 +     if ((checks == checks))
334 +         then {
335 +             let votingResult = split(value(getString(keyVotingResult(amountAssetId, priceAssetId, suggestIndex))), separator)
336 +             let positiveVotes = parseIntValue(votingResult[1])
337 +             let negativeVotes = parseIntValue(votingResult[2])
338 +             let actions = if ((positiveVotes > negativeVotes))
339 +                 then {
340 +                     let res = invoke(factoryContract, "setWxEmissionPoolLabel", [amountAssetId, priceAssetId], nil)
341 +                     if ((res == res))
342 +                         then $Tuple2([DeleteEntry(keyInListAssetId(amountAssetId, priceAssetId))], unit)
343 +                         else throw("Strict value is not equal to itself.")
344 +                     }
345 +                 else $Tuple2([DeleteEntry(keyInListAssetId(amountAssetId, priceAssetId))], unit)
346 +             actions
347 +             }
334 348          else throw("Strict value is not equal to itself.")
335 349      }
336 350  
337 351  
338 352  
339 353  @Callable(i)
340 354  func setManager (pendingManagerPublicKey) = {
341 355      let checkCaller = mustManager(i)
342 356      if ((checkCaller == checkCaller))
343 357          then {
344 358              let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
345 359              if ((checkManagerPublicKey == checkManagerPublicKey))
346 360                  then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
347 361                  else throw("Strict value is not equal to itself.")
348 362              }
349 363          else throw("Strict value is not equal to itself.")
350 364      }
351 365  
352 366  
353 367  
354 368  @Callable(i)
355 369  func confirmManager () = {
356 370      let pm = pendingManagerPublicKeyOrUnit()
357 371      let hasPM = if (isDefined(pm))
358 372          then true
359 -         else throw("No pending manager")
373 +         else throw("no pending manager")
360 374      if ((hasPM == hasPM))
361 375          then {
362 376              let checkPM = if ((i.callerPublicKey == value(pm)))
363 377                  then true
364 -                 else throw("You are not pending manager")
378 +                 else throw("you are not pending manager")
365 379              if ((checkPM == checkPM))
366 380                  then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
367 381                  else throw("Strict value is not equal to itself.")
368 382              }
369 383          else throw("Strict value is not equal to itself.")
370 384      }
371 - 
372 - 
373 - 
374 - @Callable(i)
375 - func stake () = if ((size(i.payments) != 1))
376 -     then throw("invalid payment - exact one payment must be attached")
377 -     else {
378 -         let pmt = i.payments[0]
379 -         let lpAssetId = value(pmt.assetId)
380 -         let lpAssetIdStr = toBase58String(lpAssetId)
381 -         let amount = pmt.amount
382 -         let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
383 -         let callerStr = toString(i.caller)
384 -         let userAddressStr = if ((callerStr == poolAddressStr))
385 -             then toString(i.originCaller)
386 -             else callerStr
387 -         let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
388 -         let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
389 -         let stakedByUser = readStaked(stakedByUserKEY)
390 -         let stakedTotal = readStaked(stakedTotalKEY)
391 -         let $t01541515532 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, amount)
392 -         let wxToClaimUserNew = $t01541515532._1
393 -         let integralSTATE = $t01541515532._2
394 -         let debug = $t01541515532._3
395 -         ([IntegerEntry(stakedByUserKEY, (stakedByUser + amount)), IntegerEntry(stakedTotalKEY, (stakedTotal + amount)), OperationHistoryEntry("stake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE)
396 -         }
397 - 
398 - 
399 - 
400 - @Callable(i)
401 - func unstake (lpAssetIdStr,amount) = {
402 -     let lpAssetId = fromBase58String(lpAssetIdStr)
403 -     let poolAddressStr = valueOrErrorMessage(getString(factoryContract, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
404 -     let poolAddon = valueOrElse(getString(this, keyStablePoolAddonAddr()), poolAddressStr)
405 -     let callerStr = toString(i.caller)
406 -     let userAddressStr = if (if ((callerStr == poolAddressStr))
407 -         then true
408 -         else (callerStr == poolAddon))
409 -         then toString(i.originCaller)
410 -         else callerStr
411 -     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
412 -     let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
413 -     let stakedByUser = readStaked(stakedByUserKEY)
414 -     let stakedTotal = readStaked(stakedTotalKEY)
415 -     let $t01666916787 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, -(amount))
416 -     let wxToClaimUserNew = $t01666916787._1
417 -     let integralSTATE = $t01666916787._2
418 -     let debug = $t01666916787._3
419 -     if ((amount > stakedByUser))
420 -         then throw("passed amount is less then available")
421 -         else ([IntegerEntry(stakedByUserKEY, (stakedByUser - amount)), IntegerEntry(stakedTotalKEY, (stakedTotal - amount)), ScriptTransfer(i.caller, amount, lpAssetId), OperationHistoryEntry("unstake", userAddressStr, lpAssetIdStr, amount, i.transactionId)] ++ integralSTATE)
422 -     }
423 - 
424 - 
425 - 
426 - @Callable(i)
427 - func claimWx (lpAssetIdStr) = {
428 -     let userAddress = i.caller
429 -     let userAddressStr = toString(i.caller)
430 -     let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
431 -     let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
432 -     let claimedTotalKEY = keyClaimedTotal(lpAssetIdStr)
433 -     let claimedByUserMinRewardKEY = keyClaimedByUserMinReward(lpAssetIdStr, userAddressStr)
434 -     let claimedByUserBoostRewardKEY = keyClaimedByUserBoostReward(lpAssetIdStr, userAddressStr)
435 -     let claimedByUser = toBigInt(getIntOrZero(this, claimedByUserKEY))
436 -     let claimedByUserMinReward = toBigInt(getIntOrZero(this, claimedByUserMinRewardKEY))
437 -     let claimedByUserBoostReward = toBigInt(getIntOrZero(this, claimedByUserBoostRewardKEY))
438 -     let claimedTotal = toBigInt(getIntOrZero(this, claimedTotalKEY))
439 -     let $t01802318135 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
440 -     let wxToClaimUserNew = $t01802318135._1
441 -     let integralSTATE = $t01802318135._2
442 -     let debug = $t01802318135._3
443 -     let availableToClaim = (wxToClaimUserNew - claimedByUser)
444 -     if ((zeroBigInt >= availableToClaim))
445 -         then throw("nothing to claim")
446 -         else {
447 -             let wxAmountBoostTotal = asInt(asAnyList(invoke(boostingContract, "claimWxBoost", [lpAssetIdStr, userAddressStr], nil))[0])
448 -             let minRewardPart = availableToClaim
449 -             let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
450 -             let wxAssetId = asByteVector(asAnyList(invoke(emissionContract, "emit", [minRewardPart], nil))[0])
451 -             let emitBoost = asAnyList(invoke(emissionContract, "emit", [boostRewardPart], nil))
452 -             if ((emitBoost == emitBoost))
453 -                 then {
454 -                     let claimedByUserValue = (claimedByUser + availableToClaim)
455 -                     let claimedByUserMinRewardPlusPart = (claimedByUserMinReward + minRewardPart)
456 -                     let claimedByUserBoostRewardPlusBoostRewardPart = (claimedByUserMinReward + minRewardPart)
457 -                     let claimedTotalPlusAvailableToClaim = (claimedByUserMinReward + minRewardPart)
458 - [StringEntry(claimedByUserKEY, toString(claimedByUserValue)), StringEntry(claimedByUserMinRewardKEY, toString(claimedByUserMinRewardPlusPart)), StringEntry(claimedByUserBoostRewardKEY, toString(claimedByUserBoostRewardPlusBoostRewardPart)), StringEntry(claimedTotalKEY, toString(claimedTotalPlusAvailableToClaim)), ScriptTransfer(userAddress, toInt(minRewardPart), wxAssetId), ScriptTransfer(userAddress, toInt(boostRewardPart), wxAssetId), OperationHistoryEntry("claim", userAddressStr, lpAssetIdStr, toInt(availableToClaim), i.transactionId)]
459 -                     }
460 -                 else throw("Strict value is not equal to itself.")
461 -             }
462 -     }
463 - 
464 - 
465 - 
466 - @Callable(i)
467 - func claimWxREADONLY (lpAssetIdStr,userAddressStr) = {
468 -     let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
469 -     let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
470 -     let claimedByUserKEY = keyClaimedByUser(lpAssetIdStr, userAddressStr)
471 -     let stakedByUser = readStaked(stakedByUserKEY)
472 -     let stakedTotal = readStaked(stakedTotalKEY)
473 -     let claimedByUser = getIntOrZero(this, claimedByUserKEY)
474 -     let poolAddressStr = getStringByAddressOrFail(factoryContract, keyFactoryLpAssetToPoolContractAddress(lpAssetIdStr))
475 -     let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
476 -     let wxEmissionPerBlock = getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent())
477 -     let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
478 -     let passedBlocks = if ((emissionStartBlock > height))
479 -         then 0
480 -         else (height - emissionStartBlock)
481 -     let poolWxEmission = fraction((wxEmissionPerBlock * passedBlocks), poolWeight, POOLWEIGHTMULT)
482 -     let userWxReward = fraction(poolWxEmission, stakedByUser, stakedTotal)
483 -     let $t02072020832 = refreshINTEGRALS(lpAssetIdStr, userAddressStr, poolAddressStr, 0)
484 -     let wxToClaimUserNew = $t02072020832._1
485 -     let integralSTATE = $t02072020832._2
486 -     let debug = $t02072020832._3
487 -     let availableToClaim = (wxToClaimUserNew - toBigInt(claimedByUser))
488 -     let boostInvResult = asAnyList(invoke(boostingContract, "claimWxBoostREADONLY", [lpAssetIdStr, userAddressStr], nil))
489 -     let wxAmountBoostTotal = asInt(boostInvResult[0])
490 -     let boostDebug = asString(boostInvResult[1])
491 -     let minRewardPart = availableToClaim
492 -     let boostRewardPart = min([(minRewardPart * toBigInt(2)), toBigInt(wxAmountBoostTotal)])
493 -     let totalReward = (minRewardPart + boostRewardPart)
494 -     $Tuple2(nil, makeString(["%s%s%d%d%d%d%s", lpAssetIdStr, userAddressStr, toString(totalReward), toString(claimedByUser), toString(minRewardPart), toString(boostRewardPart), ((((debug + "::") + toString(userWxReward)) + "::BOOSTDEBUG::") + boostDebug)], SEP))
495 -     }
496 - 
497 - 
498 - 
499 - @Callable(i)
500 - func onModifyWeight (lpAssetIdStr,poolAddressStr) = if ((i.caller != factoryContract))
501 -     then throw("permissions denied")
502 -     else {
503 -         let $t02174521855 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, 0)
504 -         let wxPerLpIntegralNew = $t02174521855._1
505 -         let poolIntegralSTATE = $t02174521855._2
506 -         let poolDEBUG = $t02174521855._3
507 -         poolIntegralSTATE
508 -         }
509 385  
510 386  
511 387  @Verifier(tx)
512 388  func verify () = {
513 389      let targetPublicKey =     match managerPublicKeyOrUnit() {
514 390          case pk: ByteVector => 
515 391              pk
516 392          case _: Unit => 
517 393              tx.senderPublicKey
518 394          case _ => 
519 395              throw("Match error")
520 396      }
521 397      sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
522 398      }
523 399

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let ~~SCALE8~~ = 8
	4	+	let separator = "__"
5	5
6		-	let ~~MULT8~~ = ~~100000000~~
	6	+	let keyFeeAmount = makeString(["%s", "fee"], separator)
7	7
8		-	let ~~SCALE18~~ = 18
	8	+	let keyUsdnAssetId = makeString(["%s", "usdnAssetId"], separator)
9	9
10		-	let ~~MULT18~~ = ~~toBigInt~~(~~1000000000000000000~~)
	10	+	let keyEpochLength = makeString(["%s", "epochLength"], separator)
11	11
12		-	let ~~SEP~~ = "__"
	12	+	let keyFinalizeReward = makeString(["%s", "finalizeReward"], separator)
13	13
14		-	let ~~POOLWEIGHTMULT~~ = ~~MULT8~~
	14	+	let keyWxAssetId = makeString(["%s", "wxAssetId"], separator)
15	15
16		-	let ~~zeroBigInt~~ = ~~toBigInt~~(0)
	16	+	let keyAssetsStoreContract = makeString(["%s", "assetsStoreContract"], separator)
17	17
18		-	let ~~oneBigInt~~ = ~~toBigInt~~(1)
	18	+	let keyUserPoolContract = makeString(["%s", "userPoolContract"], separator)
19	19
20		-	func asAnyList (val) = match val {
21		-	case valAnyLyst: List[Any] =>
22		-	valAnyLyst
23		-	case _ =>
24		-	throw("fail to cast into List[Any]")
25		-	}
	20	+	let keyEmissionContract = makeString(["%s", "emissionContract"], separator)
	21	+
	22	+	let keyBoostingContract = makeString(["%s", "boostingContract"], separator)
	23	+
	24	+	let keyFactoryContract = makeString(["%s", "factoryContract"], separator)
	25	+
	26	+	let keyVotingEmissionContract = makeString(["%s", "votingEmissionContract"], separator)
	27	+
	28	+	func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (key + " is not defined"))
26	29
27	30
28		-	func asInt (val) = match val {
29		-	case valInt: Int =>
30		-	valInt
31		-	case _ =>
32		-	throw("fail to cast into Int")
33		-	}
	31	+	func keyInListAssetId (amountAssetId,priceAssetId) = makeString(["%s%s%s", "inList", amountAssetId, priceAssetId], separator)
34	32
35	33
36		-	func asString (val) = match val {
37		-	case valStr: String =>
38		-	valStr
39		-	case _ =>
40		-	throw("fail to cast into Int")
41		-	}
	34	+	func keySuggestIndex (amountAssetId,priceAssetId) = makeString(["%s%s%s", "suggestIndex", amountAssetId, priceAssetId], separator)
42	35
43	36
44		-	func asByteVector (val) = match val {
45		-	case valBin: ByteVector =>
46		-	valBin
47		-	case _ =>
48		-	throw("fail to cast into Int")
49		-	}
	37	+	func keyStartHeight (amountAssetId,priceAssetId,suggestIndex) = makeString(["%s%s%s%d", "startHeight", amountAssetId, priceAssetId, toString(suggestIndex)], separator)
50	38
51	39
52		-	func ~~getStringOrFail~~ (~~address~~,~~key~~) = ~~valueOrErrorMessage~~(~~getString(address~~, ~~key)~~, (~~("mandatory this." + key~~) ~~+ " is not defined"))~~
	40	+	func keyVotingResult (amountAssetId,priceAssetId,suggestIndex) = makeString(["%s%s%s%d", "votingResult", amountAssetId, priceAssetId, toString(suggestIndex)], separator)
53	41
54	42
55		-	func ~~getStringByAddressOrFail~~ (~~address~~,~~key~~) = ~~valueOrErrorMessage~~(~~getString(address~~, ~~key)~~, ~~(((("mandatory " + toString(address~~)~~) + ".") + key) + " is not defined"))~~
	43	+	func totalVotes (totalYes,totalNo) = makeString(["%d%d", totalYes, totalNo], separator)
56	44
57	45
58		-	func ~~getIntOrZero~~ (~~address~~,~~key~~) = ~~valueOrElse~~(~~getInteger(address~~, ~~key~~), 0)
	46	+	func keyVote (amountAssetId,priceAssetId,suggestIndex,voterAddress) = makeString(["%s%s%s%d%s", "vote", amountAssetId, priceAssetId, toString(suggestIndex), voterAddress], separator)
59	47
60	48
61		-	func getIntOrDefault (address,key,defaultVal) = valueOrElse(getInteger(address, key), defaultVal)
62		-
63		-
64		-	func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), (("mandatory this." + key) + " is not defined"))
65		-
66		-
67		-	func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULT18, toBigInt(origScaleMult))
68		-
69		-
70		-	func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULT18))
71		-
72		-
73		-	func keyFactoryAddress () = "%s%s__config__factoryAddress"
74		-
75		-
76		-	let IdxFactoryCfgStakingDapp = 1
77		-
78		-	let IdxFactoryCfgBoostingDapp = 2
79		-
80		-	let IdxFactoryCfgIdoDapp = 3
81		-
82		-	let IdxFactoryCfgTeamDapp = 4
83		-
84		-	let IdxFactoryCfgEmissionDapp = 5
85		-
86		-	let IdxFactoryCfgRestDapp = 6
87		-
88		-	let IdxFactoryCfgSlippageDapp = 7
89		-
90		-	func keyFactoryCfg () = "%s__factoryConfig"
	49	+	func keyVoteValue (gwxAmount,vote) = {
	50	+	let key = if (vote)
	51	+	then makeString(["%d%s", gwxAmount, "yes"], separator)
	52	+	else makeString(["%d%s", gwxAmount, "no"], separator)
	53	+	key
	54	+	}
91	55
92	56
93	57		func keyManagerPublicKey () = "%s__managerPublicKey"

96	60		func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
97	61
98	62
99		-	~~func keyStablePoolAddonAddr ()~~ = ~~"%s__stablePoolAddonAddr"~~
	63	+	let assetsStoreContract = addressFromStringValue(getStringOrFail(keyAssetsStoreContract))
100	64
	65	+	let boostingContract = addressFromStringValue(getStringOrFail(keyBoostingContract))
101	66
102		-	~~func keyFactoryLp2AssetsMapping (lpAssetStr)~~ = ~~makeString~~(~~["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP~~)
	67	+	let emissionContract = addressFromStringValue(getStringOrFail(keyEmissionContract))
103	68
	69	+	let factoryContract = addressFromStringValue(getStringOrFail(keyFactoryContract))
104	70
105		-	~~func keyFactoryLpList ()~~ = ~~"%s__lpTokensList"~~
	71	+	let userPoolContract = addressFromStringValue(getStringOrFail(keyUserPoolContract))
106	72
107		-
108		-	func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
109		-
110		-
111		-	func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
112		-
113		-
114		-	func readLpList (factory) = split(valueOrElse(getString(factory, keyFactoryLpList()), ""), SEP)
115		-
116		-
117		-	func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
118		-
119		-
120		-	func getBoostingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgBoostingDapp])
121		-
122		-
123		-	func getEmissionAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgEmissionDapp])
124		-
125		-
126		-	func getStakingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgStakingDapp])
127		-
128		-
129		-	func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
130		-
131		-
132		-	func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
133		-
134		-
135		-	func keyEmissionStartBlock () = "%s%s__emission__startBlock"
136		-
137		-
138		-	func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
139		-
140		-
141		-	func keyEmissionEndBlock () = "%s%s__emission__endBlock"
142		-
143		-
144		-	func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
145		-
146		-
147		-	func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
148		-
149		-
150		-	func keyClaimedByUser (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimed", userAddressStr, lpAssetIdStr], SEP)
151		-
152		-
153		-	func keyClaimedByUserMinReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedMinReward", userAddressStr, lpAssetIdStr], SEP)
154		-
155		-
156		-	func keyClaimedByUserBoostReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedBoostReward", userAddressStr, lpAssetIdStr], SEP)
157		-
158		-
159		-	func keyClaimedTotal (lpAssetIdStr) = makeString(["%s%s%s__claimed", "total", lpAssetIdStr], SEP)
160		-
161		-
162		-	func readStaked (key) = valueOrElse(getInteger(this, key), 0)
163		-
164		-
165		-	func keyLastTotalLpBalance (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "bal"], SEP)
166		-
167		-
168		-	func keyLastUserLpBalance (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "bal"], SEP)
169		-
170		-
171		-	func keyTotalLpBalanceIntegral (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "balINT"], SEP)
172		-
173		-
174		-	func keyUserLpBalanceIntegral (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "balINT"], SEP)
175		-
176		-
177		-	func keyTotalLpBalanceIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "lastUpd"], SEP)
178		-
179		-
180		-	func keyUserLpBalanceIntegralLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "lastUpd"], SEP)
181		-
182		-
183		-	func keyWxPerLpIntegral (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpInt"], SEP)
184		-
185		-
186		-	func keyWxPerLpIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpIntH"], SEP)
187		-
188		-
189		-	func keyWxToClaimUser (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpInt"], SEP)
190		-
191		-
192		-	func keyWxPerLpIntegralUserLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpIntH"], SEP)
193		-
194		-
195		-	func keyWxPerLp (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLp"], SEP)
196		-
197		-
198		-	func keyWxPerLpX18 (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLpX18"], SEP)
199		-
200		-
201		-	func keyWxPerLpIntegralUserLast (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "uIntL"], SEP)
202		-
203		-
204		-	func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
205		-
206		-
207		-	func formatHistoryRecord (userAddress,lpAssetId,type,amount) = makeString(["%s%s%s%d%d%d", userAddress, lpAssetId, type, toString(height), toString(lastBlock.timestamp), toString(amount)], SEP)
208		-
209		-
210		-	func OperationHistoryEntry (type,userAddress,lpAssetId,amount,txId) = StringEntry(keyOperationHistoryRecord(type, userAddress, toBase58String(txId)), formatHistoryRecord(userAddress, lpAssetId, type, amount))
211		-
212		-
213		-	let factoryAddress = getStringOrFail(this, keyFactoryAddress())
214		-
215		-	let factoryContract = addressFromStringValue(factoryAddress)
216		-
217		-	let factoryCfg = readFactoryCfgOrFail(factoryContract)
218		-
219		-	let emissionContract = getEmissionAddressOrFail(factoryCfg)
220		-
221		-	let boostingContract = getBoostingAddressOrFail(factoryCfg)
222		-
223		-	func calcWxPerLpIntegralUserLast (stakedByUser,wxPerLpIntegralUserLastUpdHeightOrZero,wxPerLpIntegralNew,wxPerLpIntegralUserLastKEY) = if (if ((wxPerLpIntegralUserLastUpdHeightOrZero == zeroBigInt))
224		-	then (stakedByUser > zeroBigInt)
225		-	else false)
226		-	then zeroBigInt
227		-	else if ((stakedByUser == zeroBigInt))
228		-	then wxPerLpIntegralNew
229		-	else if (if ((wxPerLpIntegralUserLastUpdHeightOrZero > zeroBigInt))
230		-	then (stakedByUser > zeroBigInt)
231		-	else false)
232		-	then value(parseBigInt(getStringOrFail(this, wxPerLpIntegralUserLastKEY)))
233		-	else throw("calcWxPerLpIntegralUserLast: unexpected state")
234		-
235		-
236		-	func refreshPoolINTEGRALS (lpAssetIdStr,poolAddressStr,lpDeltaAmount) = {
237		-	let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
238		-	let stakedTotal = toBigInt(readStaked(stakedTotalKEY))
239		-	let nonZeroStakedTotal = if ((stakedTotal == zeroBigInt))
240		-	then oneBigInt
241		-	else stakedTotal
242		-	let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
243		-	let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
244		-	let MULT3 = 1000
245		-	let wxEmissionPerBlockX3 = (getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent()) * MULT3)
246		-	let poolWxEmissionPerBlockX3 = fraction(wxEmissionPerBlockX3, poolWeight, (POOLWEIGHTMULT * 3))
247		-	let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
248		-	let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
249		-	let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
250		-	let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
251		-	let wxPerLpIntegral = getIntOrZero(this, wxPerLpIntegralKEY)
252		-	let wxPerLpOrZeroX3 = 0
253		-	let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
254		-	let wxPerLpX3 = if ((wxPerLpOrZeroX3 != 0))
255		-	then toBigInt(wxPerLpOrZeroX3)
256		-	else fraction(toBigInt(poolWxEmissionPerBlockX3), toBigInt(MULT8), nonZeroStakedTotal)
257		-	let stakedTotalNew = (stakedTotal + toBigInt(lpDeltaAmount))
258		-	let nonZeroStakedTotalNew = if ((stakedTotalNew == zeroBigInt))
259		-	then oneBigInt
260		-	else stakedTotalNew
261		-	let wxPerLpIntegralNew = (toBigInt(wxPerLpIntegral) + (wxPerLpX3 * toBigInt(dh)))
262		-	let wxPerLpX3New = (toBigInt(poolWxEmissionPerBlockX3) / nonZeroStakedTotalNew)
263		-	let wxPerLpIntegralLastUpdHeightNew = height
264		-	let debug = makeString(["wxPerLpIntegralNew=", toString(wxPerLpIntegralNew), "dh=", toString(dh), "wxPerLpX3=", toString(wxPerLpX3), "stakedTotal=", toString(stakedTotal), "poolWxEmissionPerBlockX3=", toString(poolWxEmissionPerBlockX3), "wxEmissionPerBlockX3=", toString(wxEmissionPerBlockX3), "poolWeight=", toString(poolWeight)], "::")
265		-	$Tuple3(wxPerLpIntegralNew, [StringEntry(wxPerLpIntegralKEY, toString(wxPerLpIntegralNew)), IntegerEntry(wxPerLpIntegralLastUpdHeightKEY, wxPerLpIntegralLastUpdHeightNew), StringEntry(wxPerLpKEY, toString(wxPerLpX3New))], debug)
266		-	}
267		-
268		-
269		-	func refreshINTEGRALS (lpAssetIdStr,userAddressStr,poolAddressStr,lpDeltaAmount) = {
270		-	let $t01119411316 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
271		-	let wxPerLpIntegralNew = $t01119411316._1
272		-	let poolIntegralSTATE = $t01119411316._2
273		-	let poolDEBUG = $t01119411316._3
274		-	let MULT3 = 1000
275		-	let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
276		-	let stakedByUser = readStaked(stakedByUserKEY)
277		-	let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
278		-	let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
279		-	let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
280		-	let wxToClaimUser = getIntOrZero(this, wxToClaimUserKEY)
281		-	let wxPerLpIntegralUserLastUpdHeightOrZero = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
282		-	let wxPerLpIntegralUserLast = calcWxPerLpIntegralUserLast(toBigInt(stakedByUser), toBigInt(wxPerLpIntegralUserLastUpdHeightOrZero), wxPerLpIntegralNew, wxPerLpIntegralUserLastKEY)
283		-	let MULT11 = (MULT8 * MULT3)
284		-	let wxToClaimUserNew = (toBigInt(wxToClaimUser) + fraction((wxPerLpIntegralNew - wxPerLpIntegralUserLast), toBigInt(stakedByUser), toBigInt(MULT11)))
285		-	let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
286		-	let wxPerLpIntegralUserLastUpdHeightNew = height
287		-	let debug = makeString(["wxToClaimUserNew=", toString(wxToClaimUserNew), "wxPerLpIntegralUserLast=", toString(wxPerLpIntegralUserLast), "stakedByUser=", toString(stakedByUser), "poolDEBUG=", poolDEBUG, "height=", toString(height)], "::")
288		-	$Tuple3(wxToClaimUserNew, (poolIntegralSTATE ++ [StringEntry(wxToClaimUserKEY, toString(wxToClaimUserNew)), IntegerEntry(wxPerLpIntegralUserLastUpdHeightKEY, wxPerLpIntegralUserLastUpdHeightNew), StringEntry(wxPerLpIntegralUserLastKEY, toString(wxPerLpIntegralUserLastNew))]), debug)
289		-	}
290		-
	73	+	let votingEmissionContract = addressFromStringValue(getStringOrFail(keyVotingEmissionContract))
291	74
292	75		func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
293	76		case s: String =>

310	93
311	94
312	95		func mustManager (i) = {
313		-	let pd = throw("~~Permission~~ denied")
	96	+	let pd = throw("permission denied")
314	97		match managerPublicKeyOrUnit() {
315	98		case pk: ByteVector =>
316	99		if ((i.callerPublicKey == pk))

326	109		}
327	110
328	111
	112	+	func asInt (val) = match val {
	113	+	case valInt: Int =>
	114	+	valInt
	115	+	case _ =>
	116	+	throw("failed to cast into Integer")
	117	+	}
	118	+
	119	+
329	120		@Callable(i)
330		-	func constructor (factoryAddressStr) = {
331		-	let checkCaller = mustManager(i)
332		-	if ((checkCaller == checkCaller))
333		-	then [StringEntry(keyFactoryAddress(), factoryAddressStr)]
	121	+	func constructor (assetsStoreContractPrm,boostingContractPrm,emissionContractPrm,factoryContractPrm,userPoolContractPrm,votingEmissionContractPrm,feeAmountPrm,wxAssetIdPrm,votingDurationPrm,usdnAssetIdPrm,finalizeRewardPrm) = {
	122	+	let checks = [mustManager(i), if (isDefined(addressFromString(assetsStoreContractPrm)))
	123	+	then true
	124	+	else throw("Invalid asset_store contract address"), if (isDefined(addressFromString(boostingContractPrm)))
	125	+	then true
	126	+	else throw("Invalid boosting contract address"), if (isDefined(addressFromString(userPoolContractPrm)))
	127	+	then true
	128	+	else throw("Invalid user_pools contract address"), if (isDefined(addressFromString(emissionContractPrm)))
	129	+	then true
	130	+	else throw("Invalid emission contract address"), if (isDefined(addressFromString(factoryContractPrm)))
	131	+	then true
	132	+	else throw("Invalid factory contract address"), if ((feeAmountPrm >= 0))
	133	+	then true
	134	+	else throw("Invalid fee amount"), if ((votingDurationPrm > 0))
	135	+	then true
	136	+	else throw("Invalid voting duration"), if ((finalizeRewardPrm > 0))
	137	+	then true
	138	+	else throw("Invalid finalize reward"), if (isDefined(assetInfo(fromBase58String(wxAssetIdPrm))))
	139	+	then true
	140	+	else throw("Invalid WX asset ID"), if (isDefined(assetInfo(fromBase58String(usdnAssetIdPrm))))
	141	+	then true
	142	+	else throw("Invalid USDN asset ID")]
	143	+	if ((checks == checks))
	144	+	then $Tuple2([StringEntry(keyAssetsStoreContract, assetsStoreContractPrm), StringEntry(keyBoostingContract, boostingContractPrm), StringEntry(keyEmissionContract, emissionContractPrm), StringEntry(keyFactoryContract, factoryContractPrm), StringEntry(keyUserPoolContract, userPoolContractPrm), StringEntry(keyVotingEmissionContract, votingEmissionContractPrm), IntegerEntry(keyFeeAmount, feeAmountPrm), IntegerEntry(keyEpochLength, votingDurationPrm), IntegerEntry(keyFinalizeReward, finalizeRewardPrm), StringEntry(keyWxAssetId, wxAssetIdPrm), StringEntry(keyUsdnAssetId, usdnAssetIdPrm)], unit)
	145	+	else throw("Strict value is not equal to itself.")
	146	+	}
	147	+
	148	+
	149	+
	150	+	@Callable(i)
	151	+	func suggest (amountAssetId,priceAssetId) = {
	152	+	let payment = value(i.payments[0])
	153	+	let info = valueOrErrorMessage(assetInfo(fromBase58String(amountAssetId)), "invalid amountAssetId ID")
	154	+	let checks = [if ((info.issuer == i.caller))
	155	+	then true
	156	+	else throw("asset can only be suggested by its issuer"), if ((info.scripted == false))
	157	+	then true
	158	+	else throw("asset is smart"), if ((toBase58String(value(payment.assetId)) == value(getString(keyWxAssetId))))
	159	+	then true
	160	+	else throw("invalid fee asset"), if ((payment.amount == value(getInteger(keyFeeAmount))))
	161	+	then true
	162	+	else throw("invalid fee amount"), if ((priceAssetId == value(getString(keyUsdnAssetId))))
	163	+	then true
	164	+	else throw("priceAssetId is not USDN"), if ((getInteger(keyInListAssetId(amountAssetId, priceAssetId)) == unit))
	165	+	then true
	166	+	else throw("already in voting list")]
	167	+	if ((checks == checks))
	168	+	then {
	169	+	let ensureActive = match invoke(userPoolContract, "statusREADONLY", [amountAssetId, priceAssetId], nil) {
	170	+	case s: String =>
	171	+	if ((s == "active"))
	172	+	then true
	173	+	else throw("user pool is not active")
	174	+	case _ =>
	175	+	throw("user pool is not active")
	176	+	}
	177	+	if ((ensureActive == ensureActive))
	178	+	then {
	179	+	let ensureAmountAssetVerified = match invoke(assetsStoreContract, "isVerifiedREADONLY", [amountAssetId], nil) {
	180	+	case b: Boolean =>
	181	+	if (b)
	182	+	then true
	183	+	else throw("asset is not verified")
	184	+	case _ =>
	185	+	throw("asset is not verified")
	186	+	}
	187	+	if ((ensureAmountAssetVerified == ensureAmountAssetVerified))
	188	+	then {
	189	+	let burnFeeInv = invoke(emissionContract, "burn", nil, [AttachedPayment(payment.assetId, payment.amount)])
	190	+	if ((burnFeeInv == burnFeeInv))
	191	+	then {
	192	+	let newSuggestIndex = match getInteger(keySuggestIndex(amountAssetId, priceAssetId)) {
	193	+	case int: Int =>
	194	+	(int + 1)
	195	+	case _ =>
	196	+	0
	197	+	}
	198	+	$Tuple2([IntegerEntry(keyInListAssetId(amountAssetId, priceAssetId), newSuggestIndex), IntegerEntry(keyStartHeight(amountAssetId, priceAssetId, newSuggestIndex), height), StringEntry(keyVotingResult(amountAssetId, priceAssetId, newSuggestIndex), totalVotes("0", "0")), IntegerEntry(keySuggestIndex(amountAssetId, priceAssetId), newSuggestIndex)], unit)
	199	+	}
	200	+	else throw("Strict value is not equal to itself.")
	201	+	}
	202	+	else throw("Strict value is not equal to itself.")
	203	+	}
	204	+	else throw("Strict value is not equal to itself.")
	205	+	}
	206	+	else throw("Strict value is not equal to itself.")
	207	+	}
	208	+
	209	+
	210	+
	211	+	@Callable(i)
	212	+	func vote (amountAssetId,priceAssetId,inFavor) = {
	213	+	let suggestIndex = value(getInteger(keyInListAssetId(amountAssetId, priceAssetId)))
	214	+	let votingFinishHeight = (value(getInteger(keyStartHeight(amountAssetId, priceAssetId, suggestIndex))) + value(getInteger(keyEpochLength)))
	215	+	let checks = [if (isDefined(getInteger(keyInListAssetId(amountAssetId, priceAssetId))))
	216	+	then true
	217	+	else throw("the token isn't on the voting list"), if ((votingFinishHeight > height))
	218	+	then true
	219	+	else throw("too late to vote")]
	220	+	if ((checks == checks))
	221	+	then {
	222	+	let gwxAmount = invoke(boostingContract, "getUserGwxAmountAtHeightREADONLY", [toString(i.caller), votingFinishHeight], nil)
	223	+	let notZero = if ((asInt(gwxAmount) > 0))
	224	+	then true
	225	+	else throw("you don't have gwx")
	226	+	if ((notZero == notZero))
	227	+	then {
	228	+	let vote = match getString(keyVote(amountAssetId, priceAssetId, suggestIndex, toString(i.caller))) {
	229	+	case s: String =>
	230	+	let vote = split(s, separator)
	231	+	let voteValue = vote[1]
	232	+	let voteType = vote[2]
	233	+	let isVoteTypeSimilar = if (if ((voteType == "yes"))
	234	+	then (inFavor == true)
	235	+	else false)
	236	+	then true
	237	+	else if ((voteType == "no"))
	238	+	then (inFavor == false)
	239	+	else false
	240	+	let isVoteValueSimilar = if (isVoteTypeSimilar)
	241	+	then (asInt(gwxAmount) == parseIntValue(voteValue))
	242	+	else false
	243	+	let isNewVoteSimilar = if (if (isVoteTypeSimilar)
	244	+	then isVoteValueSimilar
	245	+	else false)
	246	+	then throw("you already voted")
	247	+	else invoke(this, "cancelVote", [amountAssetId, priceAssetId], nil)
	248	+	isNewVoteSimilar
	249	+	case u: Unit =>
	250	+	u
	251	+	case _ =>
	252	+	throw("Match error")
	253	+	}
	254	+	if ((vote == vote))
	255	+	then {
	256	+	let votingResult = split(value(getString(keyVotingResult(amountAssetId, priceAssetId, suggestIndex))), separator)
	257	+	let positiveVotes = votingResult[1]
	258	+	let negativeVotes = votingResult[2]
	259	+	let newPositiveAndNegativeVotes = if (inFavor)
	260	+	then {
	261	+	let newPositiveVotes = (parseIntValue(positiveVotes) + asInt(gwxAmount))
	262	+	[toString(newPositiveVotes), negativeVotes]
	263	+	}
	264	+	else {
	265	+	let newNegativeVotes = (parseIntValue(negativeVotes) + asInt(gwxAmount))
	266	+	[positiveVotes, toString(newNegativeVotes)]
	267	+	}

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let ~~SCALE8~~ = 8
	4	+	let separator = "__"
5	5
6		-	let ~~MULT8~~ = ~~100000000~~
	6	+	let keyFeeAmount = makeString(["%s", "fee"], separator)
7	7
8		-	let ~~SCALE18~~ = 18
	8	+	let keyUsdnAssetId = makeString(["%s", "usdnAssetId"], separator)
9	9
10		-	let ~~MULT18~~ = ~~toBigInt~~(~~1000000000000000000~~)
	10	+	let keyEpochLength = makeString(["%s", "epochLength"], separator)
11	11
12		-	let ~~SEP~~ = "__"
	12	+	let keyFinalizeReward = makeString(["%s", "finalizeReward"], separator)
13	13
14		-	let ~~POOLWEIGHTMULT~~ = ~~MULT8~~
	14	+	let keyWxAssetId = makeString(["%s", "wxAssetId"], separator)
15	15
16		-	let ~~zeroBigInt~~ = ~~toBigInt~~(0)
	16	+	let keyAssetsStoreContract = makeString(["%s", "assetsStoreContract"], separator)
17	17
18		-	let ~~oneBigInt~~ = ~~toBigInt~~(1)
	18	+	let keyUserPoolContract = makeString(["%s", "userPoolContract"], separator)
19	19
20		-	func asAnyList (val) = match val {
21		-	case valAnyLyst: List[Any] =>
22		-	valAnyLyst
23		-	case _ =>
24		-	throw("fail to cast into List[Any]")
25		-	}
	20	+	let keyEmissionContract = makeString(["%s", "emissionContract"], separator)
	21	+
	22	+	let keyBoostingContract = makeString(["%s", "boostingContract"], separator)
	23	+
	24	+	let keyFactoryContract = makeString(["%s", "factoryContract"], separator)
	25	+
	26	+	let keyVotingEmissionContract = makeString(["%s", "votingEmissionContract"], separator)
	27	+
	28	+	func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (key + " is not defined"))
26	29
27	30
28		-	func asInt (val) = match val {
29		-	case valInt: Int =>
30		-	valInt
31		-	case _ =>
32		-	throw("fail to cast into Int")
33		-	}
	31	+	func keyInListAssetId (amountAssetId,priceAssetId) = makeString(["%s%s%s", "inList", amountAssetId, priceAssetId], separator)
34	32
35	33
36		-	func asString (val) = match val {
37		-	case valStr: String =>
38		-	valStr
39		-	case _ =>
40		-	throw("fail to cast into Int")
41		-	}
	34	+	func keySuggestIndex (amountAssetId,priceAssetId) = makeString(["%s%s%s", "suggestIndex", amountAssetId, priceAssetId], separator)
42	35
43	36
44		-	func asByteVector (val) = match val {
45		-	case valBin: ByteVector =>
46		-	valBin
47		-	case _ =>
48		-	throw("fail to cast into Int")
49		-	}
	37	+	func keyStartHeight (amountAssetId,priceAssetId,suggestIndex) = makeString(["%s%s%s%d", "startHeight", amountAssetId, priceAssetId, toString(suggestIndex)], separator)
50	38
51	39
52		-	func ~~getStringOrFail~~ (~~address~~,~~key~~) = ~~valueOrErrorMessage~~(~~getString(address~~, ~~key)~~, (~~("mandatory this." + key~~) ~~+ " is not defined"))~~
	40	+	func keyVotingResult (amountAssetId,priceAssetId,suggestIndex) = makeString(["%s%s%s%d", "votingResult", amountAssetId, priceAssetId, toString(suggestIndex)], separator)
53	41
54	42
55		-	func ~~getStringByAddressOrFail~~ (~~address~~,~~key~~) = ~~valueOrErrorMessage~~(~~getString(address~~, ~~key)~~, ~~(((("mandatory " + toString(address~~)~~) + ".") + key) + " is not defined"))~~
	43	+	func totalVotes (totalYes,totalNo) = makeString(["%d%d", totalYes, totalNo], separator)
56	44
57	45
58		-	func ~~getIntOrZero~~ (~~address~~,~~key~~) = ~~valueOrElse~~(~~getInteger(address~~, ~~key~~), 0)
	46	+	func keyVote (amountAssetId,priceAssetId,suggestIndex,voterAddress) = makeString(["%s%s%s%d%s", "vote", amountAssetId, priceAssetId, toString(suggestIndex), voterAddress], separator)
59	47
60	48
61		-	func getIntOrDefault (address,key,defaultVal) = valueOrElse(getInteger(address, key), defaultVal)
62		-
63		-
64		-	func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), (("mandatory this." + key) + " is not defined"))
65		-
66		-
67		-	func toX18 (origVal,origScaleMult) = fraction(toBigInt(origVal), MULT18, toBigInt(origScaleMult))
68		-
69		-
70		-	func fromX18 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), MULT18))
71		-
72		-
73		-	func keyFactoryAddress () = "%s%s__config__factoryAddress"
74		-
75		-
76		-	let IdxFactoryCfgStakingDapp = 1
77		-
78		-	let IdxFactoryCfgBoostingDapp = 2
79		-
80		-	let IdxFactoryCfgIdoDapp = 3
81		-
82		-	let IdxFactoryCfgTeamDapp = 4
83		-
84		-	let IdxFactoryCfgEmissionDapp = 5
85		-
86		-	let IdxFactoryCfgRestDapp = 6
87		-
88		-	let IdxFactoryCfgSlippageDapp = 7
89		-
90		-	func keyFactoryCfg () = "%s__factoryConfig"
	49	+	func keyVoteValue (gwxAmount,vote) = {
	50	+	let key = if (vote)
	51	+	then makeString(["%d%s", gwxAmount, "yes"], separator)
	52	+	else makeString(["%d%s", gwxAmount, "no"], separator)
	53	+	key
	54	+	}
91	55
92	56
93	57		func keyManagerPublicKey () = "%s__managerPublicKey"
94	58
95	59
96	60		func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
97	61
98	62
99		-	~~func keyStablePoolAddonAddr ()~~ = ~~"%s__stablePoolAddonAddr"~~
	63	+	let assetsStoreContract = addressFromStringValue(getStringOrFail(keyAssetsStoreContract))
100	64
	65	+	let boostingContract = addressFromStringValue(getStringOrFail(keyBoostingContract))
101	66
102		-	~~func keyFactoryLp2AssetsMapping (lpAssetStr)~~ = ~~makeString~~(~~["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP~~)
	67	+	let emissionContract = addressFromStringValue(getStringOrFail(keyEmissionContract))
103	68
	69	+	let factoryContract = addressFromStringValue(getStringOrFail(keyFactoryContract))
104	70
105		-	~~func keyFactoryLpList ()~~ = ~~"%s__lpTokensList"~~
	71	+	let userPoolContract = addressFromStringValue(getStringOrFail(keyUserPoolContract))
106	72
107		-
108		-	func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
109		-
110		-
111		-	func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
112		-
113		-
114		-	func readLpList (factory) = split(valueOrElse(getString(factory, keyFactoryLpList()), ""), SEP)
115		-
116		-
117		-	func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
118		-
119		-
120		-	func getBoostingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgBoostingDapp])
121		-
122		-
123		-	func getEmissionAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgEmissionDapp])
124		-
125		-
126		-	func getStakingAddressOrFail (factoryCfg) = addressFromStringValue(factoryCfg[IdxFactoryCfgStakingDapp])
127		-
128		-
129		-	func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
130		-
131		-
132		-	func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
133		-
134		-
135		-	func keyEmissionStartBlock () = "%s%s__emission__startBlock"
136		-
137		-
138		-	func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
139		-
140		-
141		-	func keyEmissionEndBlock () = "%s%s__emission__endBlock"
142		-
143		-
144		-	func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
145		-
146		-
147		-	func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
148		-
149		-
150		-	func keyClaimedByUser (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimed", userAddressStr, lpAssetIdStr], SEP)
151		-
152		-
153		-	func keyClaimedByUserMinReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedMinReward", userAddressStr, lpAssetIdStr], SEP)
154		-
155		-
156		-	func keyClaimedByUserBoostReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedBoostReward", userAddressStr, lpAssetIdStr], SEP)
157		-
158		-
159		-	func keyClaimedTotal (lpAssetIdStr) = makeString(["%s%s%s__claimed", "total", lpAssetIdStr], SEP)
160		-
161		-
162		-	func readStaked (key) = valueOrElse(getInteger(this, key), 0)
163		-
164		-
165		-	func keyLastTotalLpBalance (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "bal"], SEP)
166		-
167		-
168		-	func keyLastUserLpBalance (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "bal"], SEP)
169		-
170		-
171		-	func keyTotalLpBalanceIntegral (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "balINT"], SEP)
172		-
173		-
174		-	func keyUserLpBalanceIntegral (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "balINT"], SEP)
175		-
176		-
177		-	func keyTotalLpBalanceIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s", lpAssetId, "total", "lastUpd"], SEP)
178		-
179		-
180		-	func keyUserLpBalanceIntegralLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s", lpAssetId, userAddress, "lastUpd"], SEP)
181		-
182		-
183		-	func keyWxPerLpIntegral (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpInt"], SEP)
184		-
185		-
186		-	func keyWxPerLpIntegralLastUpdHeight (lpAssetId) = makeString(["%s%s%s%s", lpAssetId, "common", "lpIntH"], SEP)
187		-
188		-
189		-	func keyWxToClaimUser (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpInt"], SEP)
190		-
191		-
192		-	func keyWxPerLpIntegralUserLastUpdHeight (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "lpIntH"], SEP)
193		-
194		-
195		-	func keyWxPerLp (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLp"], SEP)
196		-
197		-
198		-	func keyWxPerLpX18 (lpAssetId) = makeString(["%s", lpAssetId, "wxPerLpX18"], SEP)
199		-
200		-
201		-	func keyWxPerLpIntegralUserLast (lpAssetId,userAddress) = makeString(["%s%s%s%s", lpAssetId, userAddress, "uIntL"], SEP)
202		-
203		-
204		-	func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
205		-
206		-
207		-	func formatHistoryRecord (userAddress,lpAssetId,type,amount) = makeString(["%s%s%s%d%d%d", userAddress, lpAssetId, type, toString(height), toString(lastBlock.timestamp), toString(amount)], SEP)
208		-
209		-
210		-	func OperationHistoryEntry (type,userAddress,lpAssetId,amount,txId) = StringEntry(keyOperationHistoryRecord(type, userAddress, toBase58String(txId)), formatHistoryRecord(userAddress, lpAssetId, type, amount))
211		-
212		-
213		-	let factoryAddress = getStringOrFail(this, keyFactoryAddress())
214		-
215		-	let factoryContract = addressFromStringValue(factoryAddress)
216		-
217		-	let factoryCfg = readFactoryCfgOrFail(factoryContract)
218		-
219		-	let emissionContract = getEmissionAddressOrFail(factoryCfg)
220		-
221		-	let boostingContract = getBoostingAddressOrFail(factoryCfg)
222		-
223		-	func calcWxPerLpIntegralUserLast (stakedByUser,wxPerLpIntegralUserLastUpdHeightOrZero,wxPerLpIntegralNew,wxPerLpIntegralUserLastKEY) = if (if ((wxPerLpIntegralUserLastUpdHeightOrZero == zeroBigInt))
224		-	then (stakedByUser > zeroBigInt)
225		-	else false)
226		-	then zeroBigInt
227		-	else if ((stakedByUser == zeroBigInt))
228		-	then wxPerLpIntegralNew
229		-	else if (if ((wxPerLpIntegralUserLastUpdHeightOrZero > zeroBigInt))
230		-	then (stakedByUser > zeroBigInt)
231		-	else false)
232		-	then value(parseBigInt(getStringOrFail(this, wxPerLpIntegralUserLastKEY)))
233		-	else throw("calcWxPerLpIntegralUserLast: unexpected state")
234		-
235		-
236		-	func refreshPoolINTEGRALS (lpAssetIdStr,poolAddressStr,lpDeltaAmount) = {
237		-	let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
238		-	let stakedTotal = toBigInt(readStaked(stakedTotalKEY))
239		-	let nonZeroStakedTotal = if ((stakedTotal == zeroBigInt))
240		-	then oneBigInt
241		-	else stakedTotal
242		-	let poolWeight = getIntegerValue(factoryContract, keyFactoryPoolWeight(poolAddressStr))
243		-	let emissionStartBlock = getIntOrFail(emissionContract, keyEmissionStartBlock())
244		-	let MULT3 = 1000
245		-	let wxEmissionPerBlockX3 = (getIntOrFail(emissionContract, keyEmissionRatePerBlockCurrent()) * MULT3)
246		-	let poolWxEmissionPerBlockX3 = fraction(wxEmissionPerBlockX3, poolWeight, (POOLWEIGHTMULT * 3))
247		-	let wxPerLpIntegralKEY = keyWxPerLpIntegral(lpAssetIdStr)
248		-	let wxPerLpIntegralLastUpdHeightKEY = keyWxPerLpIntegralLastUpdHeight(lpAssetIdStr)
249		-	let wxPerLpKEY = keyWxPerLp(lpAssetIdStr)
250		-	let wxPerLpIntegralLastUpdHeight = getIntOrDefault(this, wxPerLpIntegralLastUpdHeightKEY, emissionStartBlock)
251		-	let wxPerLpIntegral = getIntOrZero(this, wxPerLpIntegralKEY)
252		-	let wxPerLpOrZeroX3 = 0
253		-	let dh = max([(height - wxPerLpIntegralLastUpdHeight), 0])
254		-	let wxPerLpX3 = if ((wxPerLpOrZeroX3 != 0))
255		-	then toBigInt(wxPerLpOrZeroX3)
256		-	else fraction(toBigInt(poolWxEmissionPerBlockX3), toBigInt(MULT8), nonZeroStakedTotal)
257		-	let stakedTotalNew = (stakedTotal + toBigInt(lpDeltaAmount))
258		-	let nonZeroStakedTotalNew = if ((stakedTotalNew == zeroBigInt))
259		-	then oneBigInt
260		-	else stakedTotalNew
261		-	let wxPerLpIntegralNew = (toBigInt(wxPerLpIntegral) + (wxPerLpX3 * toBigInt(dh)))
262		-	let wxPerLpX3New = (toBigInt(poolWxEmissionPerBlockX3) / nonZeroStakedTotalNew)
263		-	let wxPerLpIntegralLastUpdHeightNew = height
264		-	let debug = makeString(["wxPerLpIntegralNew=", toString(wxPerLpIntegralNew), "dh=", toString(dh), "wxPerLpX3=", toString(wxPerLpX3), "stakedTotal=", toString(stakedTotal), "poolWxEmissionPerBlockX3=", toString(poolWxEmissionPerBlockX3), "wxEmissionPerBlockX3=", toString(wxEmissionPerBlockX3), "poolWeight=", toString(poolWeight)], "::")
265		-	$Tuple3(wxPerLpIntegralNew, [StringEntry(wxPerLpIntegralKEY, toString(wxPerLpIntegralNew)), IntegerEntry(wxPerLpIntegralLastUpdHeightKEY, wxPerLpIntegralLastUpdHeightNew), StringEntry(wxPerLpKEY, toString(wxPerLpX3New))], debug)
266		-	}
267		-
268		-
269		-	func refreshINTEGRALS (lpAssetIdStr,userAddressStr,poolAddressStr,lpDeltaAmount) = {
270		-	let $t01119411316 = refreshPoolINTEGRALS(lpAssetIdStr, poolAddressStr, lpDeltaAmount)
271		-	let wxPerLpIntegralNew = $t01119411316._1
272		-	let poolIntegralSTATE = $t01119411316._2
273		-	let poolDEBUG = $t01119411316._3
274		-	let MULT3 = 1000
275		-	let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
276		-	let stakedByUser = readStaked(stakedByUserKEY)
277		-	let wxToClaimUserKEY = keyWxToClaimUser(lpAssetIdStr, userAddressStr)
278		-	let wxPerLpIntegralUserLastUpdHeightKEY = keyWxPerLpIntegralUserLastUpdHeight(lpAssetIdStr, userAddressStr)
279		-	let wxPerLpIntegralUserLastKEY = keyWxPerLpIntegralUserLast(lpAssetIdStr, userAddressStr)
280		-	let wxToClaimUser = getIntOrZero(this, wxToClaimUserKEY)
281		-	let wxPerLpIntegralUserLastUpdHeightOrZero = getIntOrZero(this, wxPerLpIntegralUserLastUpdHeightKEY)
282		-	let wxPerLpIntegralUserLast = calcWxPerLpIntegralUserLast(toBigInt(stakedByUser), toBigInt(wxPerLpIntegralUserLastUpdHeightOrZero), wxPerLpIntegralNew, wxPerLpIntegralUserLastKEY)
283		-	let MULT11 = (MULT8 * MULT3)
284		-	let wxToClaimUserNew = (toBigInt(wxToClaimUser) + fraction((wxPerLpIntegralNew - wxPerLpIntegralUserLast), toBigInt(stakedByUser), toBigInt(MULT11)))
285		-	let wxPerLpIntegralUserLastNew = wxPerLpIntegralNew
286		-	let wxPerLpIntegralUserLastUpdHeightNew = height
287		-	let debug = makeString(["wxToClaimUserNew=", toString(wxToClaimUserNew), "wxPerLpIntegralUserLast=", toString(wxPerLpIntegralUserLast), "stakedByUser=", toString(stakedByUser), "poolDEBUG=", poolDEBUG, "height=", toString(height)], "::")
288		-	$Tuple3(wxToClaimUserNew, (poolIntegralSTATE ++ [StringEntry(wxToClaimUserKEY, toString(wxToClaimUserNew)), IntegerEntry(wxPerLpIntegralUserLastUpdHeightKEY, wxPerLpIntegralUserLastUpdHeightNew), StringEntry(wxPerLpIntegralUserLastKEY, toString(wxPerLpIntegralUserLastNew))]), debug)
289		-	}
290		-
	73	+	let votingEmissionContract = addressFromStringValue(getStringOrFail(keyVotingEmissionContract))
291	74
292	75		func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
293	76		case s: String =>
294	77		fromBase58String(s)
295	78		case _: Unit =>
296	79		unit
297	80		case _ =>
298	81		throw("Match error")
299	82		}
300	83
301	84
302	85		func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
303	86		case s: String =>
304	87		fromBase58String(s)
305	88		case _: Unit =>
306	89		unit
307	90		case _ =>
308	91		throw("Match error")
309	92		}
310	93
311	94
312	95		func mustManager (i) = {
313		-	let pd = throw("~~Permission~~ denied")
	96	+	let pd = throw("permission denied")
314	97		match managerPublicKeyOrUnit() {
315	98		case pk: ByteVector =>
316	99		if ((i.callerPublicKey == pk))
317	100		then true
318	101		else pd
319	102		case _: Unit =>
320	103		if ((i.caller == this))
321	104		then true
322	105		else pd
323	106		case _ =>
324	107		throw("Match error")
325	108		}
326	109		}
327	110
328	111
	112	+	func asInt (val) = match val {
	113	+	case valInt: Int =>
	114	+	valInt
	115	+	case _ =>
	116	+	throw("failed to cast into Integer")
	117	+	}
	118	+
	119	+
329	120		@Callable(i)
330		-	func constructor (factoryAddressStr) = {
331		-	let checkCaller = mustManager(i)
332		-	if ((checkCaller == checkCaller))
333		-	then [StringEntry(keyFactoryAddress(), factoryAddressStr)]
	121	+	func constructor (assetsStoreContractPrm,boostingContractPrm,emissionContractPrm,factoryContractPrm,userPoolContractPrm,votingEmissionContractPrm,feeAmountPrm,wxAssetIdPrm,votingDurationPrm,usdnAssetIdPrm,finalizeRewardPrm) = {
	122	+	let checks = [mustManager(i), if (isDefined(addressFromString(assetsStoreContractPrm)))
	123	+	then true
	124	+	else throw("Invalid asset_store contract address"), if (isDefined(addressFromString(boostingContractPrm)))
	125	+	then true
	126	+	else throw("Invalid boosting contract address"), if (isDefined(addressFromString(userPoolContractPrm)))
	127	+	then true
	128	+	else throw("Invalid user_pools contract address"), if (isDefined(addressFromString(emissionContractPrm)))
	129	+	then true
	130	+	else throw("Invalid emission contract address"), if (isDefined(addressFromString(factoryContractPrm)))
	131	+	then true
	132	+	else throw("Invalid factory contract address"), if ((feeAmountPrm >= 0))
	133	+	then true
	134	+	else throw("Invalid fee amount"), if ((votingDurationPrm > 0))
	135	+	then true
	136	+	else throw("Invalid voting duration"), if ((finalizeRewardPrm > 0))
	137	+	then true
	138	+	else throw("Invalid finalize reward"), if (isDefined(assetInfo(fromBase58String(wxAssetIdPrm))))
	139	+	then true
	140	+	else throw("Invalid WX asset ID"), if (isDefined(assetInfo(fromBase58String(usdnAssetIdPrm))))
	141	+	then true
	142	+	else throw("Invalid USDN asset ID")]
	143	+	if ((checks == checks))
	144	+	then $Tuple2([StringEntry(keyAssetsStoreContract, assetsStoreContractPrm), StringEntry(keyBoostingContract, boostingContractPrm), StringEntry(keyEmissionContract, emissionContractPrm), StringEntry(keyFactoryContract, factoryContractPrm), StringEntry(keyUserPoolContract, userPoolContractPrm), StringEntry(keyVotingEmissionContract, votingEmissionContractPrm), IntegerEntry(keyFeeAmount, feeAmountPrm), IntegerEntry(keyEpochLength, votingDurationPrm), IntegerEntry(keyFinalizeReward, finalizeRewardPrm), StringEntry(keyWxAssetId, wxAssetIdPrm), StringEntry(keyUsdnAssetId, usdnAssetIdPrm)], unit)
	145	+	else throw("Strict value is not equal to itself.")
	146	+	}
	147	+
	148	+
	149	+
	150	+	@Callable(i)
	151	+	func suggest (amountAssetId,priceAssetId) = {
	152	+	let payment = value(i.payments[0])
	153	+	let info = valueOrErrorMessage(assetInfo(fromBase58String(amountAssetId)), "invalid amountAssetId ID")
	154	+	let checks = [if ((info.issuer == i.caller))
	155	+	then true
	156	+	else throw("asset can only be suggested by its issuer"), if ((info.scripted == false))
	157	+	then true
	158	+	else throw("asset is smart"), if ((toBase58String(value(payment.assetId)) == value(getString(keyWxAssetId))))
	159	+	then true
	160	+	else throw("invalid fee asset"), if ((payment.amount == value(getInteger(keyFeeAmount))))
	161	+	then true
	162	+	else throw("invalid fee amount"), if ((priceAssetId == value(getString(keyUsdnAssetId))))
	163	+	then true
	164	+	else throw("priceAssetId is not USDN"), if ((getInteger(keyInListAssetId(amountAssetId, priceAssetId)) == unit))
	165	+	then true
	166	+	else throw("already in voting list")]
	167	+	if ((checks == checks))
	168	+	then {
	169	+	let ensureActive = match invoke(userPoolContract, "statusREADONLY", [amountAssetId, priceAssetId], nil) {
	170	+	case s: String =>
	171	+	if ((s == "active"))
	172	+	then true
	173	+	else throw("user pool is not active")
	174	+	case _ =>
	175	+	throw("user pool is not active")
	176	+	}
	177	+	if ((ensureActive == ensureActive))
	178	+	then {
	179	+	let ensureAmountAssetVerified = match invoke(assetsStoreContract, "isVerifiedREADONLY", [amountAssetId], nil) {
	180	+	case b: Boolean =>
	181	+	if (b)
	182	+	then true
	183	+	else throw("asset is not verified")
	184	+	case _ =>
	185	+	throw("asset is not verified")
	186	+	}
	187	+	if ((ensureAmountAssetVerified == ensureAmountAssetVerified))
	188	+	then {
	189	+	let burnFeeInv = invoke(emissionContract, "burn", nil, [AttachedPayment(payment.assetId, payment.amount)])
	190	+	if ((burnFeeInv == burnFeeInv))
	191	+	then {
	192	+	let newSuggestIndex = match getInteger(keySuggestIndex(amountAssetId, priceAssetId)) {
	193	+	case int: Int =>
	194	+	(int + 1)
	195	+	case _ =>
	196	+	0
	197	+	}
	198	+	$Tuple2([IntegerEntry(keyInListAssetId(amountAssetId, priceAssetId), newSuggestIndex), IntegerEntry(keyStartHeight(amountAssetId, priceAssetId, newSuggestIndex), height), StringEntry(keyVotingResult(amountAssetId, priceAssetId, newSuggestIndex), totalVotes("0", "0")), IntegerEntry(keySuggestIndex(amountAssetId, priceAssetId), newSuggestIndex)], unit)
	199	+	}
	200	+	else throw("Strict value is not equal to itself.")
	201	+	}
	202	+	else throw("Strict value is not equal to itself.")
	203	+	}
	204	+	else throw("Strict value is not equal to itself.")
	205	+	}
	206	+	else throw("Strict value is not equal to itself.")
	207	+	}
	208	+
	209	+
	210	+
	211	+	@Callable(i)
	212	+	func vote (amountAssetId,priceAssetId,inFavor) = {
	213	+	let suggestIndex = value(getInteger(keyInListAssetId(amountAssetId, priceAssetId)))
	214	+	let votingFinishHeight = (value(getInteger(keyStartHeight(amountAssetId, priceAssetId, suggestIndex))) + value(getInteger(keyEpochLength)))
	215	+	let checks = [if (isDefined(getInteger(keyInListAssetId(amountAssetId, priceAssetId))))
	216	+	then true
	217	+	else throw("the token isn't on the voting list"), if ((votingFinishHeight > height))
	218	+	then true
	219	+	else throw("too late to vote")]
	220	+	if ((checks == checks))
	221	+	then {
	222	+	let gwxAmount = invoke(boostingContract, "getUserGwxAmountAtHeightREADONLY", [toString(i.caller), votingFinishHeight], nil)
	223	+	let notZero = if ((asInt(gwxAmount) > 0))
	224	+	then true
	225	+	else throw("you don't have gwx")
	226	+	if ((notZero == notZero))
	227	+	then {
	228	+	let vote = match getString(keyVote(amountAssetId, priceAssetId, suggestIndex, toString(i.caller))) {
	229	+	case s: String =>
	230	+	let vote = split(s, separator)
	231	+	let voteValue = vote[1]
	232	+	let voteType = vote[2]
	233	+	let isVoteTypeSimilar = if (if ((voteType == "yes"))
	234	+	then (inFavor == true)
	235	+	else false)
	236	+	then true
	237	+	else if ((voteType == "no"))
	238	+	then (inFavor == false)
	239	+	else false
	240	+	let isVoteValueSimilar = if (isVoteTypeSimilar)
	241	+	then (asInt(gwxAmount) == parseIntValue(voteValue))
	242	+	else false
	243	+	let isNewVoteSimilar = if (if (isVoteTypeSimilar)

github/deemru/w8io/03bedc9 
74.82 ms ◑