w8 · tx · HrZ···44E

tx · HrZNmir5jzHDhgdDJ1cXbFZ164w85v1AK3XqTK7SG44E

3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj:  -0.01400000 Waves

2021.09.30 21:26 [1726051] smart account 3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HrZNmir5jzHDhgdDJ1cXbFZ164w85v1AK3XqTK7SG44E",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1633026393216,
    "version": 2,
    "chainId": 84,
    "sender": "3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj",
    "senderPublicKey": "C246qxhuyo9DBk1pjMzEQSVAWmiqYupG2swGkxTeAvLV",
    "proofs": [
        "3jb2aTo9px5gLMdAqwcZ1YCNesXaiUAzr9WwxfTNPjNYNi8z9YWnC6RymYFsDvTb2gkf5DaX65vutcz9mrg1Jdd5"
    ],
    "script": "base64:AAIEAAAAAAAAAA8IAhIAEgASAwoBARIAEgAAAAACAAAAAApBNEFBc3NldElEAQAAACD+xBrh3u/naSJ9Eujvd+1d33EPvCCH0lpodP3xbghYNwAAAAALVVNEVEFzc2V0SUQBAAAAIAhlhLcP8IpqGvPiaOguCJAkw9MnWAPNLPYuXgvf2hWkAAAABQAAAAFpAQAAAAhJc3N1ZUE0QQAAAAAEAAAAA3BtdAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAKY3VycmVudEtleQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAtQcmljZVBlckE0QQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAGQTRBL1ROBAAAAApBNEFIYXJkQ2FwCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAAApBNEFIYXJkQ2FwBAAAAAxOZXdBNEFUb1VzZXIJAABrAAAAAwAAAAAAAAGGoAgFAAAAA3BtdAAAAAZhbW91bnQFAAAAC1ByaWNlUGVyQTRBBAAAABFQcmV2aW91c0lzc3VlZEE0QQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAARVG90YWxfSXNzdWVkX0E0QToEAAAADlRvdGFsSXNzdWVkQTRBCQAAZAAAAAIFAAAAEVByZXZpb3VzSXNzdWVkQTRBBQAAAAxOZXdBNEFUb1VzZXIEAAAADlBlbmRpbmdNaW50aW5nCQAAZQAAAAIFAAAACkE0QUhhcmRDYXAFAAAADlRvdGFsSXNzdWVkQTRBBAAAABdQcmV2aW91c0E0QVJlc2VydmVWYWx1ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAYVG90YWxfQTRBX1Jlc2VydmVfSW5fVE46BAAAAA9BNEFSZXNlcnZlVmFsdWUJAABkAAAAAgUAAAAXUHJldmlvdXNBNEFSZXNlcnZlVmFsdWUIBQAAAANwbXQAAAAGYW1vdW50BAAAABZQcmV2aW91c0E0QUJhY2t1cFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABdBNEFfQmFja3VwX1ZhbHVlX0luX1ROOgQAAAAOQTRBQmFja3VwUHJpY2UJAABrAAAAAwAAAAAAAAGGoAUAAAAPQTRBUmVzZXJ2ZVZhbHVlBQAAAA5Ub3RhbElzc3VlZEE0QQQAAAAKRmVlQWRkcmVzcwEAAAAgUoPZoIvXkJI7M+XgQERyG3Ox4PxeH5gdLMWeskjH4iADCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAK0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCwgcGxlYXNlIGF0dGFjaCBUTi4DCQAAZgAAAAIAAAAAAABMS0AIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAAMVBsZWFzZSBBdHRhY2ggbWluaW11bSAwLjA1IFROIFRvIElzc3VlIEE0QSBBc3NldC4DCQAAZgAAAAIFAAAADlRvdGFsSXNzdWVkQTRBBQAAAApBNEFIYXJkQ2FwCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAChBNEEgTWludGluZyBoYXMgUmVhY2hlZCB0aGUgSGFyZCBDYXAgb2YgCQABpAAAAAEFAAAACkE0QUhhcmRDYXACAAAAKiBBNEEuIFBsZWFzZSBSZWR1Y2UgeW91ciBNaW50aW5nIE9yZGVyIGJ5IAkAAaQAAAABBQAAAA5QZW5kaW5nTWludGluZwIAAAAIIG9yIHB1dCAJAAGkAAAAAQkAAGUAAAACBQAAAApBNEFIYXJkQ2FwBQAAAA5Ub3RhbElzc3VlZEE0QQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAARVG90YWxfSXNzdWVkX0E0QToFAAAADlRvdGFsSXNzdWVkQTRBCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABRCYWxhbmNlX01pbnRpbmdfQTRBOgUAAAAOUGVuZGluZ01pbnRpbmcJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAGFRvdGFsX0E0QV9SZXNlcnZlX0luX1ROOgUAAAAPQTRBUmVzZXJ2ZVZhbHVlCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABdBNEFfQmFja3VwX1ZhbHVlX0luX1ROOgUAAAAOQTRBQmFja3VwUHJpY2UJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAHbWVzc2FnZQIAAAAlPGgxPkE0QSBJc3N1ZWQgU3VjY2Vzc2Z1bGx5ITwvaDE+PGJyPgkABEwAAAACCQEAAAAHUmVpc3N1ZQAAAAMFAAAACkE0QUFzc2V0SUQFAAAADE5ld0E0QVRvVXNlcgYJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQAAaQAAAAIJAABoAAAAAgUAAAAMTmV3QTRBVG9Vc2VyAAAAAAAAAABjAAAAAAAAAABkBQAAAApBNEFBc3NldElECQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEFAAAACkZlZUFkZHJlc3MJAABpAAAAAgkAAGgAAAACBQAAAAxOZXdBNEFUb1VzZXIAAAAAAAAAAAEAAAAAAAAAAGQFAAAACkE0QUFzc2V0SUQFAAAAA25pbAAAAAFpAQAAAAlMaXF1aWRhdGUAAAAABAAAAApjdXJyZW50S2V5CQACWAAAAAEIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQQAAAADcG10CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAABFQcmV2aW91c0lzc3VlZEE0QQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAARVG90YWxfSXNzdWVkX0E0QToEAAAAEVByZXZpb3VzQnVybmVkQTRBCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABFUb3RhbF9CdXJuZWRfQTRBOgQAAAAOVG90YWxJc3N1ZWRBNEEJAABlAAAAAgUAAAARUHJldmlvdXNJc3N1ZWRBNEEIBQAAAANwbXQAAAAGYW1vdW50BAAAAA5Ub3RhbEJ1cm5lZEE0QQkAAGQAAAACBQAAABFQcmV2aW91c0J1cm5lZEE0QQgFAAAAA3BtdAAAAAZhbW91bnQEAAAAF1ByZXZpb3VzQTRBUmVzZXJ2ZVZhbHVlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABhUb3RhbF9BNEFfUmVzZXJ2ZV9Jbl9UTjoEAAAAFlByZXZpb3VzQTRBQmFja3VwUHJpY2UJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAF0E0QV9CYWNrdXBfVmFsdWVfSW5fVE46BAAAABJjYWxjdWxhdGVidXJudmFsdWUJAABrAAAAAwUAAAAWUHJldmlvdXNBNEFCYWNrdXBQcmljZQgFAAAAA3BtdAAAAAZhbW91bnQAAAAAAAABhqAEAAAAD0E0QVJlc2VydmVWYWx1ZQkAAGUAAAACBQAAABdQcmV2aW91c0E0QVJlc2VydmVWYWx1ZQUAAAASY2FsY3VsYXRlYnVybnZhbHVlBAAAAA5BNEFCYWNrdXBQcmljZQkAAGsAAAADAAAAAAAAAYagBQAAAA9BNEFSZXNlcnZlVmFsdWUFAAAADlRvdGFsSXNzdWVkQTRBAwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAApBNEFBc3NldElECQAAAgAAAAECAAAAR0tpbmRseSBEZXBvc2l0IE9ubHkgOGhkc1ZDeFBCVkVtVlVaeXlYOFNkOThaOWhVN0ZueTI2Vzk2c2pLaVR3OGcgKEE0QSkuAwkAAGYAAAACAAAAAAAAAYagCAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAAC1BdHRhY2ggQW1vdW50IG11c3QgYmUgZ3JlYXRlciB0aGFuIDAuMDAxIEE0QS4JAARMAAAAAgkBAAAABEJ1cm4AAAACBQAAAApBNEFBc3NldElECAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAARVG90YWxfSXNzdWVkX0E0QToFAAAADlRvdGFsSXNzdWVkQTRBCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABFUb3RhbF9CdXJuZWRfQTRBOgUAAAAOVG90YWxCdXJuZWRBNEEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAGFRvdGFsX0E0QV9SZXNlcnZlX0luX1ROOgUAAAAPQTRBUmVzZXJ2ZVZhbHVlCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABdBNEFfQmFja3VwX1ZhbHVlX0luX1ROOgUAAAAOQTRBQmFja3VwUHJpY2UJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAHbWVzc2FnZQIAAAApPGgxPkE0QSBMaXF1aWRhdGVkIFN1Y2Nlc3NmdWxseSE8L2gxPjxicj4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAABJjYWxjdWxhdGVidXJudmFsdWUFAAAABHVuaXQFAAAAA25pbAAAAAFpAQAAAAdEZXBvc2l0AAAAAQAAAARkYXlzBAAAAANwbXQDCQAAAAAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAJAAACAAAAAQIAAABHTm8gcGF5bWVudCBhdHRhY2hlZCwgUGxlYXNlIEF0dGFjaCBBNEEgVG9rZW4gYXMgcGVyIFRJRVIgaW4gcGF5bWVudFsxXS4EAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAPbWF4aW11bWxvY2tkYXlzAAAAAAAAAABaBAAAAApsb2Nrc3RhdHVzAgAAAAZMT0NLRUQEAAAABFVMQlQAAAAAF0h25/8EAAAABFVMU1QAAAAAi7LJb/8EAAAABFVMR1QAAAABF2WS3/8EAAAABFVMRFQAAAABF2WS4AAEAAAABm9uZWRheQAAAAAAAAAFoAQAAAAMYWN0dWFsYmxvY2tzCQAAaAAAAAIFAAAABm9uZWRheQUAAAAEZGF5cwQAAAAPdG90YWxsb2NrYmxvY2tzCQAAZAAAAAIFAAAABmhlaWdodAUAAAAMYWN0dWFsYmxvY2tzBAAAAAVUaWVyMQAAAAAAAACMoAQAAAAMVGllcjFyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAAAggFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjJyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAABAgFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjNyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAACAgFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAPU3Rha2VkQTRBQW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMCAAAADVN0YWtlZF9BbW91bnQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAASbmV3U3Rha2VkQTRBQW1vdW50CQAAZAAAAAIFAAAAD1N0YWtlZEE0QUFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQEAAAAEGN1cnJlbnRBNEFBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAMbmV3QTRBQW1vdW50CQAAZAAAAAIFAAAAEGN1cnJlbnRBNEFBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50AwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAApBNEFBc3NldElECQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAChJbmNvcnJlY3QgYXNzZXQgYXR0YWNoZWQsIHBsZWFzZSBhdHRhY2ggCQACWAAAAAEFAAAACkE0QUFzc2V0SUQCAAAABiBvbmx5LgMJAABnAAAAAgAAAAAAAAAABgUAAAAEZGF5cwkAAAIAAAABAgAAACdDaG9vc2UgTG9ja2luZyBkYXlzIGluIGJldHdlZW4gNyB0byA5MC4DCQAAZgAAAAIFAAAABGRheXMFAAAAD21heGltdW1sb2NrZGF5cwkAAAIAAAABAgAAAE1Zb3UgRW50ZXJlZCBkYXlzIGdyZWF0ZXIgdGhhbiA5MCBwbGVhc2UgRW50ZXIgbm8uIG9mIGRheXMgaW4gYmV0d2VlbiA3IHRvIDkwLgMJAABmAAAAAgAAAAAHwNWtAAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAA1UGxlYXNlIEF0dGFjaCBtaW5pbXVtIDMzMyBBNEEgVG8gQWNoaWV2ZSBCUk9OWkUgVElFUi4DCQAAZwAAAAIFAAAABFVMQlQIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAIVGllcl9PZl8FAAAACmN1cnJlbnRLZXkCAAAABkJST05aRQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X2hlaWdodF9PZl8FAAAACmN1cnJlbnRLZXkFAAAABmhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAANU3Rha2VkX0Ftb3VudAUAAAASbmV3U3Rha2VkQTRBQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQUAAAAMbmV3QTRBQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAFVRvdGFsX0xvY2tfQmxvY2tzX09mXwUAAAAKY3VycmVudEtleQUAAAAPdG90YWxsb2NrYmxvY2tzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAPTG9ja19TdGF0dXNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAApsb2Nrc3RhdHVzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAC1Jld2FyZHNfT2ZfBQAAAApjdXJyZW50S2V5CQAAawAAAAMJAABrAAAAAwUAAAAFVGllcjEIBQAAAANwbXQAAAAGYW1vdW50CQAAbAAAAAYAAAAAAAAAAAoAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAFAAAAAlVQBQAAAAxhY3R1YWxibG9ja3MJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAABgAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAAA25pbAMJAABnAAAAAgUAAAAEVUxTVAgFAAAAA3BtdAAAAAZhbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAAhUaWVyX09mXwUAAAAKY3VycmVudEtleQIAAAAGU0lMVkVSCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1TdGFrZWRfQW1vdW50BQAAABJuZXdTdGFrZWRBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxuZXdBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAA90b3RhbGxvY2tibG9ja3MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAA9Mb2NrX1N0YXR1c19PZl8FAAAACmN1cnJlbnRLZXkFAAAACmxvY2tzdGF0dXMJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAADFRpZXIxcmV3YXJkcwUAAAADbmlsAwkAAGcAAAACBQAAAARVTEdUCAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAACFRpZXJfT2ZfBQAAAApjdXJyZW50S2V5AgAAAARHT0xECQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1TdGFrZWRfQW1vdW50BQAAABJuZXdTdGFrZWRBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxuZXdBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAA90b3RhbGxvY2tibG9ja3MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAA9Mb2NrX1N0YXR1c19PZl8FAAAACmN1cnJlbnRLZXkFAAAACmxvY2tzdGF0dXMJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAADFRpZXIycmV3YXJkcwUAAAADbmlsAwkAAAAAAAACBQAAAARVTERUCAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAACFRpZXJfT2ZfBQAAAApjdXJyZW50S2V5AgAAAAdESUFNT05ECQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1TdGFrZWRfQW1vdW50BQAAABJuZXdTdGFrZWRBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxuZXdBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAA90b3RhbGxvY2tibG9ja3MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAA9Mb2NrX1N0YXR1c19PZl8FAAAACmN1cnJlbnRLZXkFAAAACmxvY2tzdGF0dXMJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAADFRpZXIzcmV3YXJkcwUAAAADbmlsCQAAAgAAAAECAAAAKFBsZWFzZSBDaG9vc2UgYSBSYW5nZSBCZXR3ZWVuIDMzMy0xMjAwMC4AAAABaQEAAAAIV2l0aGRyYXcAAAAABAAAAApjdXJyZW50S2V5CQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAEWNoZWNrZGVwb3NpdHZhbHVlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQQAAAAQY2hlY2tzdGFrZWR2YWx1ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAANU3Rha2VkX0Ftb3VudAQAAAAObmV3c3Rha2VkdmFsdWUJAABlAAAAAgUAAAAQY2hlY2tzdGFrZWR2YWx1ZQUAAAARY2hlY2tkZXBvc2l0dmFsdWUEAAAAD2ZldGNoUmV3YXJkRGF0YQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAATVG90YWxfVVNEVF9DbGFpbWVkOgQAAAASdG90YWxyZXdhcmRjbGFpbWVkCQAAZAAAAAIFAAAAD2ZldGNoUmV3YXJkRGF0YQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAtSZXdhcmRzX09mXwUAAAAKY3VycmVudEtleQMJAABmAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABVUb3RhbF9Mb2NrX0Jsb2Nrc19PZl8FAAAACmN1cnJlbnRLZXkFAAAABmhlaWdodAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAVZb3VyIAkAAaQAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQIAAABiIEE0QSBhcmUgVW5kZXIgTG9jay4gQ29uc2lkZXIgbGFzdCA4IGRpZ2l0cyBhcyB2YWx1ZSBhZnRlciBEZWNpbWFscy4gVG9rZW4gd2lsbCBiZSBVbmxvY2tlZCBhZnRlciAJAAGkAAAAAQkAAGUAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAFVRvdGFsX0xvY2tfQmxvY2tzX09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0AwkAAAAAAAACBQAAABFjaGVja2RlcG9zaXR2YWx1ZQAAAAAAAAAAAAkAAAIAAAABAgAAACZZb3UgSGF2ZSBBbHJlYWR5IFdpdGhkcmF3IHlvdXIgQW1vdW50LgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAApBNEFBc3NldElECQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAtSZXdhcmRzX09mXwUAAAAKY3VycmVudEtleQUAAAALVVNEVEFzc2V0SUQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAAhUaWVyX09mXwUAAAAKY3VycmVudEtleQIAAAAETk9ORQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X2hlaWdodF9PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAADVN0YWtlZF9BbW91bnQFAAAADm5ld3N0YWtlZHZhbHVlCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABVUb3RhbF9Mb2NrX0Jsb2Nrc19PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAA9Mb2NrX1N0YXR1c19PZl8FAAAACmN1cnJlbnRLZXkCAAAABlVOTE9DSwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAAAtSZXdhcmRzX09mXwUAAAAKY3VycmVudEtleQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAATVG90YWxfVVNEVF9DbGFpbWVkOgUAAAASdG90YWxyZXdhcmRjbGFpbWVkBQAAAANuaWwAAAABaQEAAAALRGVwb3NpdFVTRFQAAAAABAAAAANwbXQDCQAAAAAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAJAAACAAAAAQIAAAA8Tm8gcGF5bWVudCBhdHRhY2hlZCwgUGxlYXNlIEF0dGFjaCBVU0RUIFRva2VuIGluIHBheW1lbnRbMV0uBAAAAA1jYWxsZXJhZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADVVTRFRkZXBvc2l0b3IJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMCAAAAD0Z1bmRpbmdfQWRkcmVzcwQAAAAPZmV0Y2hvbGRVU0RUYmFsCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAAAxVU0RUX0JhbGFuY2UEAAAACm9sZFVTRFRiYWwEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwIAAAAMVVNEVF9CYWxhbmNlAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAACm5ld1VTRFRiYWwJAABkAAAAAgUAAAAKb2xkVVNEVGJhbAgFAAAAA3BtdAAAAAZhbW91bnQDCQEAAAACIT0AAAACBQAAAA1VU0RUZGVwb3NpdG9yBQAAAA1jYWxsZXJhZGRyZXNzCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAACJJIGtub3cgWW91IGFyZSBub3QgQW4gQWRtaW4uIE9ubHkgBQAAAA1VU0RUZGVwb3NpdG9yAgAAAB4gaGFzIHJpZ2h0cyB0byBhZGQgVVNEVCBGdW5kcy4DCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAC1VTRFRBc3NldElECQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAABlLaW5kbHkgRGVwb3NpdCBPbmx5IFVTRFQgCQACWAAAAAEFAAAAC1VTRFRBc3NldElEAgAAAAkgQXNzZXRJRC4DCQAAZgAAAAIAAAAAAAAPQkAIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAAKkF0dGFjaCBtaW5pbXVtIDEgVVNEVCBhdGxlYXN0IEZvciBQYXltZW50LgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAMVVNEVF9CYWxhbmNlBQAAAApuZXdVU0RUYmFsBQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAACQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tledSwOL4=",
    "height": 1726051,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9FkLiER4VTeexSk5kJqqn1fWiVBC3YCANWTFgSK1nH5W
Next: 8bTjbLYqR4oGQfS7VB1PSXUw5EU22inRz352c7y9YENW

Diff: 
Old New Differences
25 25          else if ((5000000 > pmt.amount))
26 26              then throw("Please Attach minimum 0.05 TN To Issue A4A Asset.")
27 27              else if ((TotalIssuedA4A > A4AHardCap))
28 -                 then throw(((("A4A Minting has Reached the Hard Cap of " + toString((A4AHardCap / 100000000))) + " A4A. Please Reduce your Minting Order by ") + toString(PendingMinting)))
28 +                 then throw(((((("A4A Minting has Reached the Hard Cap of " + toString(A4AHardCap)) + " A4A. Please Reduce your Minting Order by ") + toString(PendingMinting)) + " or put ") + toString((A4AHardCap - TotalIssuedA4A))))
29 29                  else [IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), IntegerEntry("Balance_Minting_A4A:", PendingMinting), IntegerEntry("Total_A4A_Reserve_In_TN:", A4AReserveValue), IntegerEntry("A4A_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Issued Successfully!</h1><br>"), Reissue(A4AAssetID, NewA4AToUser, true), ScriptTransfer(i.caller, ((NewA4AToUser * 99) / 100), A4AAssetID), ScriptTransfer(addressFromPublicKey(FeeAddress), ((NewA4AToUser * 1) / 100), A4AAssetID)]
30 30      }
31 31  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let A4AAssetID = base58'J9VzWPfRSQyCbEv5oWpxLSihigbpbJsGBHJZV9Ct8ook'
5 5  
6 6  let USDTAssetID = base58'Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H'
7 7  
8 8  @Callable(i)
9 9  func IssueA4A () = {
10 10      let pmt = value(i.payments[0])
11 11      let currentKey = toBase58String(i.caller.bytes)
12 12      let PricePerA4A = getIntegerValue(this, "A4A/TN")
13 13      let A4AHardCap = getIntegerValue(this, "A4AHardCap")
14 14      let NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
15 15      let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
16 16      let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
17 17      let PendingMinting = (A4AHardCap - TotalIssuedA4A)
18 18      let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
19 19      let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
20 20      let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
21 21      let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
22 22      let FeeAddress = base58'6Z73KxcX3sugpiStpSRXxKxTmWqCaLVwFeM6kwyiKVDR'
23 23      if (isDefined(pmt.assetId))
24 24          then throw("Incorrect asset attached, please attach TN.")
25 25          else if ((5000000 > pmt.amount))
26 26              then throw("Please Attach minimum 0.05 TN To Issue A4A Asset.")
27 27              else if ((TotalIssuedA4A > A4AHardCap))
28 -                 then throw(((("A4A Minting has Reached the Hard Cap of " + toString((A4AHardCap / 100000000))) + " A4A. Please Reduce your Minting Order by ") + toString(PendingMinting)))
28 +                 then throw(((((("A4A Minting has Reached the Hard Cap of " + toString(A4AHardCap)) + " A4A. Please Reduce your Minting Order by ") + toString(PendingMinting)) + " or put ") + toString((A4AHardCap - TotalIssuedA4A))))
29 29                  else [IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), IntegerEntry("Balance_Minting_A4A:", PendingMinting), IntegerEntry("Total_A4A_Reserve_In_TN:", A4AReserveValue), IntegerEntry("A4A_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Issued Successfully!</h1><br>"), Reissue(A4AAssetID, NewA4AToUser, true), ScriptTransfer(i.caller, ((NewA4AToUser * 99) / 100), A4AAssetID), ScriptTransfer(addressFromPublicKey(FeeAddress), ((NewA4AToUser * 1) / 100), A4AAssetID)]
30 30      }
31 31  
32 32  
33 33  
34 34  @Callable(i)
35 35  func Liquidate () = {
36 36      let currentKey = toBase58String(i.callerPublicKey)
37 37      let pmt = value(i.payments[0])
38 38      let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
39 39      let PreviousBurnedA4A = getIntegerValue(this, "Total_Burned_A4A:")
40 40      let TotalIssuedA4A = (PreviousIssuedA4A - pmt.amount)
41 41      let TotalBurnedA4A = (PreviousBurnedA4A + pmt.amount)
42 42      let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
43 43      let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
44 44      let calculateburnvalue = fraction(PreviousA4ABackupPrice, pmt.amount, 100000)
45 45      let A4AReserveValue = (PreviousA4AReserveValue - calculateburnvalue)
46 46      let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
47 47      if ((pmt.assetId != A4AAssetID))
48 48          then throw("Kindly Deposit Only 8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g (A4A).")
49 49          else if ((100000 > pmt.amount))
50 50              then throw("Attach Amount must be greater than 0.001 A4A.")
51 51              else [Burn(A4AAssetID, pmt.amount), IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), IntegerEntry("Total_Burned_A4A:", TotalBurnedA4A), IntegerEntry("Total_A4A_Reserve_In_TN:", A4AReserveValue), IntegerEntry("A4A_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Liquidated Successfully!</h1><br>"), ScriptTransfer(i.caller, calculateburnvalue, unit)]
52 52      }
53 53  
54 54  
55 55  
56 56  @Callable(i)
57 57  func Deposit (days) = {
58 58      let pmt = if ((size(i.payments) == 1))
59 59          then i.payments[0]
60 60          else throw("No payment attached, Please Attach A4A Token as per TIER in payment[1].")
61 61      let currentKey = toBase58String(i.caller.bytes)
62 62      let maximumlockdays = 90
63 63      let lockstatus = "LOCKED"
64 64      let ULBT = 99999999999
65 65      let ULST = 599999999999
66 66      let ULGT = 1199999999999
67 67      let ULDT = 1200000000000
68 68      let oneday = 1440
69 69      let actualblocks = (oneday * days)
70 70      let totallockblocks = (height + actualblocks)
71 71      let Tier1 = 36000
72 72      let Tier1rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
73 73      let Tier2rewards = fraction(fraction((Tier1 * 4), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
74 74      let Tier3rewards = fraction(fraction((Tier1 * 8), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
75 75      let StakedA4AAmount =     match getInteger(this, "Staked_Amount") {
76 76          case a: Int => 
77 77              a
78 78          case _ => 
79 79              0
80 80      }
81 81      let newStakedA4AAmount = (StakedA4AAmount + pmt.amount)
82 82      let currentA4AAmount =     match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
83 83          case a: Int => 
84 84              a
85 85          case _ => 
86 86              0
87 87      }
88 88      let newA4AAmount = (currentA4AAmount + pmt.amount)
89 89      if ((pmt.assetId != A4AAssetID))
90 90          then throw((("Incorrect asset attached, please attach " + toBase58String(A4AAssetID)) + " only."))
91 91          else if ((6 >= days))
92 92              then throw("Choose Locking days in between 7 to 90.")
93 93              else if ((days > maximumlockdays))
94 94                  then throw("You Entered days greater than 90 please Enter no. of days in between 7 to 90.")
95 95                  else if ((33300000000 > pmt.amount))
96 96                      then throw("Please Attach minimum 333 A4A To Achieve BRONZE TIER.")
97 97                      else if ((ULBT >= pmt.amount))
98 98                          then [StringEntry(("Tier_Of_" + currentKey), "BRONZE"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), fraction(fraction(Tier1, pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP)))]
99 99                          else if ((ULST >= pmt.amount))
100 100                              then [StringEntry(("Tier_Of_" + currentKey), "SILVER"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier1rewards)]
101 101                              else if ((ULGT >= pmt.amount))
102 102                                  then [StringEntry(("Tier_Of_" + currentKey), "GOLD"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier2rewards)]
103 103                                  else if ((ULDT == pmt.amount))
104 104                                      then [StringEntry(("Tier_Of_" + currentKey), "DIAMOND"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier3rewards)]
105 105                                      else throw("Please Choose a Range Between 333-12000.")
106 106      }
107 107  
108 108  
109 109  
110 110  @Callable(i)
111 111  func Withdraw () = {
112 112      let currentKey = toBase58String(i.caller.bytes)
113 113      let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
114 114      let checkstakedvalue = getIntegerValue(this, "Staked_Amount")
115 115      let newstakedvalue = (checkstakedvalue - checkdepositvalue)
116 116      let fetchRewardData = getIntegerValue(this, "Total_USDT_Claimed:")
117 117      let totalrewardclaimed = (fetchRewardData + getIntegerValue(this, ("Rewards_Of_" + currentKey)))
118 118      if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
119 119          then throw(((("Your " + toString(getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)))) + " A4A are Under Lock. Consider last 8 digits as value after Decimals. Token will be Unlocked after ") + toString((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - height))))
120 120          else if ((checkdepositvalue == 0))
121 121              then throw("You Have Already Withdraw your Amount.")
122 122              else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), StringEntry(("Tier_Of_" + currentKey), "NONE"), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), IntegerEntry("Staked_Amount", newstakedvalue), IntegerEntry(("Deposit_Amount_Of_" + currentKey), 0), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), 0), StringEntry(("Lock_Status_Of_" + currentKey), "UNLOCK"), IntegerEntry(("Rewards_Of_" + currentKey), 0), IntegerEntry("Total_USDT_Claimed:", totalrewardclaimed)]
123 123      }
124 124  
125 125  
126 126  
127 127  @Callable(i)
128 128  func DepositUSDT () = {
129 129      let pmt = if ((size(i.payments) == 1))
130 130          then i.payments[0]
131 131          else throw("No payment attached, Please Attach USDT Token in payment[1].")
132 132      let calleraddress = toBase58String(i.caller.bytes)
133 133      let USDTdepositor = getStringValue(this, "Funding_Address")
134 134      let fetcholdUSDTbal = getIntegerValue(this, "USDT_Balance")
135 135      let oldUSDTbal =     match getInteger(this, "USDT_Balance") {
136 136          case a: Int => 
137 137              a
138 138          case _ => 
139 139              0
140 140      }
141 141      let newUSDTbal = (oldUSDTbal + pmt.amount)
142 142      if ((USDTdepositor != calleraddress))
143 143          then throw((("I know You are not An Admin. Only " + USDTdepositor) + " has rights to add USDT Funds."))
144 144          else if ((pmt.assetId != USDTAssetID))
145 145              then throw((("Kindly Deposit Only USDT " + toBase58String(USDTAssetID)) + " AssetID."))
146 146              else if ((1000000 > pmt.amount))
147 147                  then throw("Attach minimum 1 USDT atleast For Payment.")
148 148                  else [IntegerEntry("USDT_Balance", newUSDTbal)]
149 149      }
150 150  
151 151  
152 152  @Verifier(tx)
153 153  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
154 154

Old	New		Differences
25	25		else if ((5000000 > pmt.amount))
26	26		then throw("Please Attach minimum 0.05 TN To Issue A4A Asset.")
27	27		else if ((TotalIssuedA4A > A4AHardCap))
28		-	then throw(((("A4A Minting has Reached the Hard Cap of " + toString((A4AHardCap ~~/ 100000000)~~)) + " A4A. Please Reduce your Minting Order by ") + toString(PendingMinting)))
	28	+	then throw(((((("A4A Minting has Reached the Hard Cap of " + toString(A4AHardCap)) + " A4A. Please Reduce your Minting Order by ") + toString(PendingMinting)) + " or put ") + toString((A4AHardCap - TotalIssuedA4A))))
29	29		else [IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), IntegerEntry("Balance_Minting_A4A:", PendingMinting), IntegerEntry("Total_A4A_Reserve_In_TN:", A4AReserveValue), IntegerEntry("A4A_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Issued Successfully!</h1><br>"), Reissue(A4AAssetID, NewA4AToUser, true), ScriptTransfer(i.caller, ((NewA4AToUser * 99) / 100), A4AAssetID), ScriptTransfer(addressFromPublicKey(FeeAddress), ((NewA4AToUser * 1) / 100), A4AAssetID)]
30	30		}
31	31

Old	New		Differences
1	1		{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let A4AAssetID = base58'J9VzWPfRSQyCbEv5oWpxLSihigbpbJsGBHJZV9Ct8ook'
5	5
6	6		let USDTAssetID = base58'Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H'
7	7
8	8		@Callable(i)
9	9		func IssueA4A () = {
10	10		let pmt = value(i.payments[0])
11	11		let currentKey = toBase58String(i.caller.bytes)
12	12		let PricePerA4A = getIntegerValue(this, "A4A/TN")
13	13		let A4AHardCap = getIntegerValue(this, "A4AHardCap")
14	14		let NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
15	15		let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
16	16		let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
17	17		let PendingMinting = (A4AHardCap - TotalIssuedA4A)
18	18		let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
19	19		let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
20	20		let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
21	21		let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
22	22		let FeeAddress = base58'6Z73KxcX3sugpiStpSRXxKxTmWqCaLVwFeM6kwyiKVDR'
23	23		if (isDefined(pmt.assetId))
24	24		then throw("Incorrect asset attached, please attach TN.")
25	25		else if ((5000000 > pmt.amount))
26	26		then throw("Please Attach minimum 0.05 TN To Issue A4A Asset.")
27	27		else if ((TotalIssuedA4A > A4AHardCap))
28		-	then throw(((("A4A Minting has Reached the Hard Cap of " + toString((A4AHardCap ~~/ 100000000)~~)) + " A4A. Please Reduce your Minting Order by ") + toString(PendingMinting)))
	28	+	then throw(((((("A4A Minting has Reached the Hard Cap of " + toString(A4AHardCap)) + " A4A. Please Reduce your Minting Order by ") + toString(PendingMinting)) + " or put ") + toString((A4AHardCap - TotalIssuedA4A))))
29	29		else [IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), IntegerEntry("Balance_Minting_A4A:", PendingMinting), IntegerEntry("Total_A4A_Reserve_In_TN:", A4AReserveValue), IntegerEntry("A4A_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Issued Successfully!</h1><br>"), Reissue(A4AAssetID, NewA4AToUser, true), ScriptTransfer(i.caller, ((NewA4AToUser * 99) / 100), A4AAssetID), ScriptTransfer(addressFromPublicKey(FeeAddress), ((NewA4AToUser * 1) / 100), A4AAssetID)]
30	30		}
31	31
32	32
33	33
34	34		@Callable(i)
35	35		func Liquidate () = {
36	36		let currentKey = toBase58String(i.callerPublicKey)
37	37		let pmt = value(i.payments[0])
38	38		let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
39	39		let PreviousBurnedA4A = getIntegerValue(this, "Total_Burned_A4A:")
40	40		let TotalIssuedA4A = (PreviousIssuedA4A - pmt.amount)
41	41		let TotalBurnedA4A = (PreviousBurnedA4A + pmt.amount)
42	42		let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
43	43		let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
44	44		let calculateburnvalue = fraction(PreviousA4ABackupPrice, pmt.amount, 100000)
45	45		let A4AReserveValue = (PreviousA4AReserveValue - calculateburnvalue)
46	46		let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
47	47		if ((pmt.assetId != A4AAssetID))
48	48		then throw("Kindly Deposit Only 8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g (A4A).")
49	49		else if ((100000 > pmt.amount))
50	50		then throw("Attach Amount must be greater than 0.001 A4A.")
51	51		else [Burn(A4AAssetID, pmt.amount), IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), IntegerEntry("Total_Burned_A4A:", TotalBurnedA4A), IntegerEntry("Total_A4A_Reserve_In_TN:", A4AReserveValue), IntegerEntry("A4A_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Liquidated Successfully!</h1><br>"), ScriptTransfer(i.caller, calculateburnvalue, unit)]
52	52		}
53	53
54	54
55	55
56	56		@Callable(i)
57	57		func Deposit (days) = {
58	58		let pmt = if ((size(i.payments) == 1))
59	59		then i.payments[0]
60	60		else throw("No payment attached, Please Attach A4A Token as per TIER in payment[1].")
61	61		let currentKey = toBase58String(i.caller.bytes)
62	62		let maximumlockdays = 90
63	63		let lockstatus = "LOCKED"
64	64		let ULBT = 99999999999
65	65		let ULST = 599999999999
66	66		let ULGT = 1199999999999
67	67		let ULDT = 1200000000000
68	68		let oneday = 1440
69	69		let actualblocks = (oneday * days)
70	70		let totallockblocks = (height + actualblocks)
71	71		let Tier1 = 36000
72	72		let Tier1rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
73	73		let Tier2rewards = fraction(fraction((Tier1 * 4), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
74	74		let Tier3rewards = fraction(fraction((Tier1 * 8), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
75	75		let StakedA4AAmount = match getInteger(this, "Staked_Amount") {
76	76		case a: Int =>
77	77		a
78	78		case _ =>
79	79		0
80	80		}
81	81		let newStakedA4AAmount = (StakedA4AAmount + pmt.amount)
82	82		let currentA4AAmount = match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
83	83		case a: Int =>
84	84		a
85	85		case _ =>
86	86		0
87	87		}
88	88		let newA4AAmount = (currentA4AAmount + pmt.amount)
89	89		if ((pmt.assetId != A4AAssetID))
90	90		then throw((("Incorrect asset attached, please attach " + toBase58String(A4AAssetID)) + " only."))
91	91		else if ((6 >= days))
92	92		then throw("Choose Locking days in between 7 to 90.")
93	93		else if ((days > maximumlockdays))
94	94		then throw("You Entered days greater than 90 please Enter no. of days in between 7 to 90.")
95	95		else if ((33300000000 > pmt.amount))
96	96		then throw("Please Attach minimum 333 A4A To Achieve BRONZE TIER.")
97	97		else if ((ULBT >= pmt.amount))
98	98		then [StringEntry(("Tier_Of_" + currentKey), "BRONZE"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), fraction(fraction(Tier1, pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP)))]
99	99		else if ((ULST >= pmt.amount))
100	100		then [StringEntry(("Tier_Of_" + currentKey), "SILVER"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier1rewards)]
101	101		else if ((ULGT >= pmt.amount))
102	102		then [StringEntry(("Tier_Of_" + currentKey), "GOLD"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier2rewards)]
103	103		else if ((ULDT == pmt.amount))
104	104		then [StringEntry(("Tier_Of_" + currentKey), "DIAMOND"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier3rewards)]
105	105		else throw("Please Choose a Range Between 333-12000.")
106	106		}
107	107
108	108
109	109
110	110		@Callable(i)
111	111		func Withdraw () = {
112	112		let currentKey = toBase58String(i.caller.bytes)
113	113		let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
114	114		let checkstakedvalue = getIntegerValue(this, "Staked_Amount")
115	115		let newstakedvalue = (checkstakedvalue - checkdepositvalue)
116	116		let fetchRewardData = getIntegerValue(this, "Total_USDT_Claimed:")
117	117		let totalrewardclaimed = (fetchRewardData + getIntegerValue(this, ("Rewards_Of_" + currentKey)))
118	118		if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
119	119		then throw(((("Your " + toString(getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)))) + " A4A are Under Lock. Consider last 8 digits as value after Decimals. Token will be Unlocked after ") + toString((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - height))))
120	120		else if ((checkdepositvalue == 0))
121	121		then throw("You Have Already Withdraw your Amount.")
122	122		else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), StringEntry(("Tier_Of_" + currentKey), "NONE"), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), IntegerEntry("Staked_Amount", newstakedvalue), IntegerEntry(("Deposit_Amount_Of_" + currentKey), 0), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), 0), StringEntry(("Lock_Status_Of_" + currentKey), "UNLOCK"), IntegerEntry(("Rewards_Of_" + currentKey), 0), IntegerEntry("Total_USDT_Claimed:", totalrewardclaimed)]
123	123		}
124	124
125	125
126	126
127	127		@Callable(i)
128	128		func DepositUSDT () = {
129	129		let pmt = if ((size(i.payments) == 1))
130	130		then i.payments[0]
131	131		else throw("No payment attached, Please Attach USDT Token in payment[1].")
132	132		let calleraddress = toBase58String(i.caller.bytes)
133	133		let USDTdepositor = getStringValue(this, "Funding_Address")
134	134		let fetcholdUSDTbal = getIntegerValue(this, "USDT_Balance")
135	135		let oldUSDTbal = match getInteger(this, "USDT_Balance") {
136	136		case a: Int =>
137	137		a
138	138		case _ =>
139	139		0
140	140		}
141	141		let newUSDTbal = (oldUSDTbal + pmt.amount)
142	142		if ((USDTdepositor != calleraddress))
143	143		then throw((("I know You are not An Admin. Only " + USDTdepositor) + " has rights to add USDT Funds."))
144	144		else if ((pmt.assetId != USDTAssetID))
145	145		then throw((("Kindly Deposit Only USDT " + toBase58String(USDTAssetID)) + " AssetID."))
146	146		else if ((1000000 > pmt.amount))
147	147		then throw("Attach minimum 1 USDT atleast For Payment.")
148	148		else [IntegerEntry("USDT_Balance", newUSDTbal)]
149	149		}
150	150
151	151
152	152		@Verifier(tx)
153	153		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
154	154

github/deemru/w8io/873ac7e 
48.65 ms ◑