w8 · tx · F51···MJ6

tx · F516ifH69vbUfArmqfamwC4mzKgmuM16xxxsC7EzrMJ6

3Mp5kisFrqESzrXxAMEPk2k69zpeF41czEE:  -0.01800000 Waves

2023.04.18 13:16 [2539861] smart account 3Mp5kisFrqESzrXxAMEPk2k69zpeF41czEE > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "F516ifH69vbUfArmqfamwC4mzKgmuM16xxxsC7EzrMJ6",
    "fee": 1800000,
    "feeAssetId": null,
    "timestamp": 1681813001433,
    "version": 2,
    "chainId": 84,
    "sender": "3Mp5kisFrqESzrXxAMEPk2k69zpeF41czEE",
    "senderPublicKey": "G349Uq3FTox7dRNLeAfAQeoACvwZ9iEnVSaHcEYn6j8J",
    "proofs": [
        "4tksTr4RSft2Uk8Gc5gxymEtFxTXUBLxhSoekWXZJnDbBuNg9b317jzqP1P1A8rpc7cwkQHcvF2TvaUku7JekPN8"
    ],
    "script": "base64:BgKlGggCEgQKAggBEgASAwoBARIAEgASABIDCgEIEgMKAQgSAwoBCBIFCgMBAQESBQoDAQEBEgASAwoBCBIHCgUICAgICBIDCgEIEgAiA1NFUCIFU0NBTEUiBU1VTFQ4Igp6ZXJvQmlnSW50IhRwcm9jZXNzaW5nU3RhZ2VUb3RhbCIVcHJvY2Vzc2luZ1N0YWdlU2hhcmVzIg5nZXROdW1iZXJCeUtleSIDa2V5Ig9nZXROdW1iZXJPckZhaWwiDmdldFN0cmluZ0J5S2V5Ig9nZXRTdHJpbmdPckZhaWwiA2FicyIDdmFsIglhYnNCaWdJbnQiC2tleU1heERlcHRoIg9tYXhEZXB0aERlZmF1bHQiCG1heERlcHRoIhFrZXlGYWN0b3J5QWRkcmVzcyIRZmFjdG9yeUFkZHJlc3NTdHIiD2ZhY3RvcnlDb250cmFjdCISa2V5RW1pc3Npb25BZGRyZXNzIhlrZXlWb3RpbmdFbWlzc2lvbkNvbnRyYWN0IhZ2b3RpbmdFbWlzc2lvbkNvbnRyYWN0IhNrZXlOdW1Ub1VzZXJNYXBwaW5nIgNudW0iFmtleVJlZmVycmFsUHJvZ3JhbU5hbWUiGnJlZmVycmFsUHJvZ3JhbU5hbWVEZWZhdWx0IhNyZWZlcnJhbFByb2dyYW1OYW1lIhdrZXlSZWZlcnJhbE1pbkdXeEFtb3VudCIbcmVmZXJyYWxNaW5HV3hBbW91bnREZWZhdWx0IhRyZWZlcnJhbE1pbkdXeEFtb3VudCIZa2V5UmVmZXJyZXJSZXdhcmRQZXJtaWxsZSIdcmVmZXJyZXJSZXdhcmRQZXJtaWxsZURlZmF1bHQiFnJlZmVycmVyUmV3YXJkUGVybWlsbGUiGWtleVJlZmVycmFsUmV3YXJkUGVybWlsbGUiHXJlZmVycmFsUmV3YXJkUGVybWlsbGVEZWZhdWx0IhZyZWZlcnJhbFJld2FyZFBlcm1pbGxlIgtrZXlSZWZlcnJlciIPcmVmZXJyYWxBZGRyZXNzIhRrZXlVbmNsYWltZWRSZWZlcnJhbCILcHJvZ3JhbU5hbWUiDmNsYWltZXJBZGRyZXNzIhJlbWlzc2lvbkFkZHJlc3NTdHIiEGVtaXNzaW9uQ29udHJhY3QiDUlkeENmZ0Fzc2V0SWQiFklkeENmZ1BhY2VtYWtlckFkZHJlc3MiFklkeENmZ0Jvb3N0aW5nQ29udHJhY3QiDklkeENmZ01heERlcHRoIglrZXlDb25maWciFXJlYWRDb25maWdBcnJheU9yRmFpbCIMZm9ybWF0Q29uZmlnIgx3eEFzc2V0SWRTdHIiGm1hdGNoZXJQYWNlbWFrZXJBZGRyZXNzU3RyIhpib29zdGluZ0NvbnRyYWN0QWRkcmVzc1N0ciIWYm9vc3RpbmdDb250cmFjdE9yRmFpbCIIY2ZnQXJyYXkiH2tleUd3eFJld2FyZEVtaXNzaW9uU3RhcnRIZWlnaHQiDWtleVVzZXJzQ291bnQiFmtleVJhdGVQZXJCbG9ja0N1cnJlbnQiGmtleUd3eEhvbGRlcnNSZXdhcmRDdXJyZW50IhdrZXlHd3hIb2xkZXJzUmV3YXJkTmV4dCIUa2V5UG9vbFdlaWdodFZpcnR1YWwiFGtleU5leHRQcm9jZXNzZWRVc2VyIg9rZXlMYXRlc3RQZXJpb2QiDWtleU5leHRQZXJpb2QiEmtleVByb2Nlc3NpbmdTdGFnZSIWa2V5TmV4dFByb2Nlc3NlZFBlcmlvZCIQa2V5VXNlclVuY2xhaW1lZCIJdXNlckluZGV4IhtrZXlOZXh0VW5sYWltZWRQZXJpb2RPZlVzZXIiHGtleUxhc3RQcm9jZXNzZWRQZXJpb2RPZlVzZXIiEmtleUhlaWdodEZvclBlcmlvZCIGcGVyaW9kIh1rZXlBdXhFbWlzc2lvblJld2FyZEZvclBlcmlvZCIXa2V5VG90YWxBbW91bnRGb3JQZXJpb2QiEWtleUxhc3RQYXlvdXRJbmZvIhBQZXJpb2RQYXlvdXRJbmZvIg1tYXRjaGVyUmV3YXJkIg5lbWlzc2lvblJld2FyZCIUa2V5UGF5b3V0SGlzdG9yeUluZm8iF2tleVRvdGFsV2VpZ2h0Rm9yUGVyaW9kIhZrZXlVc2VyS1ZhbHVlRm9yUGVyaW9kIhZrZXlVc2VyQlZhbHVlRm9yUGVyaW9kIhZrZXlVc2VyV2VpZ2h0Rm9yUGVyaW9kIhtrZXlSZWZlcnJhbHNDb250cmFjdEFkZHJlc3MiHnJlZmVycmFsc0NvbnRyYWN0QWRkcmVzc09yRmFpbCIMSGlzdG9yeUVudHJ5IgR0eXBlIgR1c2VyIgZhbW91bnQiAWkiCmhpc3RvcnlLRVkiC2hpc3RvcnlEQVRBIhNrZXlNYW5hZ2VyUHVibGljS2V5IhprZXlQZW5kaW5nTWFuYWdlclB1YmxpY0tleSIWbWFuYWdlclB1YmxpY0tleU9yVW5pdCIHJG1hdGNoMCIBcyIdcGVuZGluZ01hbmFnZXJQdWJsaWNLZXlPclVuaXQiC211c3RNYW5hZ2VyIgJwZCICcGsiDmNhbGNVc2VyV2VpZ2h0Ihdib29zdGluZ0NvbnRyYWN0QWRkcmVzcyIPaGVpZ2h0Rm9yUGVyaW9kIgVrTGFzdCIEa0tleSIEa1JhdyILa1VzZXJXZWlnaHQiAWsiAWIiAXciAXAiAnB2IhZjYWxjVXNlcldlaWdodEZvckNsYWltIhB1c2VyV2VpZ2h0T3JVbml0IhVnZXRVc2VySW5kZXhCeUFkZHJlc3MiC3VzZXJBZGRyZXNzIgpuZXh0UGVyaW9kIhFjb21tb25DbGFpbVJld2FyZCIHdXNlcklkeCITdXNlclVuY2xhaW1lZE9wdGlvbiIBdSIOZ1d4QW1vdW50U3RhcnQiCHJlZmVycmVyIhFhY3RpdmVSZWZlcnJhbEludiIPcHJvY2Vzc2luZ1N0YWdlIg1jdXJyZW50UGVyaW9kIgtjdXJyZW50VXNlciIMbGF0ZXN0UGVyaW9kIgp1c2Vyc0NvdW50Ig50b3RhbFdlaWdodEtleSILdG90YWxXZWlnaHQiDSR0MDEyNDE1MTI1MzEiCnVzZXJXZWlnaHQiC3VzZXJBY3Rpb25zIg50b3RhbFdlaWdodE5ldyIRcHJvY2Vzc2luZ0FjdGlvbnMiGnVzZXJBbW91bnRNYXRjaGVyRm9yUGVyaW9kIht1c2VyQW1vdW50RW1pc3Npb25Gb3JQZXJpb2QiD3VzZXJUb3RhbEFtb3VudCILcmVmZXJyYWxJbnYiDnJlZmVycmVyUmV3YXJkIg5yZWZlcnJhbFJld2FyZCIQdW5jbGFpbWVkQWN0aW9ucyIHY291bnRlciIGcmVzdWx0IgFAIgtjaGVja0NhbGxlciIGZGVsdGFIIgxlbWlzc2lvblJhdGUiF2d3eEhvbGRlcnNSZXdhcmRDdXJyZW50IglhdXhBbW91bnQiAmVtIgttYXRjaGVyUGFydCIKcGF5b3V0SW5mbyIXZ3d4SG9sZGVyc1Jld2FyZFVwZGF0ZWQiC3RvdGFsUmV3YXJkIgdhY3Rpb25zIgdhZGRyZXNzIg0kdDAxNzcyMDE3NzcwIgtjaGVja0Ftb3VudCISYW1vdW50RnJvbUVtaXNzaW9uIg9jbGFpbWVkUmVmZXJyYWwiC3RvdGFsQW1vdW50Ig0kdDAxODM0MzE4MzkzIhFyZWZlcnJhbFVuY2xhaW1lZCIOZ3d4QW1vdW50U3RhcnQiD2xvY2tTdGFydEhlaWdodCISbG9ja0R1cmF0aW9uQmxvY2tzIg1sb2NrRW5kSGVpZ2h0IgxzY2FsZThQYXJhbUsiDHNjYWxlOFBhcmFtQiIMd3hMb2NrQW1vdW50Igxsb2NrRHVyYXRpb24iD21heExvY2tEdXJhdGlvbiIHY29lZmZYOCILeDFCaWdJbnRTdHIiC3gyQmlnSW50U3RyIgxhbXBCaWdJbnRTdHIiE2FQcmVjaXNpb25CaWdJbnRTdHIiGHRhcmdldFByZWNpc2lvbkJpZ0ludFN0ciIGbkNvaW5zIgphUHJlY2lzaW9uIg90YXJnZXRQcmVjaXNpb24iAngxIgJ4MiIDYW1wIgNhbm4iA2FyciIEY2FsYyIDYWNjIgNjdXIiDSR0MDIxMDI2MjEwNTMiAWQiBWRQcmV2IgVmb3VuZCICZHAiBWROZXh0IgVkRGlmZiINJHQwMjE2NTEyMTcxNCICJGwiAiRzIgUkYWNjMCIFJGYwXzEiAiRhIgIkaSIFJGYwXzIiF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5IhVjaGVja01hbmFnZXJQdWJsaWNLZXkiAnBtIgVoYXNQTSIHY2hlY2tQTSICdHgiBnZlcmlmeSIPdGFyZ2V0UHVibGljS2V5UwABYQICX18AAWIA6AcAAWMAgMLXLwABZAkAtgIBAAAAAWUAAAABZgABAQFnAQFoCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFAWgAAAEBaQEBaAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFBHRoaXMFAWgJAKwCAgkArAICAg9tYW5kYXRvcnkgdGhpcy4FAWgCDyBpcyBub3QgZGVmaW5lZAEBagEBaAkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzBQFoAgABAWsBAWgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQFoCQCsAgIJAKwCAgIPbWFuZGF0b3J5IHRoaXMuBQFoAg8gaXMgbm90IGRlZmluZWQBAWwBAW0DCQBmAgAABQFtCQEBLQEFAW0FAW0BAW4BAW0DCQC/AgIFAWQFAW0JAL4CAQUBbQUBbQABbwIMJXNfX21heERlcHRoAAFwAB4AAXEJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUBbwUBcAEBcgACHCVzJXNfX2NvbmZpZ19fZmFjdG9yeUFkZHJlc3MAAXMJAQFrAQkBAXIAAAF0CQERQGV4dHJOYXRpdmUoMTA2MikBBQFzAQF1AAIdJXMlc19fY29uZmlnX19lbWlzc2lvbkFkZHJlc3MBAXYACQC5CQIJAMwIAgICJXMJAMwIAgIWdm90aW5nRW1pc3Npb25Db250cmFjdAUDbmlsBQFhAAF3CQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1MykCBQF0CQEBdgABAXgBAXkJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIHbWFwcGluZwkAzAgCAghudW0ydXNlcgkAzAgCCQCkAwEFAXkFA25pbAUBYQABegkAuQkCCQDMCAICBCVzJXMJAMwIAgIIcmVmZXJyYWwJAMwIAgILcHJvZ3JhbU5hbWUFA25pbAUBYQABQQIGd3hsb2NrAAFCCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMFAXoFAUEAAUMJALkJAgkAzAgCAgQlcyVzCQDMCAICCHJlZmVycmFsCQDMCAICDG1pbkdXeEFtb3VudAUDbmlsBQFhAAFECQBoAgD0AwUBYwABRQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQFDBQFEAAFGCQC5CQIJAMwIAgIEJXMlcwkAzAgCAghyZWZlcnJhbAkAzAgCAhZyZWZlcnJlclJld2FyZFBlcm1pbGxlBQNuaWwFAWEAAUcAMgABSAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQFGBQFHAAFJCQC5CQIJAMwIAgIEJXMlcwkAzAgCAghyZWZlcnJhbAkAzAgCAhZyZWZlcnJhbFJld2FyZFBlcm1pbGxlBQNuaWwFAWEAAUoAMgABSwkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQFJBQFKAQFMAQFNCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICCHJlZmVycmVyCQDMCAIFAUIJAMwIAgUBTQUDbmlsBQFhAQFOAgFPAVAJALkJAgkAzAgCAgYlcyVzJXMJAMwIAgIRdW5jbGFpbWVkUmVmZXJyYWwJAMwIAgUBTwkAzAgCBQFQBQNuaWwFAWEAAVEJAQFrAQkBAXUAAAFSCQERQGV4dHJOYXRpdmUoMTA2MikBBQFRAAFTAAEAAVQAAgABVQADAAFWAAQBAVcAAgolc19fY29uZmlnAQFYAAkAtQkCCQEBawEJAQFXAAUBYQEBWQQBWgJhYQJhYgFxCQC5CQIJAMwIAgIIJXMlcyVzJWQJAMwIAgUBWgkAzAgCBQJhYQkAzAgCBQJhYgkAzAgCCQCkAwEFAXEFA25pbAUBYQECYWMABAJhZAkBAVgACQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQJhZAUBVQIoYm9vc3RpbmcgY29udHJhY3QgYWRkcmVzcyBpcyBub3QgZGVmaW5lZAECYWUAAiglcyVzX19nd3hSZXdhcmRFbWlzc2lvblBhcnRfX3N0YXJ0SGVpZ2h0AQJhZgACDyVzX19uZXh0VXNlck51bQECYWcAAhslcyVzX19yYXRlUGVyQmxvY2tfX2N1cnJlbnQBAmFoAAIfJXMlc19fZ3d4SG9sZGVyc1Jld2FyZF9fY3VycmVudAECYWkAAhwlcyVzX19nd3hIb2xkZXJzUmV3YXJkX19uZXh0AQJhagACICVzJXNfX3Bvb2xXZWlnaHRfX0dXWHZpcnR1YWxQT09MAQJhawACFSVzX19uZXh0UHJvY2Vzc2VkVXNlcgECYWwAAhAlc19fbGF0ZXN0UGVyaW9kAQJhbQACDiVzX19uZXh0UGVyaW9kAQJhbgACEyVzX19wcm9jZXNzaW5nU3RhZ2UBAmFvAAIXJXNfX25leHRQcm9jZXNzZWRQZXJpb2QBAmFwAQJhcQkAuQkCCQDMCAICBCVzJWQJAMwIAgINdXNlclVuY2xhaW1lZAkAzAgCCQCkAwEFAmFxBQNuaWwFAWEBAmFyAQJhcQkAuQkCCQDMCAICFyVzJWRfX25leHRDbGFpbWVkUGVyaW9kCQDMCAIJAKQDAQUCYXEFA25pbAUBYQECYXMBAmFxCQC5CQIJAMwIAgIZJXMlZF9fbGFzdFByb2Nlc3NlZFBlcmlvZAkAzAgCCQCkAwEFAmFxBQNuaWwFAWEBAmF0AQJhdQkAuQkCCQDMCAICGiVzJWRfX3N0YXJ0SGVpZ2h0Rm9yUGVyaW9kCQDMCAIJAKQDAQUCYXUFA25pbAUBYQECYXYBAmF1CQC5CQIJAMwIAgIXJXMlZF9fYXV4RW1pc3Npb25SZXdhcmQJAMwIAgkApAMBBQJhdQUDbmlsBQFhAQJhdwECYXUJALkJAgkAzAgCAholcyVkX190b3RhbEFtb3VudEZvclBlcmlvZAkAzAgCCQCkAwEFAmF1BQNuaWwFAWEBAmF4AAISJXNfX2xhc3RQYXlvdXRJbmZvAQJheQMCYXUCYXoCYUEJALkJAgkAzAgCAgYlZCVkJWQJAMwIAgkApAMBBQJhdQkAzAgCCQCkAwEFAmF6CQDMCAIJAKQDAQUCYUEFA25pbAUBYQECYUIBAmF1CQC5CQIJAMwIAgIYJXMlcyVkX19wYXlvdXRzX19oaXN0b3J5CQDMCAIJAKQDAQUCYXUFA25pbAUBYQECYUMBAmF1CQC5CQIJAMwIAgIaJXMlZF9fdG90YWxXZWlnaHRGb3JQZXJpb2QJAMwIAgkApAMBBQJhdQUDbmlsBQFhAQJhRAICYXUCYXEJALkJAgkAzAgCAhclcyVkJXMlZF9fcGFyYW1CeVBlcmlvZAkAzAgCCQCkAwEFAmFxCQDMCAICAWsJAMwIAgkApAMBBQJhdQUDbmlsBQFhAQJhRQICYXUCYXEJALkJAgkAzAgCAhclcyVkJXMlZF9fcGFyYW1CeVBlcmlvZAkAzAgCCQCkAwEFAmFxCQDMCAICAWIJAMwIAgkApAMBBQJhdQUDbmlsBQFhAQJhRgICYXUCYXEJALkJAgkAzAgCAhclcyVkJXMlZF9fcGFyYW1CeVBlcmlvZAkAzAgCCQCkAwEFAmFxCQDMCAICBndlaWdodAkAzAgCCQCkAwEFAmF1BQNuaWwFAWEBAmFHAAkAuQkCCQDMCAICBCVzJXMJAMwIAgIGY29uZmlnCQDMCAICGHJlZmVycmFsc0NvbnRyYWN0QWRkcmVzcwUDbmlsBQFhAAJhSAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAWsBCQECYUcAAQJhSQQCYUoCYUsCYUwCYU0EAmFOCQC5CQIJAMwIAgIRJXMlcyVzJXNfX2hpc3RvcnkJAMwIAgUCYUoJAMwIAgUCYUsJAMwIAgkA2AQBCAUCYU0NdHJhbnNhY3Rpb25JZAUDbmlsBQFhBAJhTwkAuQkCCQDMCAICDCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEIBQlsYXN0QmxvY2sGaGVpZ2h0CQDMCAIJAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkApAMBBQJhTAUDbmlsBQFhCQELU3RyaW5nRW50cnkCBQJhTgUCYU8BAmFQAAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBAmFRAAIbJXNfX3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AQJhUgAEAmFTCQCiCAEJAQJhUAADCQABAgUCYVMCBlN0cmluZwQCYVQFAmFTCQDZBAEFAmFUAwkAAQIFAmFTAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IBAmFVAAQCYVMJAKIIAQkBAmFRAAMJAAECBQJhUwIGU3RyaW5nBAJhVAUCYVMJANkEAQUCYVQDCQABAgUCYVMCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECYVYBAmFNBAJhVwkAAgECEVBlcm1pc3Npb24gZGVuaWVkBAJhUwkBAmFSAAMJAAECBQJhUwIKQnl0ZVZlY3RvcgQCYVgFAmFTAwkAAAIIBQJhTQ9jYWxsZXJQdWJsaWNLZXkFAmFYBgUCYVcDCQABAgUCYVMCBFVuaXQDCQAAAggFAmFNBmNhbGxlcgUEdGhpcwYFAmFXCQACAQILTWF0Y2ggZXJyb3IBAmFZBAJhWgJiYQJhdQJhcQQCYmIJAQJhcwEFAmFxBAJiYwkBAmFEAgUCYXUFAmFxBAJiZAkAmggCBQJhWgUCYmMEAmJlCQECYUYCBQJhdQUCYXEDCQEJaXNEZWZpbmVkAQUCYmQEAmJmCQEFdmFsdWUBBQJiZAQCYmcJAQV2YWx1ZQEJAJoIAgUCYVoJAQJhRQIFAmF1BQJhcQQCYmgJAGQCCQBoAgUCYmYFAmJhBQJiZwMJAGYCBQJiaAAACQCUCgIJAGkCBQJiaAUBYgkAzAgCCQEMSW50ZWdlckVudHJ5AgUCYmIFAmF1CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJiZQUCYmgFA25pbAkAlAoCAAAFA25pbAQCYmkJAJoIAgUEdGhpcwUCYmIDAwkBCWlzRGVmaW5lZAEFAmJpCQBnAgUCYXUJAQV2YWx1ZQEFAmJpBwQCYmoJAQV2YWx1ZQEFAmJpBAJiZgkBBXZhbHVlAQkAmggCBQJhWgkBAmFEAgUCYmoFAmFxBAJiZwkBBXZhbHVlAQkAmggCBQJhWgkBAmFFAgUCYmoFAmFxBAJiaAkAZAIJAGgCBQJiZgUCYmEFAmJnAwkAZgIFAmJoAAAJAJQKAgkAaQIFAmJoBQFiCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJiZQUCYmgFA25pbAkAlAoCAAAFA25pbAkAlAoCAAAFA25pbAECYmsEAmFaAmJhAmF1AmFxBAJiZQkBAmFGAgUCYXUFAmFxBAJibAkAnwgBBQJiZQQCYVMFAmJsAwkAAQIFAmFTAgRVbml0AAADCQABAgUCYVMCA0ludAQCYmgFAmFTCQBpAgUCYmgFAWIJAAIBAgtNYXRjaCBlcnJvcgECYm0CAmFiAmJuBAFoCQC5CQIJAMwIAgIGJXMlcyVzCQDMCAICB21hcHBpbmcJAMwIAgIIdXNlcjJudW0JAMwIAgUCYm4FA25pbAUBYQkBDXBhcnNlSW50VmFsdWUBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgkBB0FkZHJlc3MBCQDZBAEFAmFiBQFoCQCsAgIJAKwCAgkArAICAg1Vc2VyIGFkZHJlc3MgBQJibgItIGlzIG5vdCBmb3VuZCBpbiBib29zdGluZyBjb250cmFjdCBkYXRhLCBrZXk9BQFoAQJibwAJAQFnAQkBAmFtAAECYnABAmJuBAJhZAkBAVgABAJicQkBAmJtAgkAkQMCBQJhZAUBVQUCYm4EAmJyCQCfCAEJAQJhcAEFAmJxBAJhUwUCYnIDCQABAgUCYVMCBFVuaXQJAJQKAgAABQNuaWwDCQABAgUCYVMCA0ludAQCYnMFAmFTCQCUCgIFAmJzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYXABBQJicQAABQNuaWwJAAIBAgtNYXRjaCBlcnJvchACYU0BFnVwZGF0ZVJlZmVycmFsQWN0aXZpdHkCAmJuAmJ0BAJidQkAnQgCBQJhSAkBAUwBBQJibgQCYnYDCQAAAgUCYnUFBHVuaXQFBHVuaXQJAPwHBAUCYUgCFnVwZGF0ZVJlZmVycmFsQWN0aXZpdHkJAMwIAgUBQgkAzAgCBQJibgkAzAgCCQBnAgUCYnQFAUUFA25pbAUDbmlsAwkAAAIFAmJ2BQJidgkAlAoCBQNuaWwFBHVuaXQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CYU0BDmZpbmFsaXplSGVscGVyAAQCYncJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBAmFuAAUBZQQCYngJAQFnAQkBAmFvAAQCYnkJAQFnAQkBAmFrAAQCYnoJAQFnAQkBAmFsAAQCYkEJAQt2YWx1ZU9yRWxzZQIJAJoIAgkBAmFjAAkBAmFmAAAABAJiQgkBAmFDAQUCYngEAmJDCQEBZwEJAQJhQwEFAmJ4BAJiYQkBAWcBCQECYXQBBQJieAMJAGYCBQJieAUCYnoJAJQKAgUDbmlsBwMJAAACBQJidwUBZQQCYkQJAQJhWQQJAQJhYwAFAmJhBQJieAUCYnkEAmJFCAUCYkQCXzEEAmJGCAUCYkQCXzIEAmJHCQBkAgUCYkMFAmJFBAJiSAMJAGYCCQBlAgUCYkEAAQUCYnkJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhawAJAGQCBQJieQABBQNuaWwJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhbgAFAWYJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhawAAAAUDbmlsCQCUCgIJAM4IAgkAzggCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQJiQgUCYkcFA25pbAUCYkgFAmJGBgMJAAACBQJidwUBZgQCYkUJAQJiawQJAQJhYwAFAmJhBQJieAUCYnkEAmJJCQBrAwkBAWcBCQECYXcBBQJieAUCYkUFAmJDBAJiSgkAawMJAQFnAQkBAmF2AQUCYngFAmJFBQJiQwQCYksJAGQCBQJiSgUCYkkEAmJyCQCfCAEJAQJhcAEFAmJ5BAJibgkBEUBleHRyTmF0aXZlKDEwNTMpAgkBAmFjAAkBAXgBBQJieQQCYnUJAJ0IAgUCYUgJAQFMAQUCYm4EAmJ2AwkAAAIFAmJ1BQR1bml0BQR1bml0CQD8BwQFAmFIAhZ1cGRhdGVSZWZlcnJhbEFjdGl2aXR5CQDMCAIFAUIJAMwIAgUCYm4JAMwIAgkAZwIFAmJFBQFFBQNuaWwFA25pbAMJAAACBQJidgUCYnYEAmJMAwMJAAACBQJidQUEdW5pdAYJAGYCBQFFBQJiRQUEdW5pdAQCYk0JAGsDBQJiSwUBSAUBYgQCYk4JAGsDBQJiSwUBSwUBYgkA/AcEBQJhSAIMaW5jVW5jbGFpbWVkCQDMCAIFAUIJAMwIAgUCYm4JAMwIAgUCYk0JAMwIAgUCYk4FA25pbAUDbmlsAwkAAAIFAmJMBQJiTAQCYk8JAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhcAEFAmJ5CQBkAgkBC3ZhbHVlT3JFbHNlAgUCYnIAAAUCYksFA25pbAQCYkgDCQBmAgkAZQIFAmJBAAEFAmJ5CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYWsACQBkAgUCYnkAAQUDbmlsCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYW8ACQBkAgUCYngAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmFrAAAACQDMCAIJAQtEZWxldGVFbnRyeQEJAQJhbgAFA25pbAkAlAoCCQDOCAIFAmJPBQJiSAYJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhhpbnZhbGlkIHByb2Nlc3Npbmcgc3RhZ2UCYU0BD2ZpbmFsaXplV3JhcHBlcgECYlAEAmJRCgACYlIJAPwHBAUEdGhpcwIOZmluYWxpemVIZWxwZXIFA25pbAUDbmlsAwkAAQIFAmJSAgdCb29sZWFuBQJiUgkAAgEJAKwCAgkAAwEFAmJSAhwgY291bGRuJ3QgYmUgY2FzdCB0byBCb29sZWFuAwkAAAIFAmJRBQJiUQMJAQEhAQUCYlEDCQAAAgUCYlAFAXEJAAIBAhJOb3RoaW5nIHRvIHByb2Nlc3MJAJQKAgUDbmlsBQR1bml0AwkAZgIFAmJQAAAJAJQKAgUDbmlsCQD8BwQFBHRoaXMCD2ZpbmFsaXplV3JhcHBlcgkAzAgCCQBlAgUCYlAAAQUDbmlsBQNuaWwJAJQKAgUDbmlsBQR1bml0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmFNAR1wcm9jZXNzUGVuZGluZ1BlcmlvZHNBbmRVc2VycwAJAJQKAgUDbmlsCQD8BwQFBHRoaXMCD2ZpbmFsaXplV3JhcHBlcgkAzAgCBQFxBQNuaWwFA25pbAJhTQEHZGVwb3NpdAAEAmJTAwkAAAIIBQJhTQZjYWxsZXIFAXcGCQECYVYBBQJhTQMJAAACBQJiUwUCYlMEAmF1CQECYm8ABAJiVAkAZQIFBmhlaWdodAkBAWkBCQECYWUABAJiVQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFAVIJAQJhZwAJAKwCAgkArAICAhxtYW5kYXRvcnkgZW1pc3Npb25fY29udHJhY3QuCQECYWcAAg8gaXMgbm90IGRlZmluZWQEAmJWCQELdmFsdWVPckVsc2UCCQCaCAIFAVIJAQJhaAAAAAMJAAACBQJiVgUCYlYEAmJXCQBrAwkAaAIFAmJUBQJiVgUCYlUFAWMEAmJYAwkAZgIFAmJXAAAJAPwHBAUBUgIEZW1pdAkAzAgCBQJiVwUDbmlsBQNuaWwFBHVuaXQDCQAAAgUCYlgFAmJYBAJiWQAABAJiWgkBAmF5AwUCYXUFAmJZBQJiVwQCY2EKAAJiUgkA/AcEBQFSAhZnd3hIb2xkZXJzUmV3YXJkVXBkYXRlBQNuaWwFA25pbAMJAAECBQJiUgIHQm9vbGVhbgUCYlIJAAIBCQCsAgIJAAMBBQJiUgIcIGNvdWxkbid0IGJlIGNhc3QgdG8gQm9vbGVhbgMJAAACBQJjYQUCY2EEAmNiCQBkAgUCYlkFAmJXBAJjYwMDCQAAAgUCY2IAAAkBASEBBQJjYQcFA25pbAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmFsAAUCYXUJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhdAEFAmF1BQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhdgEFAmF1BQJiVwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAmFlAAUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYXcBBQJhdQUCYlkJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJhbQAJAGQCBQJhdQABCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJheAAFAmJaCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhQgEFAmF1BQJiWgUDbmlsCQCUCgIFAmNjBQR1bml0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmFNAQtjbGFpbVJld2FyZAAEAmFkCQEBWAAEAmNkCQClCAEIBQJhTQZjYWxsZXIEAmNlCQECYnABBQJjZAQCYUwIBQJjZQJfMQQCY2MIBQJjZQJfMgQCY2YDCQBmAgUCYUwAAAYJAAIBAhBOb3RoaW5nIHRvIGNsYWltAwkAAAIFAmNmBQJjZgQCY2cAAAQCY2gKAAJiUgkA/AcEBQJhSAIFY2xhaW0JAMwIAgUBQgUDbmlsBQNuaWwDCQABAgUCYlICA0ludAUCYlIJAAIBCQCsAgIJAAMBBQJiUgIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50BAJjaQkAZAIFAmFMBQJjaAkAlAoCCQDOCAIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAmFNBmNhbGxlcgUCY2kJANkEAQkAkQMCBQJhZAUBUwkAzAgCCQECYUkEAgVjbGFpbQUCY2QFAmFMBQJhTQUDbmlsBQJjYwkAzAgCBQJjaQkAzAgCBQJjZwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmFNARNjbGFpbVJld2FyZFJFQURPTkxZAQJjZAQCY2oJAQJicAEFAmNkBAJhTAgFAmNqAl8xBAJjYwgFAmNqAl8yBAJjawkBC3ZhbHVlT3JFbHNlAgkAmggCBQJhSAkBAU4CBQFCBQJjZAAABAJjaQkAZAIFAmFMBQJjawkAlAoCBQNuaWwFAmNpAmFNAR1sYXRlc3RGaW5hbGl6ZWRQZXJpb2RSRUFET05MWQECY2QJAJQKAgUDbmlsCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAQJhbAAA////////////AQJhTQEhbGF0ZXN0RmluYWxpemVkUGVyaW9kSW5mb1JFQURPTkxZAQJjZAkAlAoCBQNuaWwJAQFqAQkBAmF4AAJhTQEVY2FsY0d3eFBhcmFtc1JFQURPTkxZAwJjbAJjbQJjbgQCY28JAGQCBQJjbQUCY24EAmNwCQEBLQEJAGsDBQJjbAUBYgUCY24EAmNxCQBoAgkAawMFAmNsBQFiBQJjbgUCY28JAJQKAgUDbmlsCQDMCAIFAmNwCQDMCAIFAmNxCQDMCAIJAQJibwAFA25pbAJhTQEaY2FsY0d3eEFtb3VudFN0YXJ0UkVBRE9OTFkDAmNyAmNzAmN0BAJjdQkAawMFAmNzBQFjBQJjdAQCYnQJAGsDBQJjcgUCY3UFAWMJAJQKAgUDbmlsCQDMCAIFAmJ0BQNuaWwCYU0BFW9uRW1pc3Npb25Gb3JHd3hTdGFydAADCQECIT0CCAUCYU0GY2FsbGVyBQF0CQACAQIScGVybWlzc2lvbnMgZGVuaWVkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECYWUABQZoZWlnaHQFA25pbAJhTQEjbGF0ZXN0UGVyaW9kRW1pc3Npb25SZXdhcmRzUkVBRE9OTFkBAmNkBAJhdQkBAmJvAAkAlAoCBQNuaWwJAMwIAgkBAWcBCQECYXYBBQJhdQUDbmlsAmFNAQVjYWxjRAUCY3YCY3cCY3gCY3kCY3oEAmNBCQC2AgEAAgQCY0IJAKcDAQUCY3kEAmNDCQCnAwEFAmN6BAJjRAkApwMBBQJjdgQCY0UJAKcDAQUCY3cEAmNGCQC5AgIJAKcDAQUCY3gFAmNCBAJhVAkAtwICBQJjRAUCY0UDCQAAAgUCYVQFAWQJAJQKAgUDbmlsCQCmAwEFAWQEAmNHCQC5AgIFAmNGBQJjQQQCY0gJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUJAMwIAgAGBQNuaWwKAQJjSQICY0oCY0sEAmNMBQJjSgQCY00IBQJjTAJfMQQCY04IBQJjTAJfMgQCY08IBQJjTAJfMwMJAQIhPQIFAmNPBQR1bml0BQJjSgQCY1AJALoCAgkAuQICCQC5AgIFAmNNBQJjTQUCY00JALkCAgkAuQICCQC5AgIFAmNEBQJjRQUCY0EFAmNBBAJjUQkAugICCQC5AgIJALcCAgkAugICCQC5AgIFAmNHBQJhVAUCY0IJALkCAgUCY1AFAmNBBQJjTQkAtwICCQC6AgIJALkCAgkAuAICBQJjRwUCY0IFAmNNBQJjQgkAuQICCQC3AgIFAmNBCQC2AgEAAQUCY1AEAmNSCQEBbgEJALgCAgUCY1EJAQV2YWx1ZQEFAmNNAwkAwAICBQJjQwUCY1IJAJUKAwUCY1EFAmNNBQJjSwkAlQoDBQJjUQUCY00FBHVuaXQEAmNTCgACY1QFAmNICgACY1UJAJADAQUCY1QKAAJjVgkAlQoDBQJhVAUEdW5pdAUEdW5pdAoBAmNXAgJjWAJjWQMJAGcCBQJjWQUCY1UFAmNYCQECY0kCBQJjWAkAkQMCBQJjVAUCY1kKAQJjWgICY1gCY1kDCQBnAgUCY1kFAmNVBQJjWAkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDcJAQJjWgIJAQJjVwIJAQJjVwIJAQJjVwIJAQJjVwIJAQJjVwIJAQJjVwIJAQJjVwIFAmNWAAAAAQACAAMABAAFAAYABwQCY1EIBQJjUwJfMQQCY04IBQJjUwJfMgQCY08IBQJjUwJfMwMJAQIhPQIFAmNPBQR1bml0CQCUCgIFA25pbAkApgMBBQJjUQQCY1IJAQFuAQkAuAICBQJjUQkBBXZhbHVlAQUCY04JAAIBCQCsAgICHUQgY2FsY3VsYXRpb24gZXJyb3IsIGREaWZmID0gCQCmAwEFAmNSAmFNAQpzZXRNYW5hZ2VyAQJkYQQCYlMJAQJhVgEFAmFNAwkAAAIFAmJTBQJiUwQCZGIJANkEAQUCZGEDCQAAAgUCZGIFAmRiCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhUQAFAmRhBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CYU0BDmNvbmZpcm1NYW5hZ2VyAAQCZGMJAQJhVQAEAmRkAwkBCWlzRGVmaW5lZAEFAmRjBgkAAgECEk5vIHBlbmRpbmcgbWFuYWdlcgMJAAACBQJkZAUCZGQEAmRlAwkAAAIIBQJhTQ9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAmRjBgkAAgECG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQJkZQUCZGUJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFQAAkA2AQBCQEFdmFsdWUBBQJkYwkAzAgCCQELRGVsZXRlRW50cnkBCQECYVEABQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmRmAQJkZwAEAmRoBAJhUwkBAmFSAAMJAAECBQJhUwIKQnl0ZVZlY3RvcgQCYVgFAmFTBQJhWAMJAAECBQJhUwIEVW5pdAgFAmRmD3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yCQD0AwMIBQJkZglib2R5Qnl0ZXMJAJEDAggFAmRmBnByb29mcwAABQJkaN5vt30=",
    "height": 2539861,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Fjy5zC31WL1bKgvRC7dEx4yMMbErWjVvPvHDaNynFMmx
Next: 7XZdzfB3UDxSNaT5fGVgffHP3ZCa4PhVm4ErnowPNAaP

Diff: 
Old New Differences
427 427              let deltaH = (height - getNumberOrFail(keyGwxRewardEmissionStartHeight()))
428 428              let emissionRate = valueOrErrorMessage(getInteger(emissionContract, keyRatePerBlockCurrent()), (("mandatory emission_contract." + keyRatePerBlockCurrent()) + " is not defined"))
429 429              let gwxHoldersRewardCurrent = valueOrElse(getInteger(emissionContract, keyGwxHoldersRewardCurrent()), 0)
430 -             let auxAmount = fraction((deltaH * gwxHoldersRewardCurrent), emissionRate, MULT8)
431 -             let em = if ((auxAmount > 0))
432 -                 then invoke(emissionContract, "emit", [auxAmount], nil)
433 -                 else unit
434 -             if ((em == em))
430 +             if ((gwxHoldersRewardCurrent == gwxHoldersRewardCurrent))
435 431                  then {
436 -                     let matcherPart = 0
437 -                     let payoutInfo = PeriodPayoutInfo(period, matcherPart, auxAmount)
438 -                     let gwxHoldersRewardUpdate = invoke(emissionContract, "gwxHoldersRewardUpdate", nil, nil)
439 -                     if ((gwxHoldersRewardUpdate == gwxHoldersRewardUpdate))
432 +                     let auxAmount = fraction((deltaH * gwxHoldersRewardCurrent), emissionRate, MULT8)
433 +                     let em = if ((auxAmount > 0))
434 +                         then invoke(emissionContract, "emit", [auxAmount], nil)
435 +                         else unit
436 +                     if ((em == em))
440 437                          then {
441 -                             let totalReward = (matcherPart + auxAmount)
442 -                             let actions = if ((totalReward == 0))
443 -                                 then nil
444 -                                 else [IntegerEntry(keyLatestPeriod(), period), IntegerEntry(keyHeightForPeriod(period), height), IntegerEntry(keyAuxEmissionRewardForPeriod(period), auxAmount), IntegerEntry(keyGwxRewardEmissionStartHeight(), height), IntegerEntry(keyTotalAmountForPeriod(period), matcherPart), IntegerEntry(keyNextPeriod(), (period + 1)), StringEntry(keyLastPayoutInfo(), payoutInfo), StringEntry(keyPayoutHistoryInfo(period), payoutInfo)]
445 -                             $Tuple2(actions, unit)
438 +                             let matcherPart = 0
439 +                             let payoutInfo = PeriodPayoutInfo(period, matcherPart, auxAmount)
440 +                             let gwxHoldersRewardUpdated = {
441 +                                 let @ = invoke(emissionContract, "gwxHoldersRewardUpdate", nil, nil)
442 +                                 if ($isInstanceOf(@, "Boolean"))
443 +                                     then @
444 +                                     else throw(($getType(@) + " couldn't be cast to Boolean"))
445 +                                 }
446 +                             if ((gwxHoldersRewardUpdated == gwxHoldersRewardUpdated))
447 +                                 then {
448 +                                     let totalReward = (matcherPart + auxAmount)
449 +                                     let actions = if (if ((totalReward == 0))
450 +                                         then !(gwxHoldersRewardUpdated)
451 +                                         else false)
452 +                                         then nil
453 +                                         else [IntegerEntry(keyLatestPeriod(), period), IntegerEntry(keyHeightForPeriod(period), height), IntegerEntry(keyAuxEmissionRewardForPeriod(period), auxAmount), IntegerEntry(keyGwxRewardEmissionStartHeight(), height), IntegerEntry(keyTotalAmountForPeriod(period), matcherPart), IntegerEntry(keyNextPeriod(), (period + 1)), StringEntry(keyLastPayoutInfo(), payoutInfo), StringEntry(keyPayoutHistoryInfo(period), payoutInfo)]
454 +                                     $Tuple2(actions, unit)
455 +                                     }
456 +                                 else throw("Strict value is not equal to itself.")
446 457                              }
447 458                          else throw("Strict value is not equal to itself.")
448 459                      }
457 468  func claimReward () = {
458 469      let cfgArray = readConfigArrayOrFail()
459 470      let address = toString(i.caller)
460 -     let $t01767117721 = commonClaimReward(address)
461 -     let amount = $t01767117721._1
462 -     let actions = $t01767117721._2
471 +     let $t01772017770 = commonClaimReward(address)
472 +     let amount = $t01772017770._1
473 +     let actions = $t01772017770._2
463 474      let checkAmount = if ((amount > 0))
464 475          then true
465 476          else throw("Nothing to claim")
482 493  
483 494  @Callable(i)
484 495  func claimRewardREADONLY (address) = {
485 -     let $t01829418344 = commonClaimReward(address)
486 -     let amount = $t01829418344._1
487 -     let actions = $t01829418344._2
496 +     let $t01834318393 = commonClaimReward(address)
497 +     let amount = $t01834318393._1
498 +     let actions = $t01834318393._2
488 499      let referralUnclaimed = valueOrElse(getInteger(referralsContractAddressOrFail, keyUnclaimedReferral(referralProgramName, address)), 0)
489 500      let totalAmount = (amount + referralUnclaimed)
490 501      $Tuple2(nil, totalAmount)
551 562              let ann = (amp * nCoins)
552 563              let arr = [0, 1, 2, 3, 4, 5, 6]
553 564              func calc (acc,cur) =             {
554 -                 let $t02097721004 = acc
555 -                 let d = $t02097721004._1
556 -                 let dPrev = $t02097721004._2
557 -                 let found = $t02097721004._3
565 +                 let $t02102621053 = acc
566 +                 let d = $t02102621053._1
567 +                 let dPrev = $t02102621053._2
568 +                 let found = $t02102621053._3
558 569                  if ((found != unit))
559 570                      then acc
560 571                      else {
567 578                          }
568 579                  }
569 580  
570 -             let $t02160221665 = {
581 +             let $t02165121714 = {
571 582                  let $l = arr
572 583                  let $s = size($l)
573 584                  let $acc0 = $Tuple3(s, unit, unit)
581 592  
582 593                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
583 594                  }
584 -             let dNext = $t02160221665._1
585 -             let dPrev = $t02160221665._2
586 -             let found = $t02160221665._3
595 +             let dNext = $t02165121714._1
596 +             let dPrev = $t02165121714._2
597 +             let found = $t02165121714._3
587 598              if ((found != unit))
588 599                  then $Tuple2(nil, toString(dNext))
589 600                  else {
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let SEP = "__"
5 5  
6 6  let SCALE = 1000
7 7  
8 8  let MULT8 = 100000000
9 9  
10 10  let zeroBigInt = toBigInt(0)
11 11  
12 12  let processingStageTotal = 0
13 13  
14 14  let processingStageShares = 1
15 15  
16 16  func getNumberByKey (key) = valueOrElse(getInteger(this, key), 0)
17 17  
18 18  
19 19  func getNumberOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("mandatory this." + key) + " is not defined"))
20 20  
21 21  
22 22  func getStringByKey (key) = valueOrElse(getString(this, key), "")
23 23  
24 24  
25 25  func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("mandatory this." + key) + " is not defined"))
26 26  
27 27  
28 28  func abs (val) = if ((0 > val))
29 29      then -(val)
30 30      else val
31 31  
32 32  
33 33  func absBigInt (val) = if ((zeroBigInt > val))
34 34      then -(val)
35 35      else val
36 36  
37 37  
38 38  let keyMaxDepth = "%s__maxDepth"
39 39  
40 40  let maxDepthDefault = 30
41 41  
42 42  let maxDepth = valueOrElse(getInteger(this, keyMaxDepth), maxDepthDefault)
43 43  
44 44  func keyFactoryAddress () = "%s%s__config__factoryAddress"
45 45  
46 46  
47 47  let factoryAddressStr = getStringOrFail(keyFactoryAddress())
48 48  
49 49  let factoryContract = addressFromStringValue(factoryAddressStr)
50 50  
51 51  func keyEmissionAddress () = "%s%s__config__emissionAddress"
52 52  
53 53  
54 54  func keyVotingEmissionContract () = makeString(["%s", "votingEmissionContract"], SEP)
55 55  
56 56  
57 57  let votingEmissionContract = addressFromStringValue(getStringValue(factoryContract, keyVotingEmissionContract()))
58 58  
59 59  func keyNumToUserMapping (num) = makeString(["%s%s%s", "mapping", "num2user", toString(num)], SEP)
60 60  
61 61  
62 62  let keyReferralProgramName = makeString(["%s%s", "referral", "programName"], SEP)
63 63  
64 64  let referralProgramNameDefault = "wxlock"
65 65  
66 66  let referralProgramName = valueOrElse(getString(this, keyReferralProgramName), referralProgramNameDefault)
67 67  
68 68  let keyReferralMinGWxAmount = makeString(["%s%s", "referral", "minGWxAmount"], SEP)
69 69  
70 70  let referralMinGWxAmountDefault = (500 * MULT8)
71 71  
72 72  let referralMinGWxAmount = valueOrElse(getInteger(this, keyReferralMinGWxAmount), referralMinGWxAmountDefault)
73 73  
74 74  let keyReferrerRewardPermille = makeString(["%s%s", "referral", "referrerRewardPermille"], SEP)
75 75  
76 76  let referrerRewardPermilleDefault = 50
77 77  
78 78  let referrerRewardPermille = valueOrElse(getInteger(this, keyReferrerRewardPermille), referrerRewardPermilleDefault)
79 79  
80 80  let keyReferralRewardPermille = makeString(["%s%s", "referral", "referralRewardPermille"], SEP)
81 81  
82 82  let referralRewardPermilleDefault = 50
83 83  
84 84  let referralRewardPermille = valueOrElse(getInteger(this, keyReferralRewardPermille), referralRewardPermilleDefault)
85 85  
86 86  func keyReferrer (referralAddress) = makeString(["%s%s%s", "referrer", referralProgramName, referralAddress], SEP)
87 87  
88 88  
89 89  func keyUnclaimedReferral (programName,claimerAddress) = makeString(["%s%s%s", "unclaimedReferral", programName, claimerAddress], SEP)
90 90  
91 91  
92 92  let emissionAddressStr = getStringOrFail(keyEmissionAddress())
93 93  
94 94  let emissionContract = addressFromStringValue(emissionAddressStr)
95 95  
96 96  let IdxCfgAssetId = 1
97 97  
98 98  let IdxCfgPacemakerAddress = 2
99 99  
100 100  let IdxCfgBoostingContract = 3
101 101  
102 102  let IdxCfgMaxDepth = 4
103 103  
104 104  func keyConfig () = "%s__config"
105 105  
106 106  
107 107  func readConfigArrayOrFail () = split(getStringOrFail(keyConfig()), SEP)
108 108  
109 109  
110 110  func formatConfig (wxAssetIdStr,matcherPacemakerAddressStr,boostingContractAddressStr,maxDepth) = makeString(["%s%s%s%d", wxAssetIdStr, matcherPacemakerAddressStr, boostingContractAddressStr, toString(maxDepth)], SEP)
111 111  
112 112  
113 113  func boostingContractOrFail () = {
114 114      let cfgArray = readConfigArrayOrFail()
115 115      valueOrErrorMessage(addressFromString(cfgArray[IdxCfgBoostingContract]), "boosting contract address is not defined")
116 116      }
117 117  
118 118  
119 119  func keyGwxRewardEmissionStartHeight () = "%s%s__gwxRewardEmissionPart__startHeight"
120 120  
121 121  
122 122  func keyUsersCount () = "%s__nextUserNum"
123 123  
124 124  
125 125  func keyRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
126 126  
127 127  
128 128  func keyGwxHoldersRewardCurrent () = "%s%s__gwxHoldersReward__current"
129 129  
130 130  
131 131  func keyGwxHoldersRewardNext () = "%s%s__gwxHoldersReward__next"
132 132  
133 133  
134 134  func keyPoolWeightVirtual () = "%s%s__poolWeight__GWXvirtualPOOL"
135 135  
136 136  
137 137  func keyNextProcessedUser () = "%s__nextProcessedUser"
138 138  
139 139  
140 140  func keyLatestPeriod () = "%s__latestPeriod"
141 141  
142 142  
143 143  func keyNextPeriod () = "%s__nextPeriod"
144 144  
145 145  
146 146  func keyProcessingStage () = "%s__processingStage"
147 147  
148 148  
149 149  func keyNextProcessedPeriod () = "%s__nextProcessedPeriod"
150 150  
151 151  
152 152  func keyUserUnclaimed (userIndex) = makeString(["%s%d", "userUnclaimed", toString(userIndex)], SEP)
153 153  
154 154  
155 155  func keyNextUnlaimedPeriodOfUser (userIndex) = makeString(["%s%d__nextClaimedPeriod", toString(userIndex)], SEP)
156 156  
157 157  
158 158  func keyLastProcessedPeriodOfUser (userIndex) = makeString(["%s%d__lastProcessedPeriod", toString(userIndex)], SEP)
159 159  
160 160  
161 161  func keyHeightForPeriod (period) = makeString(["%s%d__startHeightForPeriod", toString(period)], SEP)
162 162  
163 163  
164 164  func keyAuxEmissionRewardForPeriod (period) = makeString(["%s%d__auxEmissionReward", toString(period)], SEP)
165 165  
166 166  
167 167  func keyTotalAmountForPeriod (period) = makeString(["%s%d__totalAmountForPeriod", toString(period)], SEP)
168 168  
169 169  
170 170  func keyLastPayoutInfo () = "%s__lastPayoutInfo"
171 171  
172 172  
173 173  func PeriodPayoutInfo (period,matcherReward,emissionReward) = makeString(["%d%d%d", toString(period), toString(matcherReward), toString(emissionReward)], SEP)
174 174  
175 175  
176 176  func keyPayoutHistoryInfo (period) = makeString(["%s%s%d__payouts__history", toString(period)], SEP)
177 177  
178 178  
179 179  func keyTotalWeightForPeriod (period) = makeString(["%s%d__totalWeightForPeriod", toString(period)], SEP)
180 180  
181 181  
182 182  func keyUserKValueForPeriod (period,userIndex) = makeString(["%s%d%s%d__paramByPeriod", toString(userIndex), "k", toString(period)], SEP)
183 183  
184 184  
185 185  func keyUserBValueForPeriod (period,userIndex) = makeString(["%s%d%s%d__paramByPeriod", toString(userIndex), "b", toString(period)], SEP)
186 186  
187 187  
188 188  func keyUserWeightForPeriod (period,userIndex) = makeString(["%s%d%s%d__paramByPeriod", toString(userIndex), "weight", toString(period)], SEP)
189 189  
190 190  
191 191  func keyReferralsContractAddress () = makeString(["%s%s", "config", "referralsContractAddress"], SEP)
192 192  
193 193  
194 194  let referralsContractAddressOrFail = addressFromStringValue(getStringOrFail(keyReferralsContractAddress()))
195 195  
196 196  func HistoryEntry (type,user,amount,i) = {
197 197      let historyKEY = makeString(["%s%s%s%s__history", type, user, toBase58String(i.transactionId)], SEP)
198 198      let historyDATA = makeString(["%d%d%d%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(amount)], SEP)
199 199      StringEntry(historyKEY, historyDATA)
200 200      }
201 201  
202 202  
203 203  func keyManagerPublicKey () = "%s__managerPublicKey"
204 204  
205 205  
206 206  func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
207 207  
208 208  
209 209  func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
210 210      case s: String => 
211 211          fromBase58String(s)
212 212      case _: Unit => 
213 213          unit
214 214      case _ => 
215 215          throw("Match error")
216 216  }
217 217  
218 218  
219 219  func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
220 220      case s: String => 
221 221          fromBase58String(s)
222 222      case _: Unit => 
223 223          unit
224 224      case _ => 
225 225          throw("Match error")
226 226  }
227 227  
228 228  
229 229  func mustManager (i) = {
230 230      let pd = throw("Permission denied")
231 231      match managerPublicKeyOrUnit() {
232 232          case pk: ByteVector => 
233 233              if ((i.callerPublicKey == pk))
234 234                  then true
235 235                  else pd
236 236          case _: Unit => 
237 237              if ((i.caller == this))
238 238                  then true
239 239                  else pd
240 240          case _ => 
241 241              throw("Match error")
242 242      }
243 243      }
244 244  
245 245  
246 246  func calcUserWeight (boostingContractAddress,heightForPeriod,period,userIndex) = {
247 247      let kLast = keyLastProcessedPeriodOfUser(userIndex)
248 248      let kKey = keyUserKValueForPeriod(period, userIndex)
249 249      let kRaw = getInteger(boostingContractAddress, kKey)
250 250      let kUserWeight = keyUserWeightForPeriod(period, userIndex)
251 251      if (isDefined(kRaw))
252 252          then {
253 253              let k = value(kRaw)
254 254              let b = value(getInteger(boostingContractAddress, keyUserBValueForPeriod(period, userIndex)))
255 255              let w = ((k * heightForPeriod) + b)
256 256              if ((w > 0))
257 257                  then $Tuple2((w / SCALE), [IntegerEntry(kLast, period), IntegerEntry(kUserWeight, w)])
258 258                  else $Tuple2(0, nil)
259 259              }
260 260          else {
261 261              let p = getInteger(this, kLast)
262 262              if (if (isDefined(p))
263 263                  then (period >= value(p))
264 264                  else false)
265 265                  then {
266 266                      let pv = value(p)
267 267                      let k = value(getInteger(boostingContractAddress, keyUserKValueForPeriod(pv, userIndex)))
268 268                      let b = value(getInteger(boostingContractAddress, keyUserBValueForPeriod(pv, userIndex)))
269 269                      let w = ((k * heightForPeriod) + b)
270 270                      if ((w > 0))
271 271                          then $Tuple2((w / SCALE), [IntegerEntry(kUserWeight, w)])
272 272                          else $Tuple2(0, nil)
273 273                      }
274 274                  else $Tuple2(0, nil)
275 275              }
276 276      }
277 277  
278 278  
279 279  func calcUserWeightForClaim (boostingContractAddress,heightForPeriod,period,userIndex) = {
280 280      let kUserWeight = keyUserWeightForPeriod(period, userIndex)
281 281      let userWeightOrUnit = getInteger(kUserWeight)
282 282      match userWeightOrUnit {
283 283          case _: Unit => 
284 284              0
285 285          case w: Int => 
286 286              (w / SCALE)
287 287          case _ => 
288 288              throw("Match error")
289 289      }
290 290      }
291 291  
292 292  
293 293  func getUserIndexByAddress (boostingContractAddressStr,userAddress) = {
294 294      let key = makeString(["%s%s%s", "mapping", "user2num", userAddress], SEP)
295 295      parseIntValue(valueOrErrorMessage(getString(Address(fromBase58String(boostingContractAddressStr)), key), ((("User address " + userAddress) + " is not found in boosting contract data, key=") + key)))
296 296      }
297 297  
298 298  
299 299  func nextPeriod () = getNumberByKey(keyNextPeriod())
300 300  
301 301  
302 302  func commonClaimReward (userAddress) = {
303 303      let cfgArray = readConfigArrayOrFail()
304 304      let userIdx = getUserIndexByAddress(cfgArray[IdxCfgBoostingContract], userAddress)
305 305      let userUnclaimedOption = getInteger(keyUserUnclaimed(userIdx))
306 306      match userUnclaimedOption {
307 307          case _: Unit => 
308 308              $Tuple2(0, nil)
309 309          case u: Int => 
310 310              $Tuple2(u, [IntegerEntry(keyUserUnclaimed(userIdx), 0)])
311 311          case _ => 
312 312              throw("Match error")
313 313      }
314 314      }
315 315  
316 316  
317 317  @Callable(i)
318 318  func updateReferralActivity (userAddress,gWxAmountStart) = {
319 319      let referrer = getString(referralsContractAddressOrFail, keyReferrer(userAddress))
320 320      let activeReferralInv = if ((referrer == unit))
321 321          then unit
322 322          else invoke(referralsContractAddressOrFail, "updateReferralActivity", [referralProgramName, userAddress, (gWxAmountStart >= referralMinGWxAmount)], nil)
323 323      if ((activeReferralInv == activeReferralInv))
324 324          then $Tuple2(nil, unit)
325 325          else throw("Strict value is not equal to itself.")
326 326      }
327 327  
328 328  
329 329  
330 330  @Callable(i)
331 331  func finalizeHelper () = {
332 332      let processingStage = valueOrElse(getInteger(keyProcessingStage()), processingStageTotal)
333 333      let currentPeriod = getNumberByKey(keyNextProcessedPeriod())
334 334      let currentUser = getNumberByKey(keyNextProcessedUser())
335 335      let latestPeriod = getNumberByKey(keyLatestPeriod())
336 336      let usersCount = valueOrElse(getInteger(boostingContractOrFail(), keyUsersCount()), 0)
337 337      let totalWeightKey = keyTotalWeightForPeriod(currentPeriod)
338 338      let totalWeight = getNumberByKey(keyTotalWeightForPeriod(currentPeriod))
339 339      let heightForPeriod = getNumberByKey(keyHeightForPeriod(currentPeriod))
340 340      if ((currentPeriod > latestPeriod))
341 341          then $Tuple2(nil, false)
342 342          else if ((processingStage == processingStageTotal))
343 343              then {
344 344                  let $t01241512531 = calcUserWeight(boostingContractOrFail(), heightForPeriod, currentPeriod, currentUser)
345 345                  let userWeight = $t01241512531._1
346 346                  let userActions = $t01241512531._2
347 347                  let totalWeightNew = (totalWeight + userWeight)
348 348                  let processingActions = if (((usersCount - 1) > currentUser))
349 349                      then [IntegerEntry(keyNextProcessedUser(), (currentUser + 1))]
350 350                      else [IntegerEntry(keyProcessingStage(), processingStageShares), IntegerEntry(keyNextProcessedUser(), 0)]
351 351                  $Tuple2((([IntegerEntry(totalWeightKey, totalWeightNew)] ++ processingActions) ++ userActions), true)
352 352                  }
353 353              else if ((processingStage == processingStageShares))
354 354                  then {
355 355                      let userWeight = calcUserWeightForClaim(boostingContractOrFail(), heightForPeriod, currentPeriod, currentUser)
356 356                      let userAmountMatcherForPeriod = fraction(getNumberByKey(keyTotalAmountForPeriod(currentPeriod)), userWeight, totalWeight)
357 357                      let userAmountEmissionForPeriod = fraction(getNumberByKey(keyAuxEmissionRewardForPeriod(currentPeriod)), userWeight, totalWeight)
358 358                      let userTotalAmount = (userAmountEmissionForPeriod + userAmountMatcherForPeriod)
359 359                      let userUnclaimedOption = getInteger(keyUserUnclaimed(currentUser))
360 360                      let userAddress = getStringValue(boostingContractOrFail(), keyNumToUserMapping(currentUser))
361 361                      let referrer = getString(referralsContractAddressOrFail, keyReferrer(userAddress))
362 362                      let activeReferralInv = if ((referrer == unit))
363 363                          then unit
364 364                          else invoke(referralsContractAddressOrFail, "updateReferralActivity", [referralProgramName, userAddress, (userWeight >= referralMinGWxAmount)], nil)
365 365                      if ((activeReferralInv == activeReferralInv))
366 366                          then {
367 367                              let referralInv = if (if ((referrer == unit))
368 368                                  then true
369 369                                  else (referralMinGWxAmount > userWeight))
370 370                                  then unit
371 371                                  else {
372 372                                      let referrerReward = fraction(userTotalAmount, referrerRewardPermille, SCALE)
373 373                                      let referralReward = fraction(userTotalAmount, referralRewardPermille, SCALE)
374 374                                      invoke(referralsContractAddressOrFail, "incUnclaimed", [referralProgramName, userAddress, referrerReward, referralReward], nil)
375 375                                      }
376 376                              if ((referralInv == referralInv))
377 377                                  then {
378 378                                      let unclaimedActions = [IntegerEntry(keyUserUnclaimed(currentUser), (valueOrElse(userUnclaimedOption, 0) + userTotalAmount))]
379 379                                      let processingActions = if (((usersCount - 1) > currentUser))
380 380                                          then [IntegerEntry(keyNextProcessedUser(), (currentUser + 1))]
381 381                                          else [IntegerEntry(keyNextProcessedPeriod(), (currentPeriod + 1)), IntegerEntry(keyNextProcessedUser(), 0), DeleteEntry(keyProcessingStage())]
382 382                                      $Tuple2((unclaimedActions ++ processingActions), true)
383 383                                      }
384 384                                  else throw("Strict value is not equal to itself.")
385 385                              }
386 386                          else throw("Strict value is not equal to itself.")
387 387                      }
388 388                  else throw("invalid processing stage")
389 389      }
390 390  
391 391  
392 392  
393 393  @Callable(i)
394 394  func finalizeWrapper (counter) = {
395 395      let result = {
396 396          let @ = invoke(this, "finalizeHelper", nil, nil)
397 397          if ($isInstanceOf(@, "Boolean"))
398 398              then @
399 399              else throw(($getType(@) + " couldn't be cast to Boolean"))
400 400          }
401 401      if ((result == result))
402 402          then if (!(result))
403 403              then if ((counter == maxDepth))
404 404                  then throw("Nothing to process")
405 405                  else $Tuple2(nil, unit)
406 406              else if ((counter > 0))
407 407                  then $Tuple2(nil, invoke(this, "finalizeWrapper", [(counter - 1)], nil))
408 408                  else $Tuple2(nil, unit)
409 409          else throw("Strict value is not equal to itself.")
410 410      }
411 411  
412 412  
413 413  
414 414  @Callable(i)
415 415  func processPendingPeriodsAndUsers () = $Tuple2(nil, invoke(this, "finalizeWrapper", [maxDepth], nil))
416 416  
417 417  
418 418  
419 419  @Callable(i)
420 420  func deposit () = {
421 421      let checkCaller = if ((i.caller == votingEmissionContract))
422 422          then true
423 423          else mustManager(i)
424 424      if ((checkCaller == checkCaller))
425 425          then {
426 426              let period = nextPeriod()
427 427              let deltaH = (height - getNumberOrFail(keyGwxRewardEmissionStartHeight()))
428 428              let emissionRate = valueOrErrorMessage(getInteger(emissionContract, keyRatePerBlockCurrent()), (("mandatory emission_contract." + keyRatePerBlockCurrent()) + " is not defined"))
429 429              let gwxHoldersRewardCurrent = valueOrElse(getInteger(emissionContract, keyGwxHoldersRewardCurrent()), 0)
430 -             let auxAmount = fraction((deltaH * gwxHoldersRewardCurrent), emissionRate, MULT8)
431 -             let em = if ((auxAmount > 0))
432 -                 then invoke(emissionContract, "emit", [auxAmount], nil)
433 -                 else unit
434 -             if ((em == em))
430 +             if ((gwxHoldersRewardCurrent == gwxHoldersRewardCurrent))
435 431                  then {
436 -                     let matcherPart = 0
437 -                     let payoutInfo = PeriodPayoutInfo(period, matcherPart, auxAmount)
438 -                     let gwxHoldersRewardUpdate = invoke(emissionContract, "gwxHoldersRewardUpdate", nil, nil)
439 -                     if ((gwxHoldersRewardUpdate == gwxHoldersRewardUpdate))
432 +                     let auxAmount = fraction((deltaH * gwxHoldersRewardCurrent), emissionRate, MULT8)
433 +                     let em = if ((auxAmount > 0))
434 +                         then invoke(emissionContract, "emit", [auxAmount], nil)
435 +                         else unit
436 +                     if ((em == em))
440 437                          then {
441 -                             let totalReward = (matcherPart + auxAmount)
442 -                             let actions = if ((totalReward == 0))
443 -                                 then nil
444 -                                 else [IntegerEntry(keyLatestPeriod(), period), IntegerEntry(keyHeightForPeriod(period), height), IntegerEntry(keyAuxEmissionRewardForPeriod(period), auxAmount), IntegerEntry(keyGwxRewardEmissionStartHeight(), height), IntegerEntry(keyTotalAmountForPeriod(period), matcherPart), IntegerEntry(keyNextPeriod(), (period + 1)), StringEntry(keyLastPayoutInfo(), payoutInfo), StringEntry(keyPayoutHistoryInfo(period), payoutInfo)]
445 -                             $Tuple2(actions, unit)
438 +                             let matcherPart = 0
439 +                             let payoutInfo = PeriodPayoutInfo(period, matcherPart, auxAmount)
440 +                             let gwxHoldersRewardUpdated = {
441 +                                 let @ = invoke(emissionContract, "gwxHoldersRewardUpdate", nil, nil)
442 +                                 if ($isInstanceOf(@, "Boolean"))
443 +                                     then @
444 +                                     else throw(($getType(@) + " couldn't be cast to Boolean"))
445 +                                 }
446 +                             if ((gwxHoldersRewardUpdated == gwxHoldersRewardUpdated))
447 +                                 then {
448 +                                     let totalReward = (matcherPart + auxAmount)
449 +                                     let actions = if (if ((totalReward == 0))
450 +                                         then !(gwxHoldersRewardUpdated)
451 +                                         else false)
452 +                                         then nil
453 +                                         else [IntegerEntry(keyLatestPeriod(), period), IntegerEntry(keyHeightForPeriod(period), height), IntegerEntry(keyAuxEmissionRewardForPeriod(period), auxAmount), IntegerEntry(keyGwxRewardEmissionStartHeight(), height), IntegerEntry(keyTotalAmountForPeriod(period), matcherPart), IntegerEntry(keyNextPeriod(), (period + 1)), StringEntry(keyLastPayoutInfo(), payoutInfo), StringEntry(keyPayoutHistoryInfo(period), payoutInfo)]
454 +                                     $Tuple2(actions, unit)
455 +                                     }
456 +                                 else throw("Strict value is not equal to itself.")
446 457                              }
447 458                          else throw("Strict value is not equal to itself.")
448 459                      }
449 460                  else throw("Strict value is not equal to itself.")
450 461              }
451 462          else throw("Strict value is not equal to itself.")
452 463      }
453 464  
454 465  
455 466  
456 467  @Callable(i)
457 468  func claimReward () = {
458 469      let cfgArray = readConfigArrayOrFail()
459 470      let address = toString(i.caller)
460 -     let $t01767117721 = commonClaimReward(address)
461 -     let amount = $t01767117721._1
462 -     let actions = $t01767117721._2
471 +     let $t01772017770 = commonClaimReward(address)
472 +     let amount = $t01772017770._1
473 +     let actions = $t01772017770._2
463 474      let checkAmount = if ((amount > 0))
464 475          then true
465 476          else throw("Nothing to claim")
466 477      if ((checkAmount == checkAmount))
467 478          then {
468 479              let amountFromEmission = 0
469 480              let claimedReferral = {
470 481                  let @ = invoke(referralsContractAddressOrFail, "claim", [referralProgramName], nil)
471 482                  if ($isInstanceOf(@, "Int"))
472 483                      then @
473 484                      else throw(($getType(@) + " couldn't be cast to Int"))
474 485                  }
475 486              let totalAmount = (amount + claimedReferral)
476 487              $Tuple2(([ScriptTransfer(i.caller, totalAmount, fromBase58String(cfgArray[IdxCfgAssetId])), HistoryEntry("claim", address, amount, i)] ++ actions), [totalAmount, amountFromEmission])
477 488              }
478 489          else throw("Strict value is not equal to itself.")
479 490      }
480 491  
481 492  
482 493  
483 494  @Callable(i)
484 495  func claimRewardREADONLY (address) = {
485 -     let $t01829418344 = commonClaimReward(address)
486 -     let amount = $t01829418344._1
487 -     let actions = $t01829418344._2
496 +     let $t01834318393 = commonClaimReward(address)
497 +     let amount = $t01834318393._1
498 +     let actions = $t01834318393._2
488 499      let referralUnclaimed = valueOrElse(getInteger(referralsContractAddressOrFail, keyUnclaimedReferral(referralProgramName, address)), 0)
489 500      let totalAmount = (amount + referralUnclaimed)
490 501      $Tuple2(nil, totalAmount)
491 502      }
492 503  
493 504  
494 505  
495 506  @Callable(i)
496 507  func latestFinalizedPeriodREADONLY (address) = $Tuple2(nil, valueOrElse(getInteger(this, keyLatestPeriod()), -1))
497 508  
498 509  
499 510  
500 511  @Callable(i)
501 512  func latestFinalizedPeriodInfoREADONLY (address) = $Tuple2(nil, getStringByKey(keyLastPayoutInfo()))
502 513  
503 514  
504 515  
505 516  @Callable(i)
506 517  func calcGwxParamsREADONLY (gwxAmountStart,lockStartHeight,lockDurationBlocks) = {
507 518      let lockEndHeight = (lockStartHeight + lockDurationBlocks)
508 519      let scale8ParamK = -(fraction(gwxAmountStart, SCALE, lockDurationBlocks))
509 520      let scale8ParamB = (fraction(gwxAmountStart, SCALE, lockDurationBlocks) * lockEndHeight)
510 521      $Tuple2(nil, [scale8ParamK, scale8ParamB, nextPeriod()])
511 522      }
512 523  
513 524  
514 525  
515 526  @Callable(i)
516 527  func calcGwxAmountStartREADONLY (wxLockAmount,lockDuration,maxLockDuration) = {
517 528      let coeffX8 = fraction(lockDuration, MULT8, maxLockDuration)
518 529      let gWxAmountStart = fraction(wxLockAmount, coeffX8, MULT8)
519 530      $Tuple2(nil, [gWxAmountStart])
520 531      }
521 532  
522 533  
523 534  
524 535  @Callable(i)
525 536  func onEmissionForGwxStart () = if ((i.caller != factoryContract))
526 537      then throw("permissions denied")
527 538      else [IntegerEntry(keyGwxRewardEmissionStartHeight(), height)]
528 539  
529 540  
530 541  
531 542  @Callable(i)
532 543  func latestPeriodEmissionRewardsREADONLY (address) = {
533 544      let period = nextPeriod()
534 545      $Tuple2(nil, [getNumberByKey(keyAuxEmissionRewardForPeriod(period))])
535 546      }
536 547  
537 548  
538 549  
539 550  @Callable(i)
540 551  func calcD (x1BigIntStr,x2BigIntStr,ampBigIntStr,aPrecisionBigIntStr,targetPrecisionBigIntStr) = {
541 552      let nCoins = toBigInt(2)
542 553      let aPrecision = parseBigIntValue(aPrecisionBigIntStr)
543 554      let targetPrecision = parseBigIntValue(targetPrecisionBigIntStr)
544 555      let x1 = parseBigIntValue(x1BigIntStr)
545 556      let x2 = parseBigIntValue(x2BigIntStr)
546 557      let amp = (parseBigIntValue(ampBigIntStr) * aPrecision)
547 558      let s = (x1 + x2)
548 559      if ((s == zeroBigInt))
549 560          then $Tuple2(nil, toString(zeroBigInt))
550 561          else {
551 562              let ann = (amp * nCoins)
552 563              let arr = [0, 1, 2, 3, 4, 5, 6]
553 564              func calc (acc,cur) =             {
554 -                 let $t02097721004 = acc
555 -                 let d = $t02097721004._1
556 -                 let dPrev = $t02097721004._2
557 -                 let found = $t02097721004._3
565 +                 let $t02102621053 = acc
566 +                 let d = $t02102621053._1
567 +                 let dPrev = $t02102621053._2
568 +                 let found = $t02102621053._3
558 569                  if ((found != unit))
559 570                      then acc
560 571                      else {
561 572                          let dp = (((d * d) * d) / (((x1 * x2) * nCoins) * nCoins))
562 573                          let dNext = (((((ann * s) / aPrecision) + (dp * nCoins)) * d) / ((((ann - aPrecision) * d) / aPrecision) + ((nCoins + toBigInt(1)) * dp)))
563 574                          let dDiff = absBigInt((dNext - value(d)))
564 575                          if ((targetPrecision >= dDiff))
565 576                              then $Tuple3(dNext, d, cur)
566 577                              else $Tuple3(dNext, d, unit)
567 578                          }
568 579                  }
569 580  
570 -             let $t02160221665 = {
581 +             let $t02165121714 = {
571 582                  let $l = arr
572 583                  let $s = size($l)
573 584                  let $acc0 = $Tuple3(s, unit, unit)
574 585                  func $f0_1 ($a,$i) =                 if (($i >= $s))
575 586                      then $a
576 587                      else calc($a, $l[$i])
577 588  
578 589                  func $f0_2 ($a,$i) =                 if (($i >= $s))
579 590                      then $a
580 591                      else throw("List size exceeds 7")
581 592  
582 593                  $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
583 594                  }
584 -             let dNext = $t02160221665._1
585 -             let dPrev = $t02160221665._2
586 -             let found = $t02160221665._3
595 +             let dNext = $t02165121714._1
596 +             let dPrev = $t02165121714._2
597 +             let found = $t02165121714._3
587 598              if ((found != unit))
588 599                  then $Tuple2(nil, toString(dNext))
589 600                  else {
590 601                      let dDiff = absBigInt((dNext - value(dPrev)))
591 602                      throw(("D calculation error, dDiff = " + toString(dDiff)))
592 603                      }
593 604              }
594 605      }
595 606  
596 607  
597 608  
598 609  @Callable(i)
599 610  func setManager (pendingManagerPublicKey) = {
600 611      let checkCaller = mustManager(i)
601 612      if ((checkCaller == checkCaller))
602 613          then {
603 614              let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
604 615              if ((checkManagerPublicKey == checkManagerPublicKey))
605 616                  then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
606 617                  else throw("Strict value is not equal to itself.")
607 618              }
608 619          else throw("Strict value is not equal to itself.")
609 620      }
610 621  
611 622  
612 623  
613 624  @Callable(i)
614 625  func confirmManager () = {
615 626      let pm = pendingManagerPublicKeyOrUnit()
616 627      let hasPM = if (isDefined(pm))
617 628          then true
618 629          else throw("No pending manager")
619 630      if ((hasPM == hasPM))
620 631          then {
621 632              let checkPM = if ((i.callerPublicKey == value(pm)))
622 633                  then true
623 634                  else throw("You are not pending manager")
624 635              if ((checkPM == checkPM))
625 636                  then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
626 637                  else throw("Strict value is not equal to itself.")
627 638              }
628 639          else throw("Strict value is not equal to itself.")
629 640      }
630 641  
631 642  
632 643  @Verifier(tx)
633 644  func verify () = {
634 645      let targetPublicKey =     match managerPublicKeyOrUnit() {
635 646          case pk: ByteVector => 
636 647              pk
637 648          case _: Unit => 
638 649              tx.senderPublicKey
639 650          case _ => 
640 651              throw("Match error")
641 652      }
642 653      sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
643 654      }
644 655

Old	New		Differences
427	427		let deltaH = (height - getNumberOrFail(keyGwxRewardEmissionStartHeight()))
428	428		let emissionRate = valueOrErrorMessage(getInteger(emissionContract, keyRatePerBlockCurrent()), (("mandatory emission_contract." + keyRatePerBlockCurrent()) + " is not defined"))
429	429		let gwxHoldersRewardCurrent = valueOrElse(getInteger(emissionContract, keyGwxHoldersRewardCurrent()), 0)
430		-	let auxAmount = fraction((deltaH * gwxHoldersRewardCurrent), emissionRate, MULT8)
431		-	let em = if ((auxAmount > 0))
432		-	then invoke(emissionContract, "emit", [auxAmount], nil)
433		-	else unit
434		-	if ((em == em))
	430	+	if ((gwxHoldersRewardCurrent == gwxHoldersRewardCurrent))
435	431		then {
436		-	let matcherPart = 0
437		-	let payoutInfo = PeriodPayoutInfo(period, matcherPart, auxAmount)
438		-	let gwxHoldersRewardUpdate = invoke(emissionContract, "gwxHoldersRewardUpdate", nil, nil)
439		-	if ((gwxHoldersRewardUpdate == gwxHoldersRewardUpdate))
	432	+	let auxAmount = fraction((deltaH * gwxHoldersRewardCurrent), emissionRate, MULT8)
	433	+	let em = if ((auxAmount > 0))
	434	+	then invoke(emissionContract, "emit", [auxAmount], nil)
	435	+	else unit
	436	+	if ((em == em))
440	437		then {
441		-	let totalReward = (matcherPart + auxAmount)
442		-	let actions = if ((totalReward == 0))
443		-	then nil
444		-	else [IntegerEntry(keyLatestPeriod(), period), IntegerEntry(keyHeightForPeriod(period), height), IntegerEntry(keyAuxEmissionRewardForPeriod(period), auxAmount), IntegerEntry(keyGwxRewardEmissionStartHeight(), height), IntegerEntry(keyTotalAmountForPeriod(period), matcherPart), IntegerEntry(keyNextPeriod(), (period + 1)), StringEntry(keyLastPayoutInfo(), payoutInfo), StringEntry(keyPayoutHistoryInfo(period), payoutInfo)]
445		-	$Tuple2(actions, unit)
	438	+	let matcherPart = 0
	439	+	let payoutInfo = PeriodPayoutInfo(period, matcherPart, auxAmount)
	440	+	let gwxHoldersRewardUpdated = {
	441	+	let @ = invoke(emissionContract, "gwxHoldersRewardUpdate", nil, nil)
	442	+	if ($isInstanceOf(@, "Boolean"))
	443	+	then @
	444	+	else throw(($getType(@) + " couldn't be cast to Boolean"))
	445	+	}
	446	+	if ((gwxHoldersRewardUpdated == gwxHoldersRewardUpdated))
	447	+	then {
	448	+	let totalReward = (matcherPart + auxAmount)
	449	+	let actions = if (if ((totalReward == 0))
	450	+	then !(gwxHoldersRewardUpdated)
	451	+	else false)
	452	+	then nil
	453	+	else [IntegerEntry(keyLatestPeriod(), period), IntegerEntry(keyHeightForPeriod(period), height), IntegerEntry(keyAuxEmissionRewardForPeriod(period), auxAmount), IntegerEntry(keyGwxRewardEmissionStartHeight(), height), IntegerEntry(keyTotalAmountForPeriod(period), matcherPart), IntegerEntry(keyNextPeriod(), (period + 1)), StringEntry(keyLastPayoutInfo(), payoutInfo), StringEntry(keyPayoutHistoryInfo(period), payoutInfo)]
	454	+	$Tuple2(actions, unit)
	455	+	}
	456	+	else throw("Strict value is not equal to itself.")
446	457		}
447	458		else throw("Strict value is not equal to itself.")
448	459		}

457	468		func claimReward () = {
458	469		let cfgArray = readConfigArrayOrFail()
459	470		let address = toString(i.caller)
460		-	let $~~t01767117721~~ = commonClaimReward(address)
461		-	let amount = $~~t01767117721~~._1
462		-	let actions = $~~t01767117721~~._2
	471	+	let $t01772017770 = commonClaimReward(address)
	472	+	let amount = $t01772017770._1
	473	+	let actions = $t01772017770._2
463	474		let checkAmount = if ((amount > 0))
464	475		then true
465	476		else throw("Nothing to claim")

482	493
483	494		@Callable(i)
484	495		func claimRewardREADONLY (address) = {
485		-	let $~~t01829418344~~ = commonClaimReward(address)
486		-	let amount = $~~t01829418344~~._1
487		-	let actions = $~~t01829418344~~._2
	496	+	let $t01834318393 = commonClaimReward(address)
	497	+	let amount = $t01834318393._1
	498	+	let actions = $t01834318393._2
488	499		let referralUnclaimed = valueOrElse(getInteger(referralsContractAddressOrFail, keyUnclaimedReferral(referralProgramName, address)), 0)
489	500		let totalAmount = (amount + referralUnclaimed)
490	501		$Tuple2(nil, totalAmount)

551	562		let ann = (amp * nCoins)
552	563		let arr = [0, 1, 2, 3, 4, 5, 6]
553	564		func calc (acc,cur) = {
554		-	let $~~t02097721004~~ = acc
555		-	let d = $~~t02097721004~~._1
556		-	let dPrev = $~~t02097721004~~._2
557		-	let found = $~~t02097721004~~._3
	565	+	let $t02102621053 = acc
	566	+	let d = $t02102621053._1
	567	+	let dPrev = $t02102621053._2
	568	+	let found = $t02102621053._3
558	569		if ((found != unit))
559	570		then acc
560	571		else {

567	578		}
568	579		}
569	580
570		-	let $~~t02160221665~~ = {
	581	+	let $t02165121714 = {
571	582		let $l = arr
572	583		let $s = size($l)
573	584		let $acc0 = $Tuple3(s, unit, unit)

581	592
582	593		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7)
583	594		}
584		-	let dNext = $~~t02160221665~~._1
585		-	let dPrev = $~~t02160221665~~._2
586		-	let found = $~~t02160221665~~._3
	595	+	let dNext = $t02165121714._1
	596	+	let dPrev = $t02165121714._2
	597	+	let found = $t02165121714._3
587	598		if ((found != unit))
588	599		then $Tuple2(nil, toString(dNext))
589	600		else {

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let SEP = "__"
5	5
6	6		let SCALE = 1000
7	7
8	8		let MULT8 = 100000000
9	9
10	10		let zeroBigInt = toBigInt(0)
11	11
12	12		let processingStageTotal = 0
13	13
14	14		let processingStageShares = 1
15	15
16	16		func getNumberByKey (key) = valueOrElse(getInteger(this, key), 0)
17	17
18	18
19	19		func getNumberOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("mandatory this." + key) + " is not defined"))
20	20
21	21
22	22		func getStringByKey (key) = valueOrElse(getString(this, key), "")
23	23
24	24
25	25		func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("mandatory this." + key) + " is not defined"))
26	26
27	27
28	28		func abs (val) = if ((0 > val))
29	29		then -(val)
30	30		else val
31	31
32	32
33	33		func absBigInt (val) = if ((zeroBigInt > val))
34	34		then -(val)
35	35		else val
36	36
37	37
38	38		let keyMaxDepth = "%s__maxDepth"
39	39
40	40		let maxDepthDefault = 30
41	41
42	42		let maxDepth = valueOrElse(getInteger(this, keyMaxDepth), maxDepthDefault)
43	43
44	44		func keyFactoryAddress () = "%s%s__config__factoryAddress"
45	45
46	46
47	47		let factoryAddressStr = getStringOrFail(keyFactoryAddress())
48	48
49	49		let factoryContract = addressFromStringValue(factoryAddressStr)
50	50
51	51		func keyEmissionAddress () = "%s%s__config__emissionAddress"
52	52
53	53
54	54		func keyVotingEmissionContract () = makeString(["%s", "votingEmissionContract"], SEP)
55	55
56	56
57	57		let votingEmissionContract = addressFromStringValue(getStringValue(factoryContract, keyVotingEmissionContract()))
58	58
59	59		func keyNumToUserMapping (num) = makeString(["%s%s%s", "mapping", "num2user", toString(num)], SEP)
60	60
61	61
62	62		let keyReferralProgramName = makeString(["%s%s", "referral", "programName"], SEP)
63	63
64	64		let referralProgramNameDefault = "wxlock"
65	65
66	66		let referralProgramName = valueOrElse(getString(this, keyReferralProgramName), referralProgramNameDefault)
67	67
68	68		let keyReferralMinGWxAmount = makeString(["%s%s", "referral", "minGWxAmount"], SEP)
69	69
70	70		let referralMinGWxAmountDefault = (500 * MULT8)
71	71
72	72		let referralMinGWxAmount = valueOrElse(getInteger(this, keyReferralMinGWxAmount), referralMinGWxAmountDefault)
73	73
74	74		let keyReferrerRewardPermille = makeString(["%s%s", "referral", "referrerRewardPermille"], SEP)
75	75
76	76		let referrerRewardPermilleDefault = 50
77	77
78	78		let referrerRewardPermille = valueOrElse(getInteger(this, keyReferrerRewardPermille), referrerRewardPermilleDefault)
79	79
80	80		let keyReferralRewardPermille = makeString(["%s%s", "referral", "referralRewardPermille"], SEP)
81	81
82	82		let referralRewardPermilleDefault = 50
83	83
84	84		let referralRewardPermille = valueOrElse(getInteger(this, keyReferralRewardPermille), referralRewardPermilleDefault)
85	85
86	86		func keyReferrer (referralAddress) = makeString(["%s%s%s", "referrer", referralProgramName, referralAddress], SEP)
87	87
88	88
89	89		func keyUnclaimedReferral (programName,claimerAddress) = makeString(["%s%s%s", "unclaimedReferral", programName, claimerAddress], SEP)
90	90
91	91
92	92		let emissionAddressStr = getStringOrFail(keyEmissionAddress())
93	93
94	94		let emissionContract = addressFromStringValue(emissionAddressStr)
95	95
96	96		let IdxCfgAssetId = 1
97	97
98	98		let IdxCfgPacemakerAddress = 2
99	99
100	100		let IdxCfgBoostingContract = 3
101	101
102	102		let IdxCfgMaxDepth = 4
103	103
104	104		func keyConfig () = "%s__config"
105	105
106	106
107	107		func readConfigArrayOrFail () = split(getStringOrFail(keyConfig()), SEP)
108	108
109	109
110	110		func formatConfig (wxAssetIdStr,matcherPacemakerAddressStr,boostingContractAddressStr,maxDepth) = makeString(["%s%s%s%d", wxAssetIdStr, matcherPacemakerAddressStr, boostingContractAddressStr, toString(maxDepth)], SEP)
111	111
112	112
113	113		func boostingContractOrFail () = {
114	114		let cfgArray = readConfigArrayOrFail()
115	115		valueOrErrorMessage(addressFromString(cfgArray[IdxCfgBoostingContract]), "boosting contract address is not defined")
116	116		}
117	117
118	118
119	119		func keyGwxRewardEmissionStartHeight () = "%s%s__gwxRewardEmissionPart__startHeight"
120	120
121	121
122	122		func keyUsersCount () = "%s__nextUserNum"
123	123
124	124
125	125		func keyRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
126	126
127	127
128	128		func keyGwxHoldersRewardCurrent () = "%s%s__gwxHoldersReward__current"
129	129
130	130
131	131		func keyGwxHoldersRewardNext () = "%s%s__gwxHoldersReward__next"
132	132
133	133
134	134		func keyPoolWeightVirtual () = "%s%s__poolWeight__GWXvirtualPOOL"
135	135
136	136
137	137		func keyNextProcessedUser () = "%s__nextProcessedUser"
138	138
139	139
140	140		func keyLatestPeriod () = "%s__latestPeriod"
141	141
142	142
143	143		func keyNextPeriod () = "%s__nextPeriod"
144	144
145	145
146	146		func keyProcessingStage () = "%s__processingStage"
147	147
148	148
149	149		func keyNextProcessedPeriod () = "%s__nextProcessedPeriod"
150	150
151	151
152	152		func keyUserUnclaimed (userIndex) = makeString(["%s%d", "userUnclaimed", toString(userIndex)], SEP)
153	153
154	154
155	155		func keyNextUnlaimedPeriodOfUser (userIndex) = makeString(["%s%d__nextClaimedPeriod", toString(userIndex)], SEP)
156	156
157	157
158	158		func keyLastProcessedPeriodOfUser (userIndex) = makeString(["%s%d__lastProcessedPeriod", toString(userIndex)], SEP)
159	159
160	160
161	161		func keyHeightForPeriod (period) = makeString(["%s%d__startHeightForPeriod", toString(period)], SEP)
162	162
163	163
164	164		func keyAuxEmissionRewardForPeriod (period) = makeString(["%s%d__auxEmissionReward", toString(period)], SEP)
165	165
166	166
167	167		func keyTotalAmountForPeriod (period) = makeString(["%s%d__totalAmountForPeriod", toString(period)], SEP)
168	168
169	169
170	170		func keyLastPayoutInfo () = "%s__lastPayoutInfo"
171	171
172	172
173	173		func PeriodPayoutInfo (period,matcherReward,emissionReward) = makeString(["%d%d%d", toString(period), toString(matcherReward), toString(emissionReward)], SEP)
174	174
175	175
176	176		func keyPayoutHistoryInfo (period) = makeString(["%s%s%d__payouts__history", toString(period)], SEP)
177	177
178	178
179	179		func keyTotalWeightForPeriod (period) = makeString(["%s%d__totalWeightForPeriod", toString(period)], SEP)
180	180
181	181
182	182		func keyUserKValueForPeriod (period,userIndex) = makeString(["%s%d%s%d__paramByPeriod", toString(userIndex), "k", toString(period)], SEP)
183	183
184	184
185	185		func keyUserBValueForPeriod (period,userIndex) = makeString(["%s%d%s%d__paramByPeriod", toString(userIndex), "b", toString(period)], SEP)
186	186
187	187
188	188		func keyUserWeightForPeriod (period,userIndex) = makeString(["%s%d%s%d__paramByPeriod", toString(userIndex), "weight", toString(period)], SEP)
189	189
190	190
191	191		func keyReferralsContractAddress () = makeString(["%s%s", "config", "referralsContractAddress"], SEP)
192	192
193	193
194	194		let referralsContractAddressOrFail = addressFromStringValue(getStringOrFail(keyReferralsContractAddress()))
195	195
196	196		func HistoryEntry (type,user,amount,i) = {
197	197		let historyKEY = makeString(["%s%s%s%s__history", type, user, toBase58String(i.transactionId)], SEP)
198	198		let historyDATA = makeString(["%d%d%d%d%d%d", toString(lastBlock.height), toString(lastBlock.timestamp), toString(amount)], SEP)
199	199		StringEntry(historyKEY, historyDATA)
200	200		}
201	201
202	202
203	203		func keyManagerPublicKey () = "%s__managerPublicKey"
204	204
205	205
206	206		func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
207	207
208	208
209	209		func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
210	210		case s: String =>
211	211		fromBase58String(s)
212	212		case _: Unit =>
213	213		unit
214	214		case _ =>
215	215		throw("Match error")
216	216		}
217	217
218	218
219	219		func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
220	220		case s: String =>
221	221		fromBase58String(s)
222	222		case _: Unit =>
223	223		unit
224	224		case _ =>
225	225		throw("Match error")
226	226		}
227	227
228	228
229	229		func mustManager (i) = {
230	230		let pd = throw("Permission denied")
231	231		match managerPublicKeyOrUnit() {
232	232		case pk: ByteVector =>
233	233		if ((i.callerPublicKey == pk))
234	234		then true
235	235		else pd
236	236		case _: Unit =>
237	237		if ((i.caller == this))
238	238		then true
239	239		else pd
240	240		case _ =>
241	241		throw("Match error")
242	242		}
243	243		}
244	244
245	245
246	246		func calcUserWeight (boostingContractAddress,heightForPeriod,period,userIndex) = {
247	247		let kLast = keyLastProcessedPeriodOfUser(userIndex)
248	248		let kKey = keyUserKValueForPeriod(period, userIndex)
249	249		let kRaw = getInteger(boostingContractAddress, kKey)
250	250		let kUserWeight = keyUserWeightForPeriod(period, userIndex)
251	251		if (isDefined(kRaw))
252	252		then {
253	253		let k = value(kRaw)
254	254		let b = value(getInteger(boostingContractAddress, keyUserBValueForPeriod(period, userIndex)))
255	255		let w = ((k * heightForPeriod) + b)
256	256		if ((w > 0))
257	257		then $Tuple2((w / SCALE), [IntegerEntry(kLast, period), IntegerEntry(kUserWeight, w)])
258	258		else $Tuple2(0, nil)
259	259		}
260	260		else {
261	261		let p = getInteger(this, kLast)
262	262		if (if (isDefined(p))
263	263		then (period >= value(p))
264	264		else false)
265	265		then {
266	266		let pv = value(p)
267	267		let k = value(getInteger(boostingContractAddress, keyUserKValueForPeriod(pv, userIndex)))
268	268		let b = value(getInteger(boostingContractAddress, keyUserBValueForPeriod(pv, userIndex)))
269	269		let w = ((k * heightForPeriod) + b)
270	270		if ((w > 0))
271	271		then $Tuple2((w / SCALE), [IntegerEntry(kUserWeight, w)])
272	272		else $Tuple2(0, nil)
273	273		}
274	274		else $Tuple2(0, nil)
275	275		}
276	276		}
277	277
278	278
279	279		func calcUserWeightForClaim (boostingContractAddress,heightForPeriod,period,userIndex) = {
280	280		let kUserWeight = keyUserWeightForPeriod(period, userIndex)
281	281		let userWeightOrUnit = getInteger(kUserWeight)
282	282		match userWeightOrUnit {
283	283		case _: Unit =>
284	284		0
285	285		case w: Int =>
286	286		(w / SCALE)
287	287		case _ =>
288	288		throw("Match error")
289	289		}
290	290		}
291	291
292	292
293	293		func getUserIndexByAddress (boostingContractAddressStr,userAddress) = {
294	294		let key = makeString(["%s%s%s", "mapping", "user2num", userAddress], SEP)
295	295		parseIntValue(valueOrErrorMessage(getString(Address(fromBase58String(boostingContractAddressStr)), key), ((("User address " + userAddress) + " is not found in boosting contract data, key=") + key)))
296	296		}
297	297
298	298
299	299		func nextPeriod () = getNumberByKey(keyNextPeriod())
300	300
301	301
302	302		func commonClaimReward (userAddress) = {
303	303		let cfgArray = readConfigArrayOrFail()
304	304		let userIdx = getUserIndexByAddress(cfgArray[IdxCfgBoostingContract], userAddress)
305	305		let userUnclaimedOption = getInteger(keyUserUnclaimed(userIdx))
306	306		match userUnclaimedOption {
307	307		case _: Unit =>
308	308		$Tuple2(0, nil)
309	309		case u: Int =>
310	310		$Tuple2(u, [IntegerEntry(keyUserUnclaimed(userIdx), 0)])
311	311		case _ =>
312	312		throw("Match error")
313	313		}
314	314		}
315	315
316	316
317	317		@Callable(i)
318	318		func updateReferralActivity (userAddress,gWxAmountStart) = {
319	319		let referrer = getString(referralsContractAddressOrFail, keyReferrer(userAddress))
320	320		let activeReferralInv = if ((referrer == unit))
321	321		then unit
322	322		else invoke(referralsContractAddressOrFail, "updateReferralActivity", [referralProgramName, userAddress, (gWxAmountStart >= referralMinGWxAmount)], nil)
323	323		if ((activeReferralInv == activeReferralInv))
324	324		then $Tuple2(nil, unit)
325	325		else throw("Strict value is not equal to itself.")
326	326		}
327	327
328	328
329	329
330	330		@Callable(i)
331	331		func finalizeHelper () = {
332	332		let processingStage = valueOrElse(getInteger(keyProcessingStage()), processingStageTotal)
333	333		let currentPeriod = getNumberByKey(keyNextProcessedPeriod())
334	334		let currentUser = getNumberByKey(keyNextProcessedUser())
335	335		let latestPeriod = getNumberByKey(keyLatestPeriod())
336	336		let usersCount = valueOrElse(getInteger(boostingContractOrFail(), keyUsersCount()), 0)
337	337		let totalWeightKey = keyTotalWeightForPeriod(currentPeriod)
338	338		let totalWeight = getNumberByKey(keyTotalWeightForPeriod(currentPeriod))
339	339		let heightForPeriod = getNumberByKey(keyHeightForPeriod(currentPeriod))
340	340		if ((currentPeriod > latestPeriod))
341	341		then $Tuple2(nil, false)
342	342		else if ((processingStage == processingStageTotal))
343	343		then {
344	344		let $t01241512531 = calcUserWeight(boostingContractOrFail(), heightForPeriod, currentPeriod, currentUser)
345	345		let userWeight = $t01241512531._1
346	346		let userActions = $t01241512531._2
347	347		let totalWeightNew = (totalWeight + userWeight)
348	348		let processingActions = if (((usersCount - 1) > currentUser))
349	349		then [IntegerEntry(keyNextProcessedUser(), (currentUser + 1))]
350	350		else [IntegerEntry(keyProcessingStage(), processingStageShares), IntegerEntry(keyNextProcessedUser(), 0)]
351	351		$Tuple2((([IntegerEntry(totalWeightKey, totalWeightNew)] ++ processingActions) ++ userActions), true)
352	352		}
353	353		else if ((processingStage == processingStageShares))
354	354		then {
355	355		let userWeight = calcUserWeightForClaim(boostingContractOrFail(), heightForPeriod, currentPeriod, currentUser)
356	356		let userAmountMatcherForPeriod = fraction(getNumberByKey(keyTotalAmountForPeriod(currentPeriod)), userWeight, totalWeight)
357	357		let userAmountEmissionForPeriod = fraction(getNumberByKey(keyAuxEmissionRewardForPeriod(currentPeriod)), userWeight, totalWeight)
358	358		let userTotalAmount = (userAmountEmissionForPeriod + userAmountMatcherForPeriod)
359	359		let userUnclaimedOption = getInteger(keyUserUnclaimed(currentUser))
360	360		let userAddress = getStringValue(boostingContractOrFail(), keyNumToUserMapping(currentUser))
361	361		let referrer = getString(referralsContractAddressOrFail, keyReferrer(userAddress))
362	362		let activeReferralInv = if ((referrer == unit))
363	363		then unit
364	364		else invoke(referralsContractAddressOrFail, "updateReferralActivity", [referralProgramName, userAddress, (userWeight >= referralMinGWxAmount)], nil)
365	365		if ((activeReferralInv == activeReferralInv))
366	366		then {
367	367		let referralInv = if (if ((referrer == unit))
368	368		then true
369	369		else (referralMinGWxAmount > userWeight))
370	370		then unit
371	371		else {
372	372		let referrerReward = fraction(userTotalAmount, referrerRewardPermille, SCALE)
373	373		let referralReward = fraction(userTotalAmount, referralRewardPermille, SCALE)
374	374		invoke(referralsContractAddressOrFail, "incUnclaimed", [referralProgramName, userAddress, referrerReward, referralReward], nil)
375	375		}
376	376		if ((referralInv == referralInv))
377	377		then {
378	378		let unclaimedActions = [IntegerEntry(keyUserUnclaimed(currentUser), (valueOrElse(userUnclaimedOption, 0) + userTotalAmount))]
379	379		let processingActions = if (((usersCount - 1) > currentUser))
380	380		then [IntegerEntry(keyNextProcessedUser(), (currentUser + 1))]
381	381		else [IntegerEntry(keyNextProcessedPeriod(), (currentPeriod + 1)), IntegerEntry(keyNextProcessedUser(), 0), DeleteEntry(keyProcessingStage())]
382	382		$Tuple2((unclaimedActions ++ processingActions), true)
383	383		}
384	384		else throw("Strict value is not equal to itself.")
385	385		}
386	386		else throw("Strict value is not equal to itself.")
387	387		}
388	388		else throw("invalid processing stage")
389	389		}
390	390
391	391
392	392
393	393		@Callable(i)
394	394		func finalizeWrapper (counter) = {
395	395		let result = {
396	396		let @ = invoke(this, "finalizeHelper", nil, nil)
397	397		if ($isInstanceOf(@, "Boolean"))
398	398		then @
399	399		else throw(($getType(@) + " couldn't be cast to Boolean"))
400	400		}
401	401		if ((result == result))
402	402		then if (!(result))
403	403		then if ((counter == maxDepth))
404	404		then throw("Nothing to process")
405	405		else $Tuple2(nil, unit)
406	406		else if ((counter > 0))
407	407		then $Tuple2(nil, invoke(this, "finalizeWrapper", [(counter - 1)], nil))
408	408		else $Tuple2(nil, unit)
409	409		else throw("Strict value is not equal to itself.")
410	410		}
411	411
412	412
413	413
414	414		@Callable(i)
415	415		func processPendingPeriodsAndUsers () = $Tuple2(nil, invoke(this, "finalizeWrapper", [maxDepth], nil))
416	416
417	417
418	418
419	419		@Callable(i)
420	420		func deposit () = {
421	421		let checkCaller = if ((i.caller == votingEmissionContract))
422	422		then true
423	423		else mustManager(i)
424	424		if ((checkCaller == checkCaller))
425	425		then {
426	426		let period = nextPeriod()
427	427		let deltaH = (height - getNumberOrFail(keyGwxRewardEmissionStartHeight()))
428	428		let emissionRate = valueOrErrorMessage(getInteger(emissionContract, keyRatePerBlockCurrent()), (("mandatory emission_contract." + keyRatePerBlockCurrent()) + " is not defined"))
429	429		let gwxHoldersRewardCurrent = valueOrElse(getInteger(emissionContract, keyGwxHoldersRewardCurrent()), 0)
430		-	let auxAmount = fraction((deltaH * gwxHoldersRewardCurrent), emissionRate, MULT8)
431		-	let em = if ((auxAmount > 0))
432		-	then invoke(emissionContract, "emit", [auxAmount], nil)
433		-	else unit
434		-	if ((em == em))
	430	+	if ((gwxHoldersRewardCurrent == gwxHoldersRewardCurrent))
435	431		then {
436		-	let matcherPart = 0
437		-	let payoutInfo = PeriodPayoutInfo(period, matcherPart, auxAmount)
438		-	let gwxHoldersRewardUpdate = invoke(emissionContract, "gwxHoldersRewardUpdate", nil, nil)
439		-	if ((gwxHoldersRewardUpdate == gwxHoldersRewardUpdate))
	432	+	let auxAmount = fraction((deltaH * gwxHoldersRewardCurrent), emissionRate, MULT8)
	433	+	let em = if ((auxAmount > 0))
	434	+	then invoke(emissionContract, "emit", [auxAmount], nil)
	435	+	else unit
	436	+	if ((em == em))
440	437		then {
441		-	let totalReward = (matcherPart + auxAmount)
442		-	let actions = if ((totalReward == 0))
443		-	then nil
444		-	else [IntegerEntry(keyLatestPeriod(), period), IntegerEntry(keyHeightForPeriod(period), height), IntegerEntry(keyAuxEmissionRewardForPeriod(period), auxAmount), IntegerEntry(keyGwxRewardEmissionStartHeight(), height), IntegerEntry(keyTotalAmountForPeriod(period), matcherPart), IntegerEntry(keyNextPeriod(), (period + 1)), StringEntry(keyLastPayoutInfo(), payoutInfo), StringEntry(keyPayoutHistoryInfo(period), payoutInfo)]
445		-	$Tuple2(actions, unit)
	438	+	let matcherPart = 0
	439	+	let payoutInfo = PeriodPayoutInfo(period, matcherPart, auxAmount)
	440	+	let gwxHoldersRewardUpdated = {
	441	+	let @ = invoke(emissionContract, "gwxHoldersRewardUpdate", nil, nil)
	442	+	if ($isInstanceOf(@, "Boolean"))
	443	+	then @
	444	+	else throw(($getType(@) + " couldn't be cast to Boolean"))
	445	+	}
	446	+	if ((gwxHoldersRewardUpdated == gwxHoldersRewardUpdated))
	447	+	then {
	448	+	let totalReward = (matcherPart + auxAmount)
	449	+	let actions = if (if ((totalReward == 0))
	450	+	then !(gwxHoldersRewardUpdated)
	451	+	else false)
	452	+	then nil
	453	+	else [IntegerEntry(keyLatestPeriod(), period), IntegerEntry(keyHeightForPeriod(period), height), IntegerEntry(keyAuxEmissionRewardForPeriod(period), auxAmount), IntegerEntry(keyGwxRewardEmissionStartHeight(), height), IntegerEntry(keyTotalAmountForPeriod(period), matcherPart), IntegerEntry(keyNextPeriod(), (period + 1)), StringEntry(keyLastPayoutInfo(), payoutInfo), StringEntry(keyPayoutHistoryInfo(period), payoutInfo)]
	454	+	$Tuple2(actions, unit)
	455	+	}
	456	+	else throw("Strict value is not equal to itself.")
446	457		}
447	458		else throw("Strict value is not equal to itself.")
448	459		}
449	460		else throw("Strict value is not equal to itself.")
450	461		}
451	462		else throw("Strict value is not equal to itself.")
452	463		}
453	464
454	465
455	466
456	467		@Callable(i)
457	468		func claimReward () = {
458	469		let cfgArray = readConfigArrayOrFail()
459	470		let address = toString(i.caller)
460		-	let $~~t01767117721~~ = commonClaimReward(address)
461		-	let amount = $~~t01767117721~~._1
462		-	let actions = $~~t01767117721~~._2
	471	+	let $t01772017770 = commonClaimReward(address)
	472	+	let amount = $t01772017770._1
	473	+	let actions = $t01772017770._2
463	474		let checkAmount = if ((amount > 0))
464	475		then true
465	476		else throw("Nothing to claim")
466	477		if ((checkAmount == checkAmount))
467	478		then {
468	479		let amountFromEmission = 0
469	480		let claimedReferral = {
470	481		let @ = invoke(referralsContractAddressOrFail, "claim", [referralProgramName], nil)
471	482		if ($isInstanceOf(@, "Int"))
472	483		then @

github/deemru/w8io/169f3d6 
92.48 ms ◑