w8 · tx · FS4···zrJ

tx · FS495pyJvMdMScunPNMYCdHUojQAUr3PsMsjXjAuxzrJ

3P48GkhK94aDgsavHhhsHGcYwcuLYQenWk4:  -0.01000000 Waves

2022.02.23 11:30 [3001149] smart account 3P48GkhK94aDgsavHhhsHGcYwcuLYQenWk4 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FS495pyJvMdMScunPNMYCdHUojQAUr3PsMsjXjAuxzrJ",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1645605064562,
    "version": 2,
    "chainId": 87,
    "sender": "3P48GkhK94aDgsavHhhsHGcYwcuLYQenWk4",
    "senderPublicKey": "5YTg8eWEsVyrktNMvV4MoXLaMQKdDPenRkUqyeFnDRZU",
    "proofs": [
        "5Z8gp7EykJDka1ziHkPasATpzLmEvBGa1iNvMrU6fKUfzJTzkkvReVdiXU9gagLgiSGT5yhwcewopYSNaYbAjQrC"
    ],
    "script": "base64:AAIFAAAAAAAAABYIAhIAEgQKAgEEEgMKAQQSAwoBCBIAAAAAGwAAAAALa2V5TUFjY1BLZXkCAAAACW1hc3Rlcl9wawEAAAAMZ2V0Q0ZBZGRyZXNzAAAAAAkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwIAAAAKQ0ZfQUREUkVTUwAAAAAIbUFjY1BLZXkJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAADGdldENGQWRkcmVzcwAAAAAFAAAAC2tleU1BY2NQS2V5AAAAAAhtQWNjQWRkcgkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQUAAAAIbUFjY1BLZXkAAAAAEGtleVRvdGFsQ29tcG91bmQCAAAADnRvdGFsX2NvbXBvdW5kAAAAABFrZXlTdGFrZWRDb21wb3VuZAIAAAAPc3Rha2VkX2NvbXBvdW5kAAAAAAlrZXlMYXN0VlACAAAAEmxhc3RfdmlydHVhbF9wcmljZQAAAAAHVlBTY2FsZQAAAAAABfXhAAEAAAAVa2V5U3Rha2VkQ29tcG91bmRVc2VyAAAAAQAAAAR1c2VyCQABLAAAAAIJAAEsAAAAAgkABCUAAAABBQAAAAR1c2VyAgAAAAFfBQAAABFrZXlTdGFrZWRDb21wb3VuZAEAAAAQY2FsY1ZpcnR1YWxQcmljZQAAAAIAAAALdG90YWxTdGFrZWQAAAAFdG90YWwDCQAAAAAAAAIFAAAABXRvdGFsAAAAAAAAAAAAAAAAAAAAAAABAwkAAAAAAAACBQAAAAt0b3RhbFN0YWtlZAAAAAAAAAAAAAAAAAAAAAAAAQkAAGsAAAADBQAAAAV0b3RhbAUAAAAHVlBTY2FsZQUAAAALdG90YWxTdGFrZWQAAAAABVNjYWxlAAAAAAAF9eEAAQAAAA9rZXlTdGFrZWRBbW91bnQAAAABAAAAB2FkZHJlc3MJAAEsAAAAAgkABCUAAAABBQAAAAdhZGRyZXNzAgAAAAxfZmFybV9zdGFrZWQBAAAAFGtleUxhc3RDaGVja0ludGVyZXN0AAAAAQAAAAdhZGRyZXNzCQABLAAAAAIJAAQlAAAAAQUAAAAHYWRkcmVzcwIAAAATX2xhc3RDaGVja19pbnRlcmVzdAEAAAANa2V5RWdnQ2xhaW1lZAAAAAEAAAAHYWRkcmVzcwkAASwAAAACCQAEJQAAAAEFAAAAB2FkZHJlc3MCAAAACF9jbGFpbWVkAAAAABVrZXlHbG9iYWxMYXN0SW50ZXJlc3QCAAAAGWdsb2JhbF9sYXN0Q2hlY2tfaW50ZXJlc3QAAAAAD2tleUdsb2JhbFN0YWtlZAIAAAANZ2xvYmFsX3N0YWtlZAAAAAASa2V5R2xvYmFsRWdnRWFybmVkAgAAAA9nbG9iYWxfZWFybmluZ3MAAAAAEmtMb2NrZWRJbnZlc3RtZW50cwIAAAASbG9ja2VkX2ludmVzdG1lbnRzAQAAABZpc0NvbGxlY3RpdmVGYXJtTG9ja2VkAAAAAAQAAAAHJG1hdGNoMAkABBsAAAACCQEAAAAMZ2V0Q0ZBZGRyZXNzAAAAAAUAAAASa0xvY2tlZEludmVzdG1lbnRzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAdCb29sZWFuBAAAAAFiBQAAAAckbWF0Y2gwBQAAAAFiBwEAAAAIZ2V0RWdnSWQAAAAACQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAACG1BY2NBZGRyAgAAAAxFR0dfQVNTRVRfSUQBAAAADHNldENGQWRkcmVzcwAAAAEAAAAHYWRkcmVzcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAApDRl9BRERSRVNTBQAAAAdhZGRyZXNzBQAAAANuaWwBAAAAD2dldFNoYXJlQXNzZXRJZAAAAAAJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgkBAAAADGdldENGQWRkcmVzcwAAAAACAAAADlNIQVJFX0FTU0VUX0lEAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQAAAANrZXkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWIFAAAAByRtYXRjaDAFAAAAAWIAAAAAAAAAAAABAAAADHRyeUdldFN0cmluZwAAAAEAAAADa2V5BAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAgAAAAABAAAAEmNsYWltU3Rha2luZ1Jlc3VsdAAAAAEAAAAHYWRkcmVzcwQAAAAPY3VycmVudEludGVyZXN0CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEFAAAAFWtleUdsb2JhbExhc3RJbnRlcmVzdAQAAAARbGFzdENoZWNrSW50ZXJlc3QJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkBAAAAFGtleUxhc3RDaGVja0ludGVyZXN0AAAAAQUAAAAHYWRkcmVzcwQAAAAMc3Rha2VkQW1vdW50CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAQAAAA9rZXlTdGFrZWRBbW91bnQAAAABBQAAAAdhZGRyZXNzBAAAAAZyZXdhcmQDCQAAZgAAAAIFAAAAEWxhc3RDaGVja0ludGVyZXN0AAAAAAAAAAAACQAAawAAAAMJAABlAAAAAgUAAAAPY3VycmVudEludGVyZXN0BQAAABFsYXN0Q2hlY2tJbnRlcmVzdAUAAAAMc3Rha2VkQW1vdW50BQAAAAVTY2FsZQAAAAAAAAAAAAQAAAAIdHJhbnNmZXIDCQAAZgAAAAIFAAAABnJld2FyZAAAAAAAAAAAAAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAdhZGRyZXNzBQAAAAZyZXdhcmQJAQAAAAhnZXRFZ2dJZAAAAAAFAAAAA25pbAUAAAADbmlsCQAETgAAAAIFAAAACHRyYW5zZmVyCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAUa2V5TGFzdENoZWNrSW50ZXJlc3QAAAABBQAAAAdhZGRyZXNzBQAAAA9jdXJyZW50SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAA1rZXlFZ2dDbGFpbWVkAAAAAQUAAAAHYWRkcmVzcwkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAQAAAA1rZXlFZ2dDbGFpbWVkAAAAAQUAAAAHYWRkcmVzcwUAAAAGcmV3YXJkBQAAAANuaWwBAAAAE2hhbmRsZUNvbXBvdW5kVG9wVXAAAAABAAAABmFtb3VudAQAAAAFdG90YWwJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABBQAAABBrZXlUb3RhbENvbXBvdW5kBQAAAAZhbW91bnQEAAAABnN0YWtlZAkBAAAADXRyeUdldEludGVnZXIAAAABBQAAABFrZXlTdGFrZWRDb21wb3VuZAQAAAACdnAJAQAAABBjYWxjVmlydHVhbFByaWNlAAAAAgUAAAAGc3Rha2VkBQAAAAV0b3RhbAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAQa2V5VG90YWxDb21wb3VuZAUAAAAFdG90YWwJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAACWtleUxhc3RWUAUAAAACdnAFAAAAA25pbAEAAAASaGFuZGxlU3Rha2luZ1RvcFVwAAAAAQAAAAZhbW91bnQEAAAAD2N1cnJlbnRJbnRlcmVzdAkBAAAADXRyeUdldEludGVnZXIAAAABBQAAABVrZXlHbG9iYWxMYXN0SW50ZXJlc3QEAAAAEXRvdGFsU3Rha2VkQW1vdW50CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEFAAAAD2tleUdsb2JhbFN0YWtlZAQAAAANaW50ZXJlc3REZWx0YQMJAABmAAAAAgUAAAARdG90YWxTdGFrZWRBbW91bnQAAAAAAAAAAAAJAABrAAAAAwUAAAAGYW1vdW50BQAAAAVTY2FsZQUAAAARdG90YWxTdGFrZWRBbW91bnQAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAEmtleUdsb2JhbEVnZ0Vhcm5lZAkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEFAAAAEmtleUdsb2JhbEVnZ0Vhcm5lZAUAAAAGYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABVrZXlHbG9iYWxMYXN0SW50ZXJlc3QJAABkAAAAAgUAAAAPY3VycmVudEludGVyZXN0BQAAAA1pbnRlcmVzdERlbHRhBQAAAANuaWwAAAAFAAAAAWkBAAAAC3RvcFVwUmV3YXJkAAAAAAQAAAAKZWdnQXNzZXRJZAkBAAAACGdldEVnZ0lkAAAAAAQAAAAMc2hhcmVUb2tlbklkCQEAAAAPZ2V0U2hhcmVBc3NldElkAAAAAAMJAQAAAAIhPQAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQFAAAACmVnZ0Fzc2V0SWQJAAACAAAAAQIAAAAqV3JvbmcgYXNzZXRJZCwgZmlyc3QgcGF5bWVudCBzaG91bGQgYmUgRUdHAwkBAAAAAiE9AAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEAAAAHYXNzZXRJZAUAAAAMc2hhcmVUb2tlbklkCQAAAgAAAAECAAAAM1dyb25nIGFzc2V0SWQsIHNlY29uZCBwYXltZW50IHNob3VsZCBiZSBmYXJtIHRva2VucwQAAAAQcmVzSGFuZGxlU3Rha2luZwkBAAAAEmhhbmRsZVN0YWtpbmdUb3BVcAAAAAEICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAQAAAARcmVzSGFuZGxlQ29tcG91bmQJAQAAABNoYW5kbGVDb21wb3VuZFRvcFVwAAAAAQgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEAAAAGYW1vdW50CQAFFAAAAAIJAAROAAAAAgUAAAARcmVzSGFuZGxlQ29tcG91bmQFAAAAEHJlc0hhbmRsZVN0YWtpbmcGAAAAAWkBAAAAEndpdGhkcmF3RmFybVRva2VucwAAAAIAAAAGYW1vdW50AAAACGNvbXBvdW5kAwkAAGYAAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAACQAAAgAAAAECAAAAGVBsZWFzZSBkb24ndCBhZGQgcGF5bWVudHMEAAAADHNoYXJlVG9rZW5JZAkBAAAAD2dldFNoYXJlQXNzZXRJZAAAAAADBQAAAAhjb21wb3VuZAQAAAAGc3Rha2VkCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEFAAAAEWtleVN0YWtlZENvbXBvdW5kBAAAAAV0b3RhbAkBAAAADXRyeUdldEludGVnZXIAAAABBQAAABBrZXlUb3RhbENvbXBvdW5kBAAAAAJ2cAkBAAAAEGNhbGNWaXJ0dWFsUHJpY2UAAAACBQAAAAZzdGFrZWQFAAAABXRvdGFsBAAAABJrZXlTdGFrZWRDb21wb3VuZFUJAQAAABVrZXlTdGFrZWRDb21wb3VuZFVzZXIAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAADnBlcnNvbmFsU3Rha2VkCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEFAAAAEmtleVN0YWtlZENvbXBvdW5kVQQAAAAJdmlydHVhbFdkAwkAAAAAAAACBQAAAAZhbW91bnQA//////////8FAAAADnBlcnNvbmFsU3Rha2VkCQAAawAAAAMFAAAABmFtb3VudAUAAAAHVlBTY2FsZQUAAAACdnAEAAAACGFtb3VudFdkAwkAAAAAAAACBQAAAAZhbW91bnQA//////////8JAABrAAAAAwUAAAAJdmlydHVhbFdkBQAAAAJ2cAUAAAAHVlBTY2FsZQUAAAAGYW1vdW50AwkAAGYAAAACBQAAAAl2aXJ0dWFsV2QFAAAADnBlcnNvbmFsU3Rha2VkCQAAAgAAAAECAAAAKFlvdSBkb24ndCBoYXZlIHNvIG11Y2ggZnVuZHMgdG8gd2l0aGRyYXcJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAEmtleVN0YWtlZENvbXBvdW5kVQkAAGUAAAACBQAAAA5wZXJzb25hbFN0YWtlZAUAAAAJdmlydHVhbFdkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABFrZXlTdGFrZWRDb21wb3VuZAkAAGUAAAACBQAAAAZzdGFrZWQFAAAACXZpcnR1YWxXZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAQa2V5VG90YWxDb21wb3VuZAkAAGUAAAACBQAAAAV0b3RhbAUAAAAIYW1vdW50V2QJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAhhbW91bnRXZAUAAAAMc2hhcmVUb2tlbklkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAAlrZXlMYXN0VlAFAAAAAnZwCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABVsYXN0X3ZpcnRfY29tcG91bmRfd2QFAAAACXZpcnR1YWxXZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAXbGFzdF9hbW91bnRfY29tcG91bmRfd2QFAAAACGFtb3VudFdkBQAAAANuaWwEAAAACmFkZHJlc3NTdHIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAAAxzdGFrZWRBbW91bnQJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkBAAAAD2tleVN0YWtlZEFtb3VudAAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAId2RBbW91bnQDCQAAAAAAAAIFAAAABmFtb3VudAD//////////wUAAAAMc3Rha2VkQW1vdW50BQAAAAZhbW91bnQDCQAAZgAAAAIFAAAACHdkQW1vdW50BQAAAAxzdGFrZWRBbW91bnQJAAACAAAAAQIAAAAfeW91IGRvbid0IGhhdmUgdG9rZW5zIGF2YWlsYWJsZQkABE4AAAACCQEAAAASY2xhaW1TdGFraW5nUmVzdWx0AAAAAQgFAAAAAWkAAAAGY2FsbGVyCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAPa2V5U3Rha2VkQW1vdW50AAAAAQgFAAAAAWkAAAAGY2FsbGVyCQAAZQAAAAIFAAAADHN0YWtlZEFtb3VudAUAAAAId2RBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAD2tleUdsb2JhbFN0YWtlZAkAAGUAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEFAAAAD2tleUdsb2JhbFN0YWtlZAUAAAAId2RBbW91bnQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAh3ZEFtb3VudAUAAAAMc2hhcmVUb2tlbklkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA9sYXN0X3N0YWtpbmdfd2QFAAAACHdkQW1vdW50BQAAAANuaWwAAAABaQEAAAAPc3Rha2VGYXJtVG9rZW5zAAAAAQAAAAhjb21wb3VuZAQAAAAMc2hhcmVUb2tlbklkCQEAAAAPZ2V0U2hhcmVBc3NldElkAAAAAAMJAABmAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAAIAAAABAgAAABZUbyBtYW55IHBheW1lbnRzIGFkZGVkAwkBAAAAAiE9AAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAUAAAAMc2hhcmVUb2tlbklkCQAAAgAAAAECAAAADVdyb25nIGFzc2V0SWQDBQAAAAhjb21wb3VuZAQAAAAIaXNMb2NrZWQJAQAAABZpc0NvbGxlY3RpdmVGYXJtTG9ja2VkAAAAAAMFAAAACGlzTG9ja2VkCQAAAgAAAAECAAAANVRoZSBmYXJtIGlzIGNsb3NlZCBmb3IgaW52ZXN0bWVudHMsIGl0IGNhbid0IGNvbXBvdW5kBAAAABJrZXlTdGFrZWRDb21wb3VuZFUJAQAAABVrZXlTdGFrZWRDb21wb3VuZFVzZXIAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAADWFscmVhZHlTdGFrZWQJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQUAAAASa2V5U3Rha2VkQ29tcG91bmRVBAAAAAV0b3RhbAkBAAAADXRyeUdldEludGVnZXIAAAABBQAAABBrZXlUb3RhbENvbXBvdW5kBAAAAAZzdGFrZWQJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQUAAAARa2V5U3Rha2VkQ29tcG91bmQEAAAAAnZwCQEAAAAQY2FsY1ZpcnR1YWxQcmljZQAAAAIFAAAABnN0YWtlZAUAAAAFdG90YWwEAAAADnJhd1N0YWtlQW1vdW50CAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQEAAAAEGV4YWN0U3Rha2VBbW91bnQJAABrAAAAAwUAAAAOcmF3U3Rha2VBbW91bnQFAAAAB1ZQU2NhbGUFAAAAAnZwCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAABJrZXlTdGFrZWRDb21wb3VuZFUJAABkAAAAAgUAAAANYWxyZWFkeVN0YWtlZAUAAAAQZXhhY3RTdGFrZUFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAQa2V5VG90YWxDb21wb3VuZAkAAGQAAAACBQAAAAV0b3RhbAUAAAAOcmF3U3Rha2VBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAEWtleVN0YWtlZENvbXBvdW5kCQAAZAAAAAIFAAAABnN0YWtlZAUAAAAQZXhhY3RTdGFrZUFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAJa2V5TGFzdFZQBQAAAAJ2cAUAAAADbmlsBAAAAAZhbW91bnQICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAQAAAAKYWRkcmVzc1N0cgkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAAEXRvdGFsU3Rha2VkQW1vdW50CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEFAAAAD2tleUdsb2JhbFN0YWtlZAMJAQAAAAIhPQAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAAB2Fzc2V0SWQFAAAADHNoYXJlVG9rZW5JZAkAAAIAAAABAgAAABR3cm9uZyBhc3NldCBhdHRhY2hlZAkABE4AAAACCQEAAAASY2xhaW1TdGFraW5nUmVzdWx0AAAAAQgFAAAAAWkAAAAGY2FsbGVyCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAA9rZXlHbG9iYWxTdGFrZWQJAABkAAAAAgUAAAARdG90YWxTdGFrZWRBbW91bnQFAAAABmFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAD2tleVN0YWtlZEFtb3VudAAAAAEIBQAAAAFpAAAABmNhbGxlcgkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAQAAAA9rZXlTdGFrZWRBbW91bnQAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAABmFtb3VudAUAAAADbmlsAAAAAWkBAAAADGluaXRpYXRlRGFwcAAAAAEAAAAHYWRkcmVzcwMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAEdGhpcwkAAAIAAAABAgAAACZDYW4gYmUgY2FsbGVkIG9ubHkgYnkgdGhlIGRhcHAtYWNjb3VudAkBAAAADHNldENGQWRkcmVzcwAAAAEFAAAAB2FkZHJlc3MAAAABaQEAAAALY2xhaW1SZXdhcmQAAAAAAwkAAGYAAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAACQAAAgAAAAECAAAAGVBsZWFzZSBkb24ndCBhZGQgcGF5bWVudHMJAQAAABJjbGFpbVN0YWtpbmdSZXN1bHQAAAABCAUAAAABaQAAAAZjYWxsZXIAAAAA7OI+Yw==",
    "height": 3001149,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Bidpu2kgYbhZWYRMWwz3shK6EdT8nBxjmokrxRj6Ah21
Next: GBKWdc4cWWFaGRtABWiVktoBWmKRLqt8jSkrs75BzDFc

Diff: 
Old New Differences
130 130  
131 131  
132 132  @Callable(i)
133 - func withdrawFarmTokens (amount,compound) = {
134 -     let shareTokenId = getShareAssetId()
135 -     if (compound)
136 -         then {
137 -             let staked = tryGetInteger(keyStakedCompound)
138 -             let total = tryGetInteger(keyTotalCompound)
139 -             let vp = calcVirtualPrice(staked, total)
140 -             let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
141 -             let personalStaked = tryGetInteger(keyStakedCompoundU)
142 -             let virtualWd = if ((amount == -1))
143 -                 then personalStaked
144 -                 else fraction(amount, VPScale, vp)
145 -             let amountWd = if ((amount == -1))
146 -                 then fraction(virtualWd, vp, VPScale)
147 -                 else amount
148 -             if ((virtualWd > personalStaked))
149 -                 then throw("You don't have so much funds to withdraw")
150 -                 else [IntegerEntry(keyStakedCompoundU, (personalStaked - virtualWd)), IntegerEntry(keyStakedCompound, (staked - virtualWd)), IntegerEntry(keyTotalCompound, (total - amountWd)), ScriptTransfer(i.caller, amountWd, shareTokenId), IntegerEntry(keyLastVP, vp), IntegerEntry("last_virt_compound_wd", virtualWd), IntegerEntry("last_amount_compound_wd", amountWd)]
151 -             }
152 -         else {
153 -             let addressStr = toString(i.caller)
154 -             let stakedAmount = tryGetInteger(keyStakedAmount(i.caller))
155 -             let wdAmount = if ((amount == -1))
156 -                 then stakedAmount
157 -                 else amount
158 -             if ((wdAmount > stakedAmount))
159 -                 then throw("you don't have tokens available")
160 -                 else (claimStakingResult(i.caller) ++ [IntegerEntry(keyStakedAmount(i.caller), (stakedAmount - wdAmount)), IntegerEntry(keyGlobalStaked, (tryGetInteger(keyGlobalStaked) - wdAmount)), ScriptTransfer(i.caller, wdAmount, shareTokenId), IntegerEntry("last_staking_wd", wdAmount)])
161 -             }
162 -     }
133 + func withdrawFarmTokens (amount,compound) = if ((size(i.payments) > 0))
134 +     then throw("Please don't add payments")
135 +     else {
136 +         let shareTokenId = getShareAssetId()
137 +         if (compound)
138 +             then {
139 +                 let staked = tryGetInteger(keyStakedCompound)
140 +                 let total = tryGetInteger(keyTotalCompound)
141 +                 let vp = calcVirtualPrice(staked, total)
142 +                 let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
143 +                 let personalStaked = tryGetInteger(keyStakedCompoundU)
144 +                 let virtualWd = if ((amount == -1))
145 +                     then personalStaked
146 +                     else fraction(amount, VPScale, vp)
147 +                 let amountWd = if ((amount == -1))
148 +                     then fraction(virtualWd, vp, VPScale)
149 +                     else amount
150 +                 if ((virtualWd > personalStaked))
151 +                     then throw("You don't have so much funds to withdraw")
152 +                     else [IntegerEntry(keyStakedCompoundU, (personalStaked - virtualWd)), IntegerEntry(keyStakedCompound, (staked - virtualWd)), IntegerEntry(keyTotalCompound, (total - amountWd)), ScriptTransfer(i.caller, amountWd, shareTokenId), IntegerEntry(keyLastVP, vp), IntegerEntry("last_virt_compound_wd", virtualWd), IntegerEntry("last_amount_compound_wd", amountWd)]
153 +                 }
154 +             else {
155 +                 let addressStr = toString(i.caller)
156 +                 let stakedAmount = tryGetInteger(keyStakedAmount(i.caller))
157 +                 let wdAmount = if ((amount == -1))
158 +                     then stakedAmount
159 +                     else amount
160 +                 if ((wdAmount > stakedAmount))
161 +                     then throw("you don't have tokens available")
162 +                     else (claimStakingResult(i.caller) ++ [IntegerEntry(keyStakedAmount(i.caller), (stakedAmount - wdAmount)), IntegerEntry(keyGlobalStaked, (tryGetInteger(keyGlobalStaked) - wdAmount)), ScriptTransfer(i.caller, wdAmount, shareTokenId), IntegerEntry("last_staking_wd", wdAmount)])
163 +                 }
164 +         }
163 165  
164 166  
165 167  
166 168  @Callable(i)
167 169  func stakeFarmTokens (compound) = {
168 170      let shareTokenId = getShareAssetId()
169 -     if ((i.payments[0].assetId != shareTokenId))
170 -         then throw("Wrong assetId")
171 -         else if (compound)
172 -             then {
173 -                 let isLocked = isCollectiveFarmLocked()
174 -                 if (isLocked)
175 -                     then throw("The farm is closed for investments, it can't compound")
176 -                     else {
177 -                         let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
178 -                         let alreadyStaked = tryGetInteger(keyStakedCompoundU)
179 -                         let total = tryGetInteger(keyTotalCompound)
180 -                         let staked = tryGetInteger(keyStakedCompound)
181 -                         let vp = calcVirtualPrice(staked, total)
182 -                         let rawStakeAmount = i.payments[0].amount
183 -                         let exactStakeAmount = fraction(rawStakeAmount, VPScale, vp)
171 +     if ((size(i.payments) > 1))
172 +         then throw("To many payments added")
173 +         else if ((i.payments[0].assetId != shareTokenId))
174 +             then throw("Wrong assetId")
175 +             else if (compound)
176 +                 then {
177 +                     let isLocked = isCollectiveFarmLocked()
178 +                     if (isLocked)
179 +                         then throw("The farm is closed for investments, it can't compound")
180 +                         else {
181 +                             let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
182 +                             let alreadyStaked = tryGetInteger(keyStakedCompoundU)
183 +                             let total = tryGetInteger(keyTotalCompound)
184 +                             let staked = tryGetInteger(keyStakedCompound)
185 +                             let vp = calcVirtualPrice(staked, total)
186 +                             let rawStakeAmount = i.payments[0].amount
187 +                             let exactStakeAmount = fraction(rawStakeAmount, VPScale, vp)
184 188  [IntegerEntry(keyStakedCompoundU, (alreadyStaked + exactStakeAmount)), IntegerEntry(keyTotalCompound, (total + rawStakeAmount)), IntegerEntry(keyStakedCompound, (staked + exactStakeAmount)), IntegerEntry(keyLastVP, vp)]
185 -                         }
186 -                 }
187 -             else {
188 -                 let amount = i.payments[0].amount
189 -                 let addressStr = toString(i.caller)
190 -                 let totalStakedAmount = tryGetInteger(keyGlobalStaked)
191 -                 if ((i.payments[0].assetId != shareTokenId))
192 -                     then throw("wrong asset attached")
193 -                     else (claimStakingResult(i.caller) ++ [IntegerEntry(keyGlobalStaked, (totalStakedAmount + amount)), IntegerEntry(keyStakedAmount(i.caller), (tryGetInteger(keyStakedAmount(i.caller)) + amount))])
194 -                 }
189 +                             }
190 +                     }
191 +                 else {
192 +                     let amount = i.payments[0].amount
193 +                     let addressStr = toString(i.caller)
194 +                     let totalStakedAmount = tryGetInteger(keyGlobalStaked)
195 +                     if ((i.payments[0].assetId != shareTokenId))
196 +                         then throw("wrong asset attached")
197 +                         else (claimStakingResult(i.caller) ++ [IntegerEntry(keyGlobalStaked, (totalStakedAmount + amount)), IntegerEntry(keyStakedAmount(i.caller), (tryGetInteger(keyStakedAmount(i.caller)) + amount))])
198 +                     }
195 199      }
196 200  
197 201  
204 208  
205 209  
206 210  @Callable(i)
207 - func claimReward () = claimStakingResult(i.caller)
211 + func claimReward () = if ((size(i.payments) > 0))
212 +     then throw("Please don't add payments")
213 +     else claimStakingResult(i.caller)
208 214  
209 215  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let keyMAccPKey = "master_pk"
5 5  
6 6  func getCFAddress () = addressFromStringValue(getStringValue(this, "CF_ADDRESS"))
7 7  
8 8  
9 9  let mAccPKey = fromBase58String(getStringValue(getCFAddress(), keyMAccPKey))
10 10  
11 11  let mAccAddr = addressFromPublicKey(mAccPKey)
12 12  
13 13  let keyTotalCompound = "total_compound"
14 14  
15 15  let keyStakedCompound = "staked_compound"
16 16  
17 17  let keyLastVP = "last_virtual_price"
18 18  
19 19  let VPScale = 100000000
20 20  
21 21  func keyStakedCompoundUser (user) = ((toString(user) + "_") + keyStakedCompound)
22 22  
23 23  
24 24  func calcVirtualPrice (totalStaked,total) = if ((total == 0))
25 25      then 1
26 26      else if ((totalStaked == 0))
27 27          then 1
28 28          else fraction(total, VPScale, totalStaked)
29 29  
30 30  
31 31  let Scale = 100000000
32 32  
33 33  func keyStakedAmount (address) = (toString(address) + "_farm_staked")
34 34  
35 35  
36 36  func keyLastCheckInterest (address) = (toString(address) + "_lastCheck_interest")
37 37  
38 38  
39 39  func keyEggClaimed (address) = (toString(address) + "_claimed")
40 40  
41 41  
42 42  let keyGlobalLastInterest = "global_lastCheck_interest"
43 43  
44 44  let keyGlobalStaked = "global_staked"
45 45  
46 46  let keyGlobalEggEarned = "global_earnings"
47 47  
48 48  let kLockedInvestments = "locked_investments"
49 49  
50 50  func isCollectiveFarmLocked () = match getBoolean(getCFAddress(), kLockedInvestments) {
51 51      case b: Boolean => 
52 52          b
53 53      case _ => 
54 54          false
55 55  }
56 56  
57 57  
58 58  func getEggId () = fromBase58String(getStringValue(mAccAddr, "EGG_ASSET_ID"))
59 59  
60 60  
61 61  func setCFAddress (address) = [StringEntry("CF_ADDRESS", address)]
62 62  
63 63  
64 64  func getShareAssetId () = fromBase58String(getStringValue(getCFAddress(), "SHARE_ASSET_ID"))
65 65  
66 66  
67 67  func tryGetInteger (key) = match getInteger(this, key) {
68 68      case b: Int => 
69 69          b
70 70      case _ => 
71 71          0
72 72  }
73 73  
74 74  
75 75  func tryGetString (key) = match getString(this, key) {
76 76      case a: String => 
77 77          a
78 78      case _ => 
79 79          ""
80 80  }
81 81  
82 82  
83 83  func claimStakingResult (address) = {
84 84      let currentInterest = tryGetInteger(keyGlobalLastInterest)
85 85      let lastCheckInterest = tryGetInteger(keyLastCheckInterest(address))
86 86      let stakedAmount = tryGetInteger(keyStakedAmount(address))
87 87      let reward = if ((lastCheckInterest > 0))
88 88          then fraction((currentInterest - lastCheckInterest), stakedAmount, Scale)
89 89          else 0
90 90      let transfer = if ((reward > 0))
91 91          then [ScriptTransfer(address, reward, getEggId())]
92 92          else nil
93 93      (transfer ++ [IntegerEntry(keyLastCheckInterest(address), currentInterest), IntegerEntry(keyEggClaimed(address), (tryGetInteger(keyEggClaimed(address)) + reward))])
94 94      }
95 95  
96 96  
97 97  func handleCompoundTopUp (amount) = {
98 98      let total = (tryGetInteger(keyTotalCompound) + amount)
99 99      let staked = tryGetInteger(keyStakedCompound)
100 100      let vp = calcVirtualPrice(staked, total)
101 101  [IntegerEntry(keyTotalCompound, total), IntegerEntry(keyLastVP, vp)]
102 102      }
103 103  
104 104  
105 105  func handleStakingTopUp (amount) = {
106 106      let currentInterest = tryGetInteger(keyGlobalLastInterest)
107 107      let totalStakedAmount = tryGetInteger(keyGlobalStaked)
108 108      let interestDelta = if ((totalStakedAmount > 0))
109 109          then fraction(amount, Scale, totalStakedAmount)
110 110          else 0
111 111  [IntegerEntry(keyGlobalEggEarned, (tryGetInteger(keyGlobalEggEarned) + amount)), IntegerEntry(keyGlobalLastInterest, (currentInterest + interestDelta))]
112 112      }
113 113  
114 114  
115 115  @Callable(i)
116 116  func topUpReward () = {
117 117      let eggAssetId = getEggId()
118 118      let shareTokenId = getShareAssetId()
119 119      if ((i.payments[0].assetId != eggAssetId))
120 120          then throw("Wrong assetId, first payment should be EGG")
121 121          else if ((i.payments[1].assetId != shareTokenId))
122 122              then throw("Wrong assetId, second payment should be farm tokens")
123 123              else {
124 124                  let resHandleStaking = handleStakingTopUp(i.payments[0].amount)
125 125                  let resHandleCompound = handleCompoundTopUp(i.payments[1].amount)
126 126                  $Tuple2((resHandleCompound ++ resHandleStaking), true)
127 127                  }
128 128      }
129 129  
130 130  
131 131  
132 132  @Callable(i)
133 - func withdrawFarmTokens (amount,compound) = {
134 -     let shareTokenId = getShareAssetId()
135 -     if (compound)
136 -         then {
137 -             let staked = tryGetInteger(keyStakedCompound)
138 -             let total = tryGetInteger(keyTotalCompound)
139 -             let vp = calcVirtualPrice(staked, total)
140 -             let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
141 -             let personalStaked = tryGetInteger(keyStakedCompoundU)
142 -             let virtualWd = if ((amount == -1))
143 -                 then personalStaked
144 -                 else fraction(amount, VPScale, vp)
145 -             let amountWd = if ((amount == -1))
146 -                 then fraction(virtualWd, vp, VPScale)
147 -                 else amount
148 -             if ((virtualWd > personalStaked))
149 -                 then throw("You don't have so much funds to withdraw")
150 -                 else [IntegerEntry(keyStakedCompoundU, (personalStaked - virtualWd)), IntegerEntry(keyStakedCompound, (staked - virtualWd)), IntegerEntry(keyTotalCompound, (total - amountWd)), ScriptTransfer(i.caller, amountWd, shareTokenId), IntegerEntry(keyLastVP, vp), IntegerEntry("last_virt_compound_wd", virtualWd), IntegerEntry("last_amount_compound_wd", amountWd)]
151 -             }
152 -         else {
153 -             let addressStr = toString(i.caller)
154 -             let stakedAmount = tryGetInteger(keyStakedAmount(i.caller))
155 -             let wdAmount = if ((amount == -1))
156 -                 then stakedAmount
157 -                 else amount
158 -             if ((wdAmount > stakedAmount))
159 -                 then throw("you don't have tokens available")
160 -                 else (claimStakingResult(i.caller) ++ [IntegerEntry(keyStakedAmount(i.caller), (stakedAmount - wdAmount)), IntegerEntry(keyGlobalStaked, (tryGetInteger(keyGlobalStaked) - wdAmount)), ScriptTransfer(i.caller, wdAmount, shareTokenId), IntegerEntry("last_staking_wd", wdAmount)])
161 -             }
162 -     }
133 + func withdrawFarmTokens (amount,compound) = if ((size(i.payments) > 0))
134 +     then throw("Please don't add payments")
135 +     else {
136 +         let shareTokenId = getShareAssetId()
137 +         if (compound)
138 +             then {
139 +                 let staked = tryGetInteger(keyStakedCompound)
140 +                 let total = tryGetInteger(keyTotalCompound)
141 +                 let vp = calcVirtualPrice(staked, total)
142 +                 let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
143 +                 let personalStaked = tryGetInteger(keyStakedCompoundU)
144 +                 let virtualWd = if ((amount == -1))
145 +                     then personalStaked
146 +                     else fraction(amount, VPScale, vp)
147 +                 let amountWd = if ((amount == -1))
148 +                     then fraction(virtualWd, vp, VPScale)
149 +                     else amount
150 +                 if ((virtualWd > personalStaked))
151 +                     then throw("You don't have so much funds to withdraw")
152 +                     else [IntegerEntry(keyStakedCompoundU, (personalStaked - virtualWd)), IntegerEntry(keyStakedCompound, (staked - virtualWd)), IntegerEntry(keyTotalCompound, (total - amountWd)), ScriptTransfer(i.caller, amountWd, shareTokenId), IntegerEntry(keyLastVP, vp), IntegerEntry("last_virt_compound_wd", virtualWd), IntegerEntry("last_amount_compound_wd", amountWd)]
153 +                 }
154 +             else {
155 +                 let addressStr = toString(i.caller)
156 +                 let stakedAmount = tryGetInteger(keyStakedAmount(i.caller))
157 +                 let wdAmount = if ((amount == -1))
158 +                     then stakedAmount
159 +                     else amount
160 +                 if ((wdAmount > stakedAmount))
161 +                     then throw("you don't have tokens available")
162 +                     else (claimStakingResult(i.caller) ++ [IntegerEntry(keyStakedAmount(i.caller), (stakedAmount - wdAmount)), IntegerEntry(keyGlobalStaked, (tryGetInteger(keyGlobalStaked) - wdAmount)), ScriptTransfer(i.caller, wdAmount, shareTokenId), IntegerEntry("last_staking_wd", wdAmount)])
163 +                 }
164 +         }
163 165  
164 166  
165 167  
166 168  @Callable(i)
167 169  func stakeFarmTokens (compound) = {
168 170      let shareTokenId = getShareAssetId()
169 -     if ((i.payments[0].assetId != shareTokenId))
170 -         then throw("Wrong assetId")
171 -         else if (compound)
172 -             then {
173 -                 let isLocked = isCollectiveFarmLocked()
174 -                 if (isLocked)
175 -                     then throw("The farm is closed for investments, it can't compound")
176 -                     else {
177 -                         let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
178 -                         let alreadyStaked = tryGetInteger(keyStakedCompoundU)
179 -                         let total = tryGetInteger(keyTotalCompound)
180 -                         let staked = tryGetInteger(keyStakedCompound)
181 -                         let vp = calcVirtualPrice(staked, total)
182 -                         let rawStakeAmount = i.payments[0].amount
183 -                         let exactStakeAmount = fraction(rawStakeAmount, VPScale, vp)
171 +     if ((size(i.payments) > 1))
172 +         then throw("To many payments added")
173 +         else if ((i.payments[0].assetId != shareTokenId))
174 +             then throw("Wrong assetId")
175 +             else if (compound)
176 +                 then {
177 +                     let isLocked = isCollectiveFarmLocked()
178 +                     if (isLocked)
179 +                         then throw("The farm is closed for investments, it can't compound")
180 +                         else {
181 +                             let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
182 +                             let alreadyStaked = tryGetInteger(keyStakedCompoundU)
183 +                             let total = tryGetInteger(keyTotalCompound)
184 +                             let staked = tryGetInteger(keyStakedCompound)
185 +                             let vp = calcVirtualPrice(staked, total)
186 +                             let rawStakeAmount = i.payments[0].amount
187 +                             let exactStakeAmount = fraction(rawStakeAmount, VPScale, vp)
184 188  [IntegerEntry(keyStakedCompoundU, (alreadyStaked + exactStakeAmount)), IntegerEntry(keyTotalCompound, (total + rawStakeAmount)), IntegerEntry(keyStakedCompound, (staked + exactStakeAmount)), IntegerEntry(keyLastVP, vp)]
185 -                         }
186 -                 }
187 -             else {
188 -                 let amount = i.payments[0].amount
189 -                 let addressStr = toString(i.caller)
190 -                 let totalStakedAmount = tryGetInteger(keyGlobalStaked)
191 -                 if ((i.payments[0].assetId != shareTokenId))
192 -                     then throw("wrong asset attached")
193 -                     else (claimStakingResult(i.caller) ++ [IntegerEntry(keyGlobalStaked, (totalStakedAmount + amount)), IntegerEntry(keyStakedAmount(i.caller), (tryGetInteger(keyStakedAmount(i.caller)) + amount))])
194 -                 }
189 +                             }
190 +                     }
191 +                 else {
192 +                     let amount = i.payments[0].amount
193 +                     let addressStr = toString(i.caller)
194 +                     let totalStakedAmount = tryGetInteger(keyGlobalStaked)
195 +                     if ((i.payments[0].assetId != shareTokenId))
196 +                         then throw("wrong asset attached")
197 +                         else (claimStakingResult(i.caller) ++ [IntegerEntry(keyGlobalStaked, (totalStakedAmount + amount)), IntegerEntry(keyStakedAmount(i.caller), (tryGetInteger(keyStakedAmount(i.caller)) + amount))])
198 +                     }
195 199      }
196 200  
197 201  
198 202  
199 203  @Callable(i)
200 204  func initiateDapp (address) = if ((i.caller != this))
201 205      then throw("Can be called only by the dapp-account")
202 206      else setCFAddress(address)
203 207  
204 208  
205 209  
206 210  @Callable(i)
207 - func claimReward () = claimStakingResult(i.caller)
211 + func claimReward () = if ((size(i.payments) > 0))
212 +     then throw("Please don't add payments")
213 +     else claimStakingResult(i.caller)
208 214  
209 215

Old	New		Differences
130	130
131	131
132	132		@Callable(i)
133		-	func withdrawFarmTokens (amount,compound) = {
134		-	let shareTokenId = getShareAssetId()
135		-	if (compound)
136		-	then {
137		-	let staked = tryGetInteger(keyStakedCompound)
138		-	let total = tryGetInteger(keyTotalCompound)
139		-	let vp = calcVirtualPrice(staked, total)
140		-	let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
141		-	let personalStaked = tryGetInteger(keyStakedCompoundU)
142		-	let virtualWd = if ((amount == -1))
143		-	then personalStaked
144		-	else fraction(amount, VPScale, vp)
145		-	let amountWd = if ((amount == -1))
146		-	then fraction(virtualWd, vp, VPScale)
147		-	else amount
148		-	if ((virtualWd > personalStaked))
149		-	then throw("You don't have so much funds to withdraw")
150		-	else [IntegerEntry(keyStakedCompoundU, (personalStaked - virtualWd)), IntegerEntry(keyStakedCompound, (staked - virtualWd)), IntegerEntry(keyTotalCompound, (total - amountWd)), ScriptTransfer(i.caller, amountWd, shareTokenId), IntegerEntry(keyLastVP, vp), IntegerEntry("last_virt_compound_wd", virtualWd), IntegerEntry("last_amount_compound_wd", amountWd)]
151		-	}
152		-	else {
153		-	let addressStr = toString(i.caller)
154		-	let stakedAmount = tryGetInteger(keyStakedAmount(i.caller))
155		-	let wdAmount = if ((amount == -1))
156		-	then stakedAmount
157		-	else amount
158		-	if ((wdAmount > stakedAmount))
159		-	then throw("you don't have tokens available")
160		-	else (claimStakingResult(i.caller) ++ [IntegerEntry(keyStakedAmount(i.caller), (stakedAmount - wdAmount)), IntegerEntry(keyGlobalStaked, (tryGetInteger(keyGlobalStaked) - wdAmount)), ScriptTransfer(i.caller, wdAmount, shareTokenId), IntegerEntry("last_staking_wd", wdAmount)])
161		-	}
162		-	}
	133	+	func withdrawFarmTokens (amount,compound) = if ((size(i.payments) > 0))
	134	+	then throw("Please don't add payments")
	135	+	else {
	136	+	let shareTokenId = getShareAssetId()
	137	+	if (compound)
	138	+	then {
	139	+	let staked = tryGetInteger(keyStakedCompound)
	140	+	let total = tryGetInteger(keyTotalCompound)
	141	+	let vp = calcVirtualPrice(staked, total)
	142	+	let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
	143	+	let personalStaked = tryGetInteger(keyStakedCompoundU)
	144	+	let virtualWd = if ((amount == -1))
	145	+	then personalStaked
	146	+	else fraction(amount, VPScale, vp)
	147	+	let amountWd = if ((amount == -1))
	148	+	then fraction(virtualWd, vp, VPScale)
	149	+	else amount
	150	+	if ((virtualWd > personalStaked))
	151	+	then throw("You don't have so much funds to withdraw")
	152	+	else [IntegerEntry(keyStakedCompoundU, (personalStaked - virtualWd)), IntegerEntry(keyStakedCompound, (staked - virtualWd)), IntegerEntry(keyTotalCompound, (total - amountWd)), ScriptTransfer(i.caller, amountWd, shareTokenId), IntegerEntry(keyLastVP, vp), IntegerEntry("last_virt_compound_wd", virtualWd), IntegerEntry("last_amount_compound_wd", amountWd)]
	153	+	}
	154	+	else {
	155	+	let addressStr = toString(i.caller)
	156	+	let stakedAmount = tryGetInteger(keyStakedAmount(i.caller))
	157	+	let wdAmount = if ((amount == -1))
	158	+	then stakedAmount
	159	+	else amount
	160	+	if ((wdAmount > stakedAmount))
	161	+	then throw("you don't have tokens available")
	162	+	else (claimStakingResult(i.caller) ++ [IntegerEntry(keyStakedAmount(i.caller), (stakedAmount - wdAmount)), IntegerEntry(keyGlobalStaked, (tryGetInteger(keyGlobalStaked) - wdAmount)), ScriptTransfer(i.caller, wdAmount, shareTokenId), IntegerEntry("last_staking_wd", wdAmount)])
	163	+	}
	164	+	}
163	165
164	166
165	167
166	168		@Callable(i)
167	169		func stakeFarmTokens (compound) = {
168	170		let shareTokenId = getShareAssetId()
169		-	if ((i.payments[0].assetId != shareTokenId))
170		-	then throw("Wrong assetId")
171		-	else if (compound)
172		-	then {
173		-	let isLocked = isCollectiveFarmLocked()
174		-	if (isLocked)
175		-	then throw("The farm is closed for investments, it can't compound")
176		-	else {
177		-	let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
178		-	let alreadyStaked = tryGetInteger(keyStakedCompoundU)
179		-	let total = tryGetInteger(keyTotalCompound)
180		-	let staked = tryGetInteger(keyStakedCompound)
181		-	let vp = calcVirtualPrice(staked, total)
182		-	let rawStakeAmount = i.payments[0].amount
183		-	let exactStakeAmount = fraction(rawStakeAmount, VPScale, vp)
	171	+	if ((size(i.payments) > 1))
	172	+	then throw("To many payments added")
	173	+	else if ((i.payments[0].assetId != shareTokenId))
	174	+	then throw("Wrong assetId")
	175	+	else if (compound)
	176	+	then {
	177	+	let isLocked = isCollectiveFarmLocked()
	178	+	if (isLocked)
	179	+	then throw("The farm is closed for investments, it can't compound")
	180	+	else {
	181	+	let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
	182	+	let alreadyStaked = tryGetInteger(keyStakedCompoundU)
	183	+	let total = tryGetInteger(keyTotalCompound)
	184	+	let staked = tryGetInteger(keyStakedCompound)
	185	+	let vp = calcVirtualPrice(staked, total)
	186	+	let rawStakeAmount = i.payments[0].amount
	187	+	let exactStakeAmount = fraction(rawStakeAmount, VPScale, vp)
184	188		[IntegerEntry(keyStakedCompoundU, (alreadyStaked + exactStakeAmount)), IntegerEntry(keyTotalCompound, (total + rawStakeAmount)), IntegerEntry(keyStakedCompound, (staked + exactStakeAmount)), IntegerEntry(keyLastVP, vp)]
185		-	}
186		-	}
187		-	else {
188		-	let amount = i.payments[0].amount
189		-	let addressStr = toString(i.caller)
190		-	let totalStakedAmount = tryGetInteger(keyGlobalStaked)
191		-	if ((i.payments[0].assetId != shareTokenId))
192		-	then throw("wrong asset attached")
193		-	else (claimStakingResult(i.caller) ++ [IntegerEntry(keyGlobalStaked, (totalStakedAmount + amount)), IntegerEntry(keyStakedAmount(i.caller), (tryGetInteger(keyStakedAmount(i.caller)) + amount))])
194		-	}
	189	+	}
	190	+	}
	191	+	else {
	192	+	let amount = i.payments[0].amount
	193	+	let addressStr = toString(i.caller)
	194	+	let totalStakedAmount = tryGetInteger(keyGlobalStaked)
	195	+	if ((i.payments[0].assetId != shareTokenId))
	196	+	then throw("wrong asset attached")
	197	+	else (claimStakingResult(i.caller) ++ [IntegerEntry(keyGlobalStaked, (totalStakedAmount + amount)), IntegerEntry(keyStakedAmount(i.caller), (tryGetInteger(keyStakedAmount(i.caller)) + amount))])
	198	+	}
195	199		}
196	200
197	201

204	208
205	209
206	210		@Callable(i)
207		-	func claimReward () = claimStakingResult(i.caller)
	211	+	func claimReward () = if ((size(i.payments) > 0))
	212	+	then throw("Please don't add payments")
	213	+	else claimStakingResult(i.caller)
208	214
209	215

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let keyMAccPKey = "master_pk"
5	5
6	6		func getCFAddress () = addressFromStringValue(getStringValue(this, "CF_ADDRESS"))
7	7
8	8
9	9		let mAccPKey = fromBase58String(getStringValue(getCFAddress(), keyMAccPKey))
10	10
11	11		let mAccAddr = addressFromPublicKey(mAccPKey)
12	12
13	13		let keyTotalCompound = "total_compound"
14	14
15	15		let keyStakedCompound = "staked_compound"
16	16
17	17		let keyLastVP = "last_virtual_price"
18	18
19	19		let VPScale = 100000000
20	20
21	21		func keyStakedCompoundUser (user) = ((toString(user) + "_") + keyStakedCompound)
22	22
23	23
24	24		func calcVirtualPrice (totalStaked,total) = if ((total == 0))
25	25		then 1
26	26		else if ((totalStaked == 0))
27	27		then 1
28	28		else fraction(total, VPScale, totalStaked)
29	29
30	30
31	31		let Scale = 100000000
32	32
33	33		func keyStakedAmount (address) = (toString(address) + "_farm_staked")
34	34
35	35
36	36		func keyLastCheckInterest (address) = (toString(address) + "_lastCheck_interest")
37	37
38	38
39	39		func keyEggClaimed (address) = (toString(address) + "_claimed")
40	40
41	41
42	42		let keyGlobalLastInterest = "global_lastCheck_interest"
43	43
44	44		let keyGlobalStaked = "global_staked"
45	45
46	46		let keyGlobalEggEarned = "global_earnings"
47	47
48	48		let kLockedInvestments = "locked_investments"
49	49
50	50		func isCollectiveFarmLocked () = match getBoolean(getCFAddress(), kLockedInvestments) {
51	51		case b: Boolean =>
52	52		b
53	53		case _ =>
54	54		false
55	55		}
56	56
57	57
58	58		func getEggId () = fromBase58String(getStringValue(mAccAddr, "EGG_ASSET_ID"))
59	59
60	60
61	61		func setCFAddress (address) = [StringEntry("CF_ADDRESS", address)]
62	62
63	63
64	64		func getShareAssetId () = fromBase58String(getStringValue(getCFAddress(), "SHARE_ASSET_ID"))
65	65
66	66
67	67		func tryGetInteger (key) = match getInteger(this, key) {
68	68		case b: Int =>
69	69		b
70	70		case _ =>
71	71		0
72	72		}
73	73
74	74
75	75		func tryGetString (key) = match getString(this, key) {
76	76		case a: String =>
77	77		a
78	78		case _ =>
79	79		""
80	80		}
81	81
82	82
83	83		func claimStakingResult (address) = {
84	84		let currentInterest = tryGetInteger(keyGlobalLastInterest)
85	85		let lastCheckInterest = tryGetInteger(keyLastCheckInterest(address))
86	86		let stakedAmount = tryGetInteger(keyStakedAmount(address))
87	87		let reward = if ((lastCheckInterest > 0))
88	88		then fraction((currentInterest - lastCheckInterest), stakedAmount, Scale)
89	89		else 0
90	90		let transfer = if ((reward > 0))
91	91		then [ScriptTransfer(address, reward, getEggId())]
92	92		else nil
93	93		(transfer ++ [IntegerEntry(keyLastCheckInterest(address), currentInterest), IntegerEntry(keyEggClaimed(address), (tryGetInteger(keyEggClaimed(address)) + reward))])
94	94		}
95	95
96	96
97	97		func handleCompoundTopUp (amount) = {
98	98		let total = (tryGetInteger(keyTotalCompound) + amount)
99	99		let staked = tryGetInteger(keyStakedCompound)
100	100		let vp = calcVirtualPrice(staked, total)
101	101		[IntegerEntry(keyTotalCompound, total), IntegerEntry(keyLastVP, vp)]
102	102		}
103	103
104	104
105	105		func handleStakingTopUp (amount) = {
106	106		let currentInterest = tryGetInteger(keyGlobalLastInterest)
107	107		let totalStakedAmount = tryGetInteger(keyGlobalStaked)
108	108		let interestDelta = if ((totalStakedAmount > 0))
109	109		then fraction(amount, Scale, totalStakedAmount)
110	110		else 0
111	111		[IntegerEntry(keyGlobalEggEarned, (tryGetInteger(keyGlobalEggEarned) + amount)), IntegerEntry(keyGlobalLastInterest, (currentInterest + interestDelta))]
112	112		}
113	113
114	114
115	115		@Callable(i)
116	116		func topUpReward () = {
117	117		let eggAssetId = getEggId()
118	118		let shareTokenId = getShareAssetId()
119	119		if ((i.payments[0].assetId != eggAssetId))
120	120		then throw("Wrong assetId, first payment should be EGG")
121	121		else if ((i.payments[1].assetId != shareTokenId))
122	122		then throw("Wrong assetId, second payment should be farm tokens")
123	123		else {
124	124		let resHandleStaking = handleStakingTopUp(i.payments[0].amount)
125	125		let resHandleCompound = handleCompoundTopUp(i.payments[1].amount)
126	126		$Tuple2((resHandleCompound ++ resHandleStaking), true)
127	127		}
128	128		}
129	129
130	130
131	131
132	132		@Callable(i)
133		-	func withdrawFarmTokens (amount,compound) = {
134		-	let shareTokenId = getShareAssetId()
135		-	if (compound)
136		-	then {
137		-	let staked = tryGetInteger(keyStakedCompound)
138		-	let total = tryGetInteger(keyTotalCompound)
139		-	let vp = calcVirtualPrice(staked, total)
140		-	let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
141		-	let personalStaked = tryGetInteger(keyStakedCompoundU)
142		-	let virtualWd = if ((amount == -1))
143		-	then personalStaked
144		-	else fraction(amount, VPScale, vp)
145		-	let amountWd = if ((amount == -1))
146		-	then fraction(virtualWd, vp, VPScale)
147		-	else amount
148		-	if ((virtualWd > personalStaked))
149		-	then throw("You don't have so much funds to withdraw")
150		-	else [IntegerEntry(keyStakedCompoundU, (personalStaked - virtualWd)), IntegerEntry(keyStakedCompound, (staked - virtualWd)), IntegerEntry(keyTotalCompound, (total - amountWd)), ScriptTransfer(i.caller, amountWd, shareTokenId), IntegerEntry(keyLastVP, vp), IntegerEntry("last_virt_compound_wd", virtualWd), IntegerEntry("last_amount_compound_wd", amountWd)]
151		-	}
152		-	else {
153		-	let addressStr = toString(i.caller)
154		-	let stakedAmount = tryGetInteger(keyStakedAmount(i.caller))
155		-	let wdAmount = if ((amount == -1))
156		-	then stakedAmount
157		-	else amount
158		-	if ((wdAmount > stakedAmount))
159		-	then throw("you don't have tokens available")
160		-	else (claimStakingResult(i.caller) ++ [IntegerEntry(keyStakedAmount(i.caller), (stakedAmount - wdAmount)), IntegerEntry(keyGlobalStaked, (tryGetInteger(keyGlobalStaked) - wdAmount)), ScriptTransfer(i.caller, wdAmount, shareTokenId), IntegerEntry("last_staking_wd", wdAmount)])
161		-	}
162		-	}
	133	+	func withdrawFarmTokens (amount,compound) = if ((size(i.payments) > 0))
	134	+	then throw("Please don't add payments")
	135	+	else {
	136	+	let shareTokenId = getShareAssetId()
	137	+	if (compound)
	138	+	then {
	139	+	let staked = tryGetInteger(keyStakedCompound)
	140	+	let total = tryGetInteger(keyTotalCompound)
	141	+	let vp = calcVirtualPrice(staked, total)
	142	+	let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
	143	+	let personalStaked = tryGetInteger(keyStakedCompoundU)
	144	+	let virtualWd = if ((amount == -1))
	145	+	then personalStaked
	146	+	else fraction(amount, VPScale, vp)
	147	+	let amountWd = if ((amount == -1))
	148	+	then fraction(virtualWd, vp, VPScale)
	149	+	else amount
	150	+	if ((virtualWd > personalStaked))
	151	+	then throw("You don't have so much funds to withdraw")
	152	+	else [IntegerEntry(keyStakedCompoundU, (personalStaked - virtualWd)), IntegerEntry(keyStakedCompound, (staked - virtualWd)), IntegerEntry(keyTotalCompound, (total - amountWd)), ScriptTransfer(i.caller, amountWd, shareTokenId), IntegerEntry(keyLastVP, vp), IntegerEntry("last_virt_compound_wd", virtualWd), IntegerEntry("last_amount_compound_wd", amountWd)]
	153	+	}
	154	+	else {
	155	+	let addressStr = toString(i.caller)
	156	+	let stakedAmount = tryGetInteger(keyStakedAmount(i.caller))
	157	+	let wdAmount = if ((amount == -1))
	158	+	then stakedAmount
	159	+	else amount
	160	+	if ((wdAmount > stakedAmount))
	161	+	then throw("you don't have tokens available")
	162	+	else (claimStakingResult(i.caller) ++ [IntegerEntry(keyStakedAmount(i.caller), (stakedAmount - wdAmount)), IntegerEntry(keyGlobalStaked, (tryGetInteger(keyGlobalStaked) - wdAmount)), ScriptTransfer(i.caller, wdAmount, shareTokenId), IntegerEntry("last_staking_wd", wdAmount)])
	163	+	}
	164	+	}
163	165
164	166
165	167
166	168		@Callable(i)
167	169		func stakeFarmTokens (compound) = {
168	170		let shareTokenId = getShareAssetId()
169		-	if ((i.payments[0].assetId != shareTokenId))
170		-	then throw("Wrong assetId")
171		-	else if (compound)
172		-	then {
173		-	let isLocked = isCollectiveFarmLocked()
174		-	if (isLocked)
175		-	then throw("The farm is closed for investments, it can't compound")
176		-	else {
177		-	let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
178		-	let alreadyStaked = tryGetInteger(keyStakedCompoundU)
179		-	let total = tryGetInteger(keyTotalCompound)
180		-	let staked = tryGetInteger(keyStakedCompound)
181		-	let vp = calcVirtualPrice(staked, total)
182		-	let rawStakeAmount = i.payments[0].amount
183		-	let exactStakeAmount = fraction(rawStakeAmount, VPScale, vp)
	171	+	if ((size(i.payments) > 1))
	172	+	then throw("To many payments added")
	173	+	else if ((i.payments[0].assetId != shareTokenId))
	174	+	then throw("Wrong assetId")
	175	+	else if (compound)
	176	+	then {
	177	+	let isLocked = isCollectiveFarmLocked()
	178	+	if (isLocked)
	179	+	then throw("The farm is closed for investments, it can't compound")
	180	+	else {
	181	+	let keyStakedCompoundU = keyStakedCompoundUser(i.caller)
	182	+	let alreadyStaked = tryGetInteger(keyStakedCompoundU)
	183	+	let total = tryGetInteger(keyTotalCompound)
	184	+	let staked = tryGetInteger(keyStakedCompound)
	185	+	let vp = calcVirtualPrice(staked, total)
	186	+	let rawStakeAmount = i.payments[0].amount
	187	+	let exactStakeAmount = fraction(rawStakeAmount, VPScale, vp)
184	188		[IntegerEntry(keyStakedCompoundU, (alreadyStaked + exactStakeAmount)), IntegerEntry(keyTotalCompound, (total + rawStakeAmount)), IntegerEntry(keyStakedCompound, (staked + exactStakeAmount)), IntegerEntry(keyLastVP, vp)]
185		-	}
186		-	}
187		-	else {
188		-	let amount = i.payments[0].amount
189		-	let addressStr = toString(i.caller)
190		-	let totalStakedAmount = tryGetInteger(keyGlobalStaked)
191		-	if ((i.payments[0].assetId != shareTokenId))
192		-	then throw("wrong asset attached")
193		-	else (claimStakingResult(i.caller) ++ [IntegerEntry(keyGlobalStaked, (totalStakedAmount + amount)), IntegerEntry(keyStakedAmount(i.caller), (tryGetInteger(keyStakedAmount(i.caller)) + amount))])
194		-	}
	189	+	}
	190	+	}
	191	+	else {
	192	+	let amount = i.payments[0].amount
	193	+	let addressStr = toString(i.caller)
	194	+	let totalStakedAmount = tryGetInteger(keyGlobalStaked)
	195	+	if ((i.payments[0].assetId != shareTokenId))
	196	+	then throw("wrong asset attached")
	197	+	else (claimStakingResult(i.caller) ++ [IntegerEntry(keyGlobalStaked, (totalStakedAmount + amount)), IntegerEntry(keyStakedAmount(i.caller), (tryGetInteger(keyStakedAmount(i.caller)) + amount))])
	198	+	}
195	199		}
196	200
197	201
198	202
199	203		@Callable(i)
200	204		func initiateDapp (address) = if ((i.caller != this))
201	205		then throw("Can be called only by the dapp-account")
202	206		else setCFAddress(address)
203	207
204	208
205	209
206	210		@Callable(i)
207		-	func claimReward () = claimStakingResult(i.caller)
	211	+	func claimReward () = if ((size(i.payments) > 0))
	212	+	then throw("Please don't add payments")
	213	+	else claimStakingResult(i.caller)
208	214
209	215

github/deemru/w8io/3ef1775 
45.48 ms ◑