w8 · tx · Fha···Nre

tx · Fha7EnXrRgSgeTuSoQH5mGAx4XJcRGanemfzaiHfmNre

3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj:  -0.01400000 Waves

2021.09.20 21:55 [1711764] smart account 3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Fha7EnXrRgSgeTuSoQH5mGAx4XJcRGanemfzaiHfmNre",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1632164129318,
    "version": 2,
    "chainId": 84,
    "sender": "3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj",
    "senderPublicKey": "C246qxhuyo9DBk1pjMzEQSVAWmiqYupG2swGkxTeAvLV",
    "proofs": [
        "2s7uLEEVnb6DZT8S8ufjLTsDyxnaBTHr9dJeb8vp7kFmBuyeZmzSe5DbsgLhcRymte99sNcSMM7HEH5dfB6C9NcK"
    ],
    "script": "base64:AAIEAAAAAAAAAA0IAhIAEgASAwoBARIAAAAAAgAAAAAKQTRBQXNzZXRJRAEAAAAg/sQa4d7v52kifRLo73ftXd9xD7wgh9JaaHT98W4IWDcAAAAAC1VTRFRBc3NldElEAQAAACAIZYS3D/CKahrz4mjoLgiQJMPTJ1gDzSz2Ll4L39oVpAAAAAQAAAABaQEAAAAISXNzdWVBNEEAAAAABAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAALUHJpY2VQZXJBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAABkE0QS9UTgQAAAAMTmV3QTRBVG9Vc2VyCQAAawAAAAMAAAAAAAABhqAIBQAAAANwbXQAAAAGYW1vdW50BQAAAAtQcmljZVBlckE0QQQAAAARUHJldmlvdXNJc3N1ZWRBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAEVRvdGFsX0lzc3VlZF9BNEE6BAAAAA5Ub3RhbElzc3VlZEE0QQkAAGQAAAACBQAAABFQcmV2aW91c0lzc3VlZEE0QQUAAAAMTmV3QTRBVG9Vc2VyBAAAABdQcmV2aW91c0E0QVJlc2VydmVWYWx1ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAYVG90YWxfQTRBX1Jlc2VydmVfSW5fVE46BAAAAA9BNEFSZXNlcnZlVmFsdWUJAABkAAAAAgUAAAAXUHJldmlvdXNBNEFSZXNlcnZlVmFsdWUIBQAAAANwbXQAAAAGYW1vdW50BAAAABZQcmV2aW91c0E0QUJhY2t1cFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABdBNEFfQmFja3VwX1ZhbHVlX0luX1ROOgQAAAAOQTRBQmFja3VwUHJpY2UJAABrAAAAAwAAAAAAAAGGoAUAAAAPQTRBUmVzZXJ2ZVZhbHVlBQAAAA5Ub3RhbElzc3VlZEE0QQQAAAAKRmVlQWRkcmVzcwEAAAAgUoPZoIvXkJI7M+XgQERyG3Ox4PxeH5gdLMWeskjH4iADCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAK0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCwgcGxlYXNlIGF0dGFjaCBUTi4DCQAAZgAAAAIAAAAAAABMS0AIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAAMVBsZWFzZSBBdHRhY2ggbWluaW11bSAwLjA1IFROIFRvIElzc3VlIEE0QSBBc3NldC4JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEVRvdGFsX0lzc3VlZF9BNEE6BQAAAA5Ub3RhbElzc3VlZEE0QQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAYVG90YWxfQTRBX1Jlc2VydmVfSW5fVE46BQAAAA9BNEFSZXNlcnZlVmFsdWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAF0E0QV9CYWNrdXBfVmFsdWVfSW5fVE46BQAAAA5BNEFCYWNrdXBQcmljZQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAdtZXNzYWdlAgAAACU8aDE+QTRBIElzc3VlZCBTdWNjZXNzZnVsbHkhPC9oMT48YnI+CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAKQTRBQXNzZXRJRAUAAAAMTmV3QTRBVG9Vc2VyBgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAABpAAAAAgkAAGgAAAACBQAAAAxOZXdBNEFUb1VzZXIAAAAAAAAAAGMAAAAAAAAAAGQFAAAACkE0QUFzc2V0SUQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQUAAAAKRmVlQWRkcmVzcwkAAGkAAAACCQAAaAAAAAIFAAAADE5ld0E0QVRvVXNlcgAAAAAAAAAAAQAAAAAAAAAAZAUAAAAKQTRBQXNzZXRJRAUAAAADbmlsAAAAAWkBAAAACUxpcXVpZGF0ZQAAAAAEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5BAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAAEVByZXZpb3VzSXNzdWVkQTRBCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABFUb3RhbF9Jc3N1ZWRfQTRBOgQAAAARUHJldmlvdXNCdXJuZWRBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAEVRvdGFsX0J1cm5lZF9BNEE6BAAAAA5Ub3RhbElzc3VlZEE0QQkAAGUAAAACBQAAABFQcmV2aW91c0lzc3VlZEE0QQgFAAAAA3BtdAAAAAZhbW91bnQEAAAADlRvdGFsQnVybmVkQTRBCQAAZAAAAAIFAAAAEVByZXZpb3VzQnVybmVkQTRBCAUAAAADcG10AAAABmFtb3VudAQAAAAXUHJldmlvdXNBNEFSZXNlcnZlVmFsdWUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAGFRvdGFsX0E0QV9SZXNlcnZlX0luX1ROOgQAAAAWUHJldmlvdXNBNEFCYWNrdXBQcmljZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAXQTRBX0JhY2t1cF9WYWx1ZV9Jbl9UTjoEAAAAEmNhbGN1bGF0ZWJ1cm52YWx1ZQkAAGsAAAADBQAAABZQcmV2aW91c0E0QUJhY2t1cFByaWNlCAUAAAADcG10AAAABmFtb3VudAAAAAAAAAGGoAQAAAAPQTRBUmVzZXJ2ZVZhbHVlCQAAZQAAAAIFAAAAF1ByZXZpb3VzQTRBUmVzZXJ2ZVZhbHVlBQAAABJjYWxjdWxhdGVidXJudmFsdWUEAAAADkE0QUJhY2t1cFByaWNlCQAAawAAAAMAAAAAAAABhqAFAAAAD0E0QVJlc2VydmVWYWx1ZQUAAAAOVG90YWxJc3N1ZWRBNEEDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAACkE0QUFzc2V0SUQJAAACAAAAAQIAAABHS2luZGx5IERlcG9zaXQgT25seSA4aGRzVkN4UEJWRW1WVVp5eVg4U2Q5OFo5aFU3Rm55MjZXOTZzaktpVHc4ZyAoQTRBKS4DCQAAZgAAAAIAAAAAAAABhqAIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAALUF0dGFjaCBBbW91bnQgbXVzdCBiZSBncmVhdGVyIHRoYW4gMC4wMDEgQTRBLgkABEwAAAACCQEAAAAEQnVybgAAAAIFAAAACkE0QUFzc2V0SUQIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABFUb3RhbF9Jc3N1ZWRfQTRBOgUAAAAOVG90YWxJc3N1ZWRBNEEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEVRvdGFsX0J1cm5lZF9BNEE6BQAAAA5Ub3RhbEJ1cm5lZEE0QQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAYVG90YWxfQTRBX1Jlc2VydmVfSW5fVE46BQAAAA9BNEFSZXNlcnZlVmFsdWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAF0E0QV9CYWNrdXBfVmFsdWVfSW5fVE46BQAAAA5BNEFCYWNrdXBQcmljZQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAdtZXNzYWdlAgAAACk8aDE+QTRBIExpcXVpZGF0ZWQgU3VjY2Vzc2Z1bGx5ITwvaDE+PGJyPgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAEmNhbGN1bGF0ZWJ1cm52YWx1ZQUAAAAEdW5pdAUAAAADbmlsAAAAAWkBAAAAB0RlcG9zaXQAAAABAAAABGRheXMEAAAAA3BtdAMJAAAAAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAAEdObyBwYXltZW50IGF0dGFjaGVkLCBQbGVhc2UgQXR0YWNoIEE0QSBUb2tlbiBhcyBwZXIgVElFUiBpbiBwYXltZW50WzFdLgQAAAAKY3VycmVudEtleQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA9tYXhpbXVtbG9ja2RheXMAAAAAAAAAAFoEAAAACmxvY2tzdGF0dXMCAAAABkxPQ0tFRAQAAAAEVUxTVAAAAACLsslv/wQAAAAEVUxHVAAAAAEXZZLf/wQAAAAEVUxEVAAAAAEXZZLgAAQAAAAGb25lZGF5AAAAAAAAAAWgBAAAAAxhY3R1YWxibG9ja3MJAABoAAAAAgUAAAAGb25lZGF5BQAAAARkYXlzBAAAAA90b3RhbGxvY2tibG9ja3MJAABkAAAAAgUAAAAGaGVpZ2h0BQAAAAxhY3R1YWxibG9ja3MEAAAABVRpZXIxAAAAAAAAARlABAAAAAxUaWVyMXJld2FyZHMJAABrAAAAAwkAAGsAAAADBQAAAAVUaWVyMQgFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjJyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAAAggFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjNyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAABAgFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAQY3VycmVudEE0QUFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAxuZXdBNEFBbW91bnQJAABkAAAAAgUAAAAQY3VycmVudEE0QUFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAACkE0QUFzc2V0SUQJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAAKEluY29ycmVjdCBhc3NldCBhdHRhY2hlZCwgcGxlYXNlIGF0dGFjaCAJAAJYAAAAAQUAAAAKQTRBQXNzZXRJRAIAAAAGIG9ubHkuAwkAAGcAAAACAAAAAAAAAAAGBQAAAARkYXlzCQAAAgAAAAECAAAAJ0Nob29zZSBMb2NraW5nIGRheXMgaW4gYmV0d2VlbiA3IHRvIDkwLgMJAABmAAAAAgUAAAAEZGF5cwUAAAAPbWF4aW11bWxvY2tkYXlzCQAAAgAAAAECAAAATVlvdSBFbnRlcmVkIGRheXMgZ3JlYXRlciB0aGFuIDkwIHBsZWFzZSBFbnRlciBuby4gb2YgZGF5cyBpbiBiZXR3ZWVuIDcgdG8gOTAuAwkAAGYAAAACAAAAABdIdugACAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAADZQbGVhc2UgQXR0YWNoIG1pbmltdW0gMTAwMCBBNEEgVG8gQWNoaWV2ZSBTSUxWRVIgVElFUi4DCQAAZwAAAAIFAAAABFVMU1QIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAIVGllcl9PZl8FAAAACmN1cnJlbnRLZXkCAAAABlNJTFZFUgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X2hlaWdodF9PZl8FAAAACmN1cnJlbnRLZXkFAAAABmhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkFAAAADG5ld0E0QUFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABVUb3RhbF9Mb2NrX0Jsb2Nrc19PZl8FAAAACmN1cnJlbnRLZXkFAAAAD3RvdGFsbG9ja2Jsb2NrcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAAD0xvY2tfU3RhdHVzX09mXwUAAAAKY3VycmVudEtleQUAAAAKbG9ja3N0YXR1cwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAAAtSZXdhcmRzX09mXwUAAAAKY3VycmVudEtleQUAAAAMVGllcjFyZXdhcmRzBQAAAANuaWwDCQAAZwAAAAIFAAAABFVMR1QIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAIVGllcl9PZl8FAAAACmN1cnJlbnRLZXkCAAAABEdPTEQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9oZWlnaHRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxuZXdBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAA90b3RhbGxvY2tibG9ja3MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAA9Mb2NrX1N0YXR1c19PZl8FAAAACmN1cnJlbnRLZXkFAAAACmxvY2tzdGF0dXMJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAADFRpZXIycmV3YXJkcwUAAAADbmlsAwkAAAAAAAACBQAAAARVTERUCAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAACFRpZXJfT2ZfBQAAAApjdXJyZW50S2V5AgAAAAdESUFNT05ECQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQUAAAAMbmV3QTRBQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAFVRvdGFsX0xvY2tfQmxvY2tzX09mXwUAAAAKY3VycmVudEtleQUAAAAPdG90YWxsb2NrYmxvY2tzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAPTG9ja19TdGF0dXNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAApsb2Nrc3RhdHVzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAC1Jld2FyZHNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxUaWVyM3Jld2FyZHMFAAAAA25pbAkAAAIAAAABAgAAAClQbGVhc2UgQ2hvb3NlIGEgUmFuZ2UgQmV0d2VlbiAxMDAwLTEyMDAwLgAAAAFpAQAAAAhXaXRoZHJhdwAAAAAEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAARY2hlY2tkZXBvc2l0dmFsdWUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BAAAAA9mZXRjaFJld2FyZERhdGEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAE1RvdGFsX1VTRFRfQ2xhaW1lZDoEAAAAEnRvdGFscmV3YXJkY2xhaW1lZAkAAGQAAAACBQAAAA9mZXRjaFJld2FyZERhdGEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkDCQAAZgAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAZoZWlnaHQJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAFWW91ciAJAAGkAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkCAAAAYiBBNEEgYXJlIFVuZGVyIExvY2suIENvbnNpZGVyIGxhc3QgOCBkaWdpdHMgYXMgdmFsdWUgYWZ0ZXIgRGVjaW1hbHMuIFRva2VuIHdpbGwgYmUgVW5sb2NrZWQgYWZ0ZXIgCQABpAAAAAEJAABlAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABVUb3RhbF9Mb2NrX0Jsb2Nrc19PZl8FAAAACmN1cnJlbnRLZXkFAAAABmhlaWdodAMJAAAAAAAAAgUAAAARY2hlY2tkZXBvc2l0dmFsdWUAAAAAAAAAAAAJAAACAAAAAQIAAAAmWW91IEhhdmUgQWxyZWFkeSBXaXRoZHJhdyB5b3VyIEFtb3VudC4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQUAAAAKQTRBQXNzZXRJRAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAAC1VTRFRBc3NldElECQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5AAAAAAAAAAAACQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAPTG9ja19TdGF0dXNfT2ZfBQAAAApjdXJyZW50S2V5AgAAAAZVTkxPQ0sJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAE1RvdGFsX1VTRFRfQ2xhaW1lZDoFAAAAEnRvdGFscmV3YXJkY2xhaW1lZAUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXkhucWl",
    "height": 1711764,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2oNd2T85UaZfQkohnT4UtHCm18uqVjy8bPQL4oGzA4pi
Next: 8wo98iiLtnKXs98MzJ8AZxt1R47zcn9h2F3z4naWmY5X

Diff: 
Old New Differences
9 9  func IssueA4A () = {
10 10      let pmt = value(i.payments[0])
11 11      let currentKey = toBase58String(i.caller.bytes)
12 -     let PricePerA4A = getIntegerValue(this, "BALLET/TN")
12 +     let PricePerA4A = getIntegerValue(this, "A4A/TN")
13 13      let NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
14 -     let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_Ballet:")
14 +     let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
15 15      let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
16 -     let PreviousA4AReserveValue = getIntegerValue(this, "Total_Ballet_Reserve_In_TN:")
16 +     let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
17 17      let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
18 -     let PreviousA4ABackupPrice = getIntegerValue(this, "Ballet_Backup_Value_In_TN:")
18 +     let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
19 19      let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
20 20      let FeeAddress = base58'6Z73KxcX3sugpiStpSRXxKxTmWqCaLVwFeM6kwyiKVDR'
21 21      if (isDefined(pmt.assetId))
22 22          then throw("Incorrect asset attached, please attach TN.")
23 23          else if ((5000000 > pmt.amount))
24 24              then throw("Please Attach minimum 0.05 TN To Issue A4A Asset.")
25 -             else [IntegerEntry("Total_Issued_Ballet:", TotalIssuedA4A), IntegerEntry("Total_Ballet_Reserve_In_TN:", A4AReserveValue), IntegerEntry("Ballet_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)]
25 +             else [IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), 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)]
26 26      }
27 27  
28 28  
31 31  func Liquidate () = {
32 32      let currentKey = toBase58String(i.callerPublicKey)
33 33      let pmt = value(i.payments[0])
34 -     let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_Ballet:")
34 +     let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
35 35      let PreviousBurnedA4A = getIntegerValue(this, "Total_Burned_A4A:")
36 36      let TotalIssuedA4A = (PreviousIssuedA4A - pmt.amount)
37 37      let TotalBurnedA4A = (PreviousBurnedA4A + pmt.amount)
38 -     let PreviousA4AReserveValue = getIntegerValue(this, "Total_Ballet_Reserve_In_TN:")
39 -     let PreviousA4ABackupPrice = getIntegerValue(this, "Ballet_Backup_Value_In_TN:")
38 +     let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
39 +     let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
40 40      let calculateburnvalue = fraction(PreviousA4ABackupPrice, pmt.amount, 100000)
41 41      let A4AReserveValue = (PreviousA4AReserveValue - calculateburnvalue)
42 42      let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
44 44          then throw("Kindly Deposit Only 8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g (A4A).")
45 45          else if ((100000 > pmt.amount))
46 46              then throw("Attach Amount must be greater than 0.001 A4A.")
47 -             else [Burn(A4AAssetID, pmt.amount), IntegerEntry("Total_Issued_Ballet:", TotalIssuedA4A), IntegerEntry("Total_Burned_A4A:", TotalBurnedA4A), IntegerEntry("Total_Ballet_Reserve_In_TN:", A4AReserveValue), IntegerEntry("Ballet_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Liquidated Successfully!</h1><br>"), ScriptTransfer(i.caller, calculateburnvalue, unit)]
47 +             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)]
48 48      }
49 49  
50 50  
97 97  func Withdraw () = {
98 98      let currentKey = toBase58String(i.caller.bytes)
99 99      let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
100 +     let fetchRewardData = getIntegerValue(this, "Total_USDT_Claimed:")
101 +     let totalrewardclaimed = (fetchRewardData + getIntegerValue(this, ("Rewards_Of_" + currentKey)))
100 102      if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
101 103          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))))
102 104          else if ((checkdepositvalue == 0))
103 105              then throw("You Have Already Withdraw your Amount.")
104 -             else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), IntegerEntry(("Deposit_Amount_Of_" + currentKey), 0), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), 0), StringEntry(("Lock_Status_Of_" + currentKey), "UNLOCK"), IntegerEntry(("Rewards_Of_" + currentKey), 0)]
106 +             else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), 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)]
105 107      }
106 108  
107 109  
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 -     let PricePerA4A = getIntegerValue(this, "BALLET/TN")
12 +     let PricePerA4A = getIntegerValue(this, "A4A/TN")
13 13      let NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
14 -     let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_Ballet:")
14 +     let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
15 15      let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
16 -     let PreviousA4AReserveValue = getIntegerValue(this, "Total_Ballet_Reserve_In_TN:")
16 +     let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
17 17      let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
18 -     let PreviousA4ABackupPrice = getIntegerValue(this, "Ballet_Backup_Value_In_TN:")
18 +     let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
19 19      let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
20 20      let FeeAddress = base58'6Z73KxcX3sugpiStpSRXxKxTmWqCaLVwFeM6kwyiKVDR'
21 21      if (isDefined(pmt.assetId))
22 22          then throw("Incorrect asset attached, please attach TN.")
23 23          else if ((5000000 > pmt.amount))
24 24              then throw("Please Attach minimum 0.05 TN To Issue A4A Asset.")
25 -             else [IntegerEntry("Total_Issued_Ballet:", TotalIssuedA4A), IntegerEntry("Total_Ballet_Reserve_In_TN:", A4AReserveValue), IntegerEntry("Ballet_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)]
25 +             else [IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), 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)]
26 26      }
27 27  
28 28  
29 29  
30 30  @Callable(i)
31 31  func Liquidate () = {
32 32      let currentKey = toBase58String(i.callerPublicKey)
33 33      let pmt = value(i.payments[0])
34 -     let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_Ballet:")
34 +     let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
35 35      let PreviousBurnedA4A = getIntegerValue(this, "Total_Burned_A4A:")
36 36      let TotalIssuedA4A = (PreviousIssuedA4A - pmt.amount)
37 37      let TotalBurnedA4A = (PreviousBurnedA4A + pmt.amount)
38 -     let PreviousA4AReserveValue = getIntegerValue(this, "Total_Ballet_Reserve_In_TN:")
39 -     let PreviousA4ABackupPrice = getIntegerValue(this, "Ballet_Backup_Value_In_TN:")
38 +     let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
39 +     let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
40 40      let calculateburnvalue = fraction(PreviousA4ABackupPrice, pmt.amount, 100000)
41 41      let A4AReserveValue = (PreviousA4AReserveValue - calculateburnvalue)
42 42      let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
43 43      if ((pmt.assetId != A4AAssetID))
44 44          then throw("Kindly Deposit Only 8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g (A4A).")
45 45          else if ((100000 > pmt.amount))
46 46              then throw("Attach Amount must be greater than 0.001 A4A.")
47 -             else [Burn(A4AAssetID, pmt.amount), IntegerEntry("Total_Issued_Ballet:", TotalIssuedA4A), IntegerEntry("Total_Burned_A4A:", TotalBurnedA4A), IntegerEntry("Total_Ballet_Reserve_In_TN:", A4AReserveValue), IntegerEntry("Ballet_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Liquidated Successfully!</h1><br>"), ScriptTransfer(i.caller, calculateburnvalue, unit)]
47 +             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)]
48 48      }
49 49  
50 50  
51 51  
52 52  @Callable(i)
53 53  func Deposit (days) = {
54 54      let pmt = if ((size(i.payments) == 1))
55 55          then i.payments[0]
56 56          else throw("No payment attached, Please Attach A4A Token as per TIER in payment[1].")
57 57      let currentKey = toBase58String(i.caller.bytes)
58 58      let maximumlockdays = 90
59 59      let lockstatus = "LOCKED"
60 60      let ULST = 599999999999
61 61      let ULGT = 1199999999999
62 62      let ULDT = 1200000000000
63 63      let oneday = 1440
64 64      let actualblocks = (oneday * days)
65 65      let totallockblocks = (height + actualblocks)
66 66      let Tier1 = 72000
67 67      let Tier1rewards = fraction(fraction(Tier1, pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
68 68      let Tier2rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
69 69      let Tier3rewards = fraction(fraction((Tier1 * 4), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
70 70      let currentA4AAmount =     match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
71 71          case a: Int => 
72 72              a
73 73          case _ => 
74 74              0
75 75      }
76 76      let newA4AAmount = (currentA4AAmount + pmt.amount)
77 77      if ((pmt.assetId != A4AAssetID))
78 78          then throw((("Incorrect asset attached, please attach " + toBase58String(A4AAssetID)) + " only."))
79 79          else if ((6 >= days))
80 80              then throw("Choose Locking days in between 7 to 90.")
81 81              else if ((days > maximumlockdays))
82 82                  then throw("You Entered days greater than 90 please Enter no. of days in between 7 to 90.")
83 83                  else if ((100000000000 > pmt.amount))
84 84                      then throw("Please Attach minimum 1000 A4A To Achieve SILVER TIER.")
85 85                      else if ((ULST >= pmt.amount))
86 86                          then [StringEntry(("Tier_Of_" + currentKey), "SILVER"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier1rewards)]
87 87                          else if ((ULGT >= pmt.amount))
88 88                              then [StringEntry(("Tier_Of_" + currentKey), "GOLD"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier2rewards)]
89 89                              else if ((ULDT == pmt.amount))
90 90                                  then [StringEntry(("Tier_Of_" + currentKey), "DIAMOND"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier3rewards)]
91 91                                  else throw("Please Choose a Range Between 1000-12000.")
92 92      }
93 93  
94 94  
95 95  
96 96  @Callable(i)
97 97  func Withdraw () = {
98 98      let currentKey = toBase58String(i.caller.bytes)
99 99      let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
100 +     let fetchRewardData = getIntegerValue(this, "Total_USDT_Claimed:")
101 +     let totalrewardclaimed = (fetchRewardData + getIntegerValue(this, ("Rewards_Of_" + currentKey)))
100 102      if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
101 103          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))))
102 104          else if ((checkdepositvalue == 0))
103 105              then throw("You Have Already Withdraw your Amount.")
104 -             else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), IntegerEntry(("Deposit_Amount_Of_" + currentKey), 0), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), 0), StringEntry(("Lock_Status_Of_" + currentKey), "UNLOCK"), IntegerEntry(("Rewards_Of_" + currentKey), 0)]
106 +             else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), 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)]
105 107      }
106 108  
107 109  
108 110  @Verifier(tx)
109 111  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
110 112

Old	New		Differences
9	9		func IssueA4A () = {
10	10		let pmt = value(i.payments[0])
11	11		let currentKey = toBase58String(i.caller.bytes)
12		-	let PricePerA4A = getIntegerValue(this, "~~BALLET~~/TN")
	12	+	let PricePerA4A = getIntegerValue(this, "A4A/TN")
13	13		let NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
14		-	let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_~~Ballet~~:")
	14	+	let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
15	15		let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
16		-	let PreviousA4AReserveValue = getIntegerValue(this, "Total_~~Ballet~~_Reserve_In_TN:")
	16	+	let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
17	17		let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
18		-	let PreviousA4ABackupPrice = getIntegerValue(this, "~~Ballet~~_Backup_Value_In_TN:")
	18	+	let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
19	19		let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
20	20		let FeeAddress = base58'6Z73KxcX3sugpiStpSRXxKxTmWqCaLVwFeM6kwyiKVDR'
21	21		if (isDefined(pmt.assetId))
22	22		then throw("Incorrect asset attached, please attach TN.")
23	23		else if ((5000000 > pmt.amount))
24	24		then throw("Please Attach minimum 0.05 TN To Issue A4A Asset.")
25		-	else [IntegerEntry("Total_Issued_~~Ballet~~:", TotalIssuedA4A), IntegerEntry("Total_~~Ballet~~_Reserve_In_TN:", A4AReserveValue), IntegerEntry("~~Ballet~~_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)]
	25	+	else [IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), 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)]
26	26		}
27	27
28	28

31	31		func Liquidate () = {
32	32		let currentKey = toBase58String(i.callerPublicKey)
33	33		let pmt = value(i.payments[0])
34		-	let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_~~Ballet~~:")
	34	+	let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
35	35		let PreviousBurnedA4A = getIntegerValue(this, "Total_Burned_A4A:")
36	36		let TotalIssuedA4A = (PreviousIssuedA4A - pmt.amount)
37	37		let TotalBurnedA4A = (PreviousBurnedA4A + pmt.amount)
38		-	let PreviousA4AReserveValue = getIntegerValue(this, "Total_~~Ballet~~_Reserve_In_TN:")
39		-	let PreviousA4ABackupPrice = getIntegerValue(this, "~~Ballet~~_Backup_Value_In_TN:")
	38	+	let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
	39	+	let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
40	40		let calculateburnvalue = fraction(PreviousA4ABackupPrice, pmt.amount, 100000)
41	41		let A4AReserveValue = (PreviousA4AReserveValue - calculateburnvalue)
42	42		let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)

44	44		then throw("Kindly Deposit Only 8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g (A4A).")
45	45		else if ((100000 > pmt.amount))
46	46		then throw("Attach Amount must be greater than 0.001 A4A.")
47		-	else [Burn(A4AAssetID, pmt.amount), IntegerEntry("Total_Issued_~~Ballet~~:", TotalIssuedA4A), IntegerEntry("Total_Burned_A4A:", TotalBurnedA4A), IntegerEntry("Total_~~Ballet~~_Reserve_In_TN:", A4AReserveValue), IntegerEntry("~~Ballet~~_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Liquidated Successfully!</h1><br>"), ScriptTransfer(i.caller, calculateburnvalue, unit)]
	47	+	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)]
48	48		}
49	49
50	50

97	97		func Withdraw () = {
98	98		let currentKey = toBase58String(i.caller.bytes)
99	99		let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
	100	+	let fetchRewardData = getIntegerValue(this, "Total_USDT_Claimed:")
	101	+	let totalrewardclaimed = (fetchRewardData + getIntegerValue(this, ("Rewards_Of_" + currentKey)))
100	102		if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
101	103		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))))
102	104		else if ((checkdepositvalue == 0))
103	105		then throw("You Have Already Withdraw your Amount.")
104		-	else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), IntegerEntry(("Deposit_Amount_Of_" + currentKey), 0), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), 0), StringEntry(("Lock_Status_Of_" + currentKey), "UNLOCK"), IntegerEntry(("Rewards_Of_" + currentKey), 0)]
	106	+	else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), 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)]
105	107		}
106	108
107	109

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		-	let PricePerA4A = getIntegerValue(this, "~~BALLET~~/TN")
	12	+	let PricePerA4A = getIntegerValue(this, "A4A/TN")
13	13		let NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
14		-	let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_~~Ballet~~:")
	14	+	let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
15	15		let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
16		-	let PreviousA4AReserveValue = getIntegerValue(this, "Total_~~Ballet~~_Reserve_In_TN:")
	16	+	let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
17	17		let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
18		-	let PreviousA4ABackupPrice = getIntegerValue(this, "~~Ballet~~_Backup_Value_In_TN:")
	18	+	let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
19	19		let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
20	20		let FeeAddress = base58'6Z73KxcX3sugpiStpSRXxKxTmWqCaLVwFeM6kwyiKVDR'
21	21		if (isDefined(pmt.assetId))
22	22		then throw("Incorrect asset attached, please attach TN.")
23	23		else if ((5000000 > pmt.amount))
24	24		then throw("Please Attach minimum 0.05 TN To Issue A4A Asset.")
25		-	else [IntegerEntry("Total_Issued_~~Ballet~~:", TotalIssuedA4A), IntegerEntry("Total_~~Ballet~~_Reserve_In_TN:", A4AReserveValue), IntegerEntry("~~Ballet~~_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)]
	25	+	else [IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), 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)]
26	26		}
27	27
28	28
29	29
30	30		@Callable(i)
31	31		func Liquidate () = {
32	32		let currentKey = toBase58String(i.callerPublicKey)
33	33		let pmt = value(i.payments[0])
34		-	let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_~~Ballet~~:")
	34	+	let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
35	35		let PreviousBurnedA4A = getIntegerValue(this, "Total_Burned_A4A:")
36	36		let TotalIssuedA4A = (PreviousIssuedA4A - pmt.amount)
37	37		let TotalBurnedA4A = (PreviousBurnedA4A + pmt.amount)
38		-	let PreviousA4AReserveValue = getIntegerValue(this, "Total_~~Ballet~~_Reserve_In_TN:")
39		-	let PreviousA4ABackupPrice = getIntegerValue(this, "~~Ballet~~_Backup_Value_In_TN:")
	38	+	let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
	39	+	let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
40	40		let calculateburnvalue = fraction(PreviousA4ABackupPrice, pmt.amount, 100000)
41	41		let A4AReserveValue = (PreviousA4AReserveValue - calculateburnvalue)
42	42		let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
43	43		if ((pmt.assetId != A4AAssetID))
44	44		then throw("Kindly Deposit Only 8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g (A4A).")
45	45		else if ((100000 > pmt.amount))
46	46		then throw("Attach Amount must be greater than 0.001 A4A.")
47		-	else [Burn(A4AAssetID, pmt.amount), IntegerEntry("Total_Issued_~~Ballet~~:", TotalIssuedA4A), IntegerEntry("Total_Burned_A4A:", TotalBurnedA4A), IntegerEntry("Total_~~Ballet~~_Reserve_In_TN:", A4AReserveValue), IntegerEntry("~~Ballet~~_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Liquidated Successfully!</h1><br>"), ScriptTransfer(i.caller, calculateburnvalue, unit)]
	47	+	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)]
48	48		}
49	49
50	50
51	51
52	52		@Callable(i)
53	53		func Deposit (days) = {
54	54		let pmt = if ((size(i.payments) == 1))
55	55		then i.payments[0]
56	56		else throw("No payment attached, Please Attach A4A Token as per TIER in payment[1].")
57	57		let currentKey = toBase58String(i.caller.bytes)
58	58		let maximumlockdays = 90
59	59		let lockstatus = "LOCKED"
60	60		let ULST = 599999999999
61	61		let ULGT = 1199999999999
62	62		let ULDT = 1200000000000
63	63		let oneday = 1440
64	64		let actualblocks = (oneday * days)
65	65		let totallockblocks = (height + actualblocks)
66	66		let Tier1 = 72000
67	67		let Tier1rewards = fraction(fraction(Tier1, pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
68	68		let Tier2rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
69	69		let Tier3rewards = fraction(fraction((Tier1 * 4), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
70	70		let currentA4AAmount = match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
71	71		case a: Int =>
72	72		a
73	73		case _ =>
74	74		0
75	75		}
76	76		let newA4AAmount = (currentA4AAmount + pmt.amount)
77	77		if ((pmt.assetId != A4AAssetID))
78	78		then throw((("Incorrect asset attached, please attach " + toBase58String(A4AAssetID)) + " only."))
79	79		else if ((6 >= days))
80	80		then throw("Choose Locking days in between 7 to 90.")
81	81		else if ((days > maximumlockdays))
82	82		then throw("You Entered days greater than 90 please Enter no. of days in between 7 to 90.")
83	83		else if ((100000000000 > pmt.amount))
84	84		then throw("Please Attach minimum 1000 A4A To Achieve SILVER TIER.")
85	85		else if ((ULST >= pmt.amount))
86	86		then [StringEntry(("Tier_Of_" + currentKey), "SILVER"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier1rewards)]
87	87		else if ((ULGT >= pmt.amount))
88	88		then [StringEntry(("Tier_Of_" + currentKey), "GOLD"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier2rewards)]
89	89		else if ((ULDT == pmt.amount))
90	90		then [StringEntry(("Tier_Of_" + currentKey), "DIAMOND"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier3rewards)]
91	91		else throw("Please Choose a Range Between 1000-12000.")
92	92		}
93	93
94	94
95	95
96	96		@Callable(i)
97	97		func Withdraw () = {
98	98		let currentKey = toBase58String(i.caller.bytes)
99	99		let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
	100	+	let fetchRewardData = getIntegerValue(this, "Total_USDT_Claimed:")
	101	+	let totalrewardclaimed = (fetchRewardData + getIntegerValue(this, ("Rewards_Of_" + currentKey)))
100	102		if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
101	103		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))))
102	104		else if ((checkdepositvalue == 0))
103	105		then throw("You Have Already Withdraw your Amount.")
104		-	else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), IntegerEntry(("Deposit_Amount_Of_" + currentKey), 0), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), 0), StringEntry(("Lock_Status_Of_" + currentKey), "UNLOCK"), IntegerEntry(("Rewards_Of_" + currentKey), 0)]
	106	+	else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), 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)]
105	107		}
106	108
107	109
108	110		@Verifier(tx)
109	111		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
110	112

github/deemru/w8io/169f3d6 
45.71 ms ◑