w8 · tx · 8wo···Y5X

tx · 8wo98iiLtnKXs98MzJ8AZxt1R47zcn9h2F3z4naWmY5X

3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj:  -0.01400000 Waves

2021.09.21 21:09 [1713149] smart account 3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8wo98iiLtnKXs98MzJ8AZxt1R47zcn9h2F3z4naWmY5X",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1632247750435,
    "version": 2,
    "chainId": 84,
    "sender": "3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj",
    "senderPublicKey": "C246qxhuyo9DBk1pjMzEQSVAWmiqYupG2swGkxTeAvLV",
    "proofs": [
        "4oADbrVEMqx2aUBNV5cVrtc9CBgBVssS628YABq13n7Tk51PuhrkuQTq8kdH7bgtsbULQfDj3oY9t99SU4Ypw6yW"
    ],
    "script": "base64:AAIEAAAAAAAAAA0IAhIAEgASAwoBARIAAAAAAgAAAAAKQTRBQXNzZXRJRAEAAAAgcmq6+6Wxr2yowtuRELQMbFaAM1flDMDSVcM9IpA14LUAAAAAC1VTRFRBc3NldElEAQAAACBfV2kYyAongSbxW5ftxOxN+cK7WcsSGIuEYKBfpvf88wAAAAQAAAABaQEAAAAISXNzdWVBNEEAAAAABAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAALUHJpY2VQZXJBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAABkE0QS9UTgQAAAAMTmV3QTRBVG9Vc2VyCQAAawAAAAMAAAAAAAABhqAIBQAAAANwbXQAAAAGYW1vdW50BQAAAAtQcmljZVBlckE0QQQAAAARUHJldmlvdXNJc3N1ZWRBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAEVRvdGFsX0lzc3VlZF9BNEE6BAAAAA5Ub3RhbElzc3VlZEE0QQkAAGQAAAACBQAAABFQcmV2aW91c0lzc3VlZEE0QQUAAAAMTmV3QTRBVG9Vc2VyBAAAABdQcmV2aW91c0E0QVJlc2VydmVWYWx1ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAYVG90YWxfQTRBX1Jlc2VydmVfSW5fVE46BAAAAA9BNEFSZXNlcnZlVmFsdWUJAABkAAAAAgUAAAAXUHJldmlvdXNBNEFSZXNlcnZlVmFsdWUIBQAAAANwbXQAAAAGYW1vdW50BAAAABZQcmV2aW91c0E0QUJhY2t1cFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABdBNEFfQmFja3VwX1ZhbHVlX0luX1ROOgQAAAAOQTRBQmFja3VwUHJpY2UJAABrAAAAAwAAAAAAAAGGoAUAAAAPQTRBUmVzZXJ2ZVZhbHVlBQAAAA5Ub3RhbElzc3VlZEE0QQQAAAAKRmVlQWRkcmVzcwEAAAAgUoPZoIvXkJI7M+XgQERyG3Ox4PxeH5gdLMWeskjH4iADCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAK0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCwgcGxlYXNlIGF0dGFjaCBUTi4DCQAAZgAAAAIAAAAAAABMS0AIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAAMVBsZWFzZSBBdHRhY2ggbWluaW11bSAwLjA1IFROIFRvIElzc3VlIEE0QSBBc3NldC4JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEVRvdGFsX0lzc3VlZF9BNEE6BQAAAA5Ub3RhbElzc3VlZEE0QQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAYVG90YWxfQTRBX1Jlc2VydmVfSW5fVE46BQAAAA9BNEFSZXNlcnZlVmFsdWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAF0E0QV9CYWNrdXBfVmFsdWVfSW5fVE46BQAAAA5BNEFCYWNrdXBQcmljZQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAdtZXNzYWdlAgAAACU8aDE+QTRBIElzc3VlZCBTdWNjZXNzZnVsbHkhPC9oMT48YnI+CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAKQTRBQXNzZXRJRAUAAAAMTmV3QTRBVG9Vc2VyBgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAABpAAAAAgkAAGgAAAACBQAAAAxOZXdBNEFUb1VzZXIAAAAAAAAAAGMAAAAAAAAAAGQFAAAACkE0QUFzc2V0SUQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQUAAAAKRmVlQWRkcmVzcwkAAGkAAAACCQAAaAAAAAIFAAAADE5ld0E0QVRvVXNlcgAAAAAAAAAAAQAAAAAAAAAAZAUAAAAKQTRBQXNzZXRJRAUAAAADbmlsAAAAAWkBAAAACUxpcXVpZGF0ZQAAAAAEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5BAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAAEVByZXZpb3VzSXNzdWVkQTRBCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABFUb3RhbF9Jc3N1ZWRfQTRBOgQAAAARUHJldmlvdXNCdXJuZWRBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAEVRvdGFsX0J1cm5lZF9BNEE6BAAAAA5Ub3RhbElzc3VlZEE0QQkAAGUAAAACBQAAABFQcmV2aW91c0lzc3VlZEE0QQgFAAAAA3BtdAAAAAZhbW91bnQEAAAADlRvdGFsQnVybmVkQTRBCQAAZAAAAAIFAAAAEVByZXZpb3VzQnVybmVkQTRBCAUAAAADcG10AAAABmFtb3VudAQAAAAXUHJldmlvdXNBNEFSZXNlcnZlVmFsdWUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAGFRvdGFsX0E0QV9SZXNlcnZlX0luX1ROOgQAAAAWUHJldmlvdXNBNEFCYWNrdXBQcmljZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAXQTRBX0JhY2t1cF9WYWx1ZV9Jbl9UTjoEAAAAEmNhbGN1bGF0ZWJ1cm52YWx1ZQkAAGsAAAADBQAAABZQcmV2aW91c0E0QUJhY2t1cFByaWNlCAUAAAADcG10AAAABmFtb3VudAAAAAAAAAGGoAQAAAAPQTRBUmVzZXJ2ZVZhbHVlCQAAZQAAAAIFAAAAF1ByZXZpb3VzQTRBUmVzZXJ2ZVZhbHVlBQAAABJjYWxjdWxhdGVidXJudmFsdWUEAAAADkE0QUJhY2t1cFByaWNlCQAAawAAAAMAAAAAAAABhqAFAAAAD0E0QVJlc2VydmVWYWx1ZQUAAAAOVG90YWxJc3N1ZWRBNEEDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAACkE0QUFzc2V0SUQJAAACAAAAAQIAAABHS2luZGx5IERlcG9zaXQgT25seSA4aGRzVkN4UEJWRW1WVVp5eVg4U2Q5OFo5aFU3Rm55MjZXOTZzaktpVHc4ZyAoQTRBKS4DCQAAZgAAAAIAAAAAAAABhqAIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAALUF0dGFjaCBBbW91bnQgbXVzdCBiZSBncmVhdGVyIHRoYW4gMC4wMDEgQTRBLgkABEwAAAACCQEAAAAEQnVybgAAAAIFAAAACkE0QUFzc2V0SUQIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABFUb3RhbF9Jc3N1ZWRfQTRBOgUAAAAOVG90YWxJc3N1ZWRBNEEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEVRvdGFsX0J1cm5lZF9BNEE6BQAAAA5Ub3RhbEJ1cm5lZEE0QQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAYVG90YWxfQTRBX1Jlc2VydmVfSW5fVE46BQAAAA9BNEFSZXNlcnZlVmFsdWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAF0E0QV9CYWNrdXBfVmFsdWVfSW5fVE46BQAAAA5BNEFCYWNrdXBQcmljZQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAdtZXNzYWdlAgAAACk8aDE+QTRBIExpcXVpZGF0ZWQgU3VjY2Vzc2Z1bGx5ITwvaDE+PGJyPgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAEmNhbGN1bGF0ZWJ1cm52YWx1ZQUAAAAEdW5pdAUAAAADbmlsAAAAAWkBAAAAB0RlcG9zaXQAAAABAAAABGRheXMEAAAAA3BtdAMJAAAAAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAAEdObyBwYXltZW50IGF0dGFjaGVkLCBQbGVhc2UgQXR0YWNoIEE0QSBUb2tlbiBhcyBwZXIgVElFUiBpbiBwYXltZW50WzFdLgQAAAAKY3VycmVudEtleQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA9tYXhpbXVtbG9ja2RheXMAAAAAAAAAAFoEAAAACmxvY2tzdGF0dXMCAAAABkxPQ0tFRAQAAAAEVUxCVAAAAAAXSHbn/wQAAAAEVUxTVAAAAACLsslv/wQAAAAEVUxHVAAAAAEXZZLf/wQAAAAEVUxEVAAAAAEXZZLgAAQAAAAGb25lZGF5AAAAAAAAAAWgBAAAAAxhY3R1YWxibG9ja3MJAABoAAAAAgUAAAAGb25lZGF5BQAAAARkYXlzBAAAAA90b3RhbGxvY2tibG9ja3MJAABkAAAAAgUAAAAGaGVpZ2h0BQAAAAxhY3R1YWxibG9ja3MEAAAABVRpZXIxAAAAAAAAAIygBAAAAAxUaWVyMXJld2FyZHMJAABrAAAAAwkAAGsAAAADBQAAAAVUaWVyMQgFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjJyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAAAggFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjNyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAABAgFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjRyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAACAgFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAQY3VycmVudEE0QUFtb3VudAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAAxuZXdBNEFBbW91bnQJAABkAAAAAgUAAAAQY3VycmVudEE0QUFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAACkE0QUFzc2V0SUQJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAAKEluY29ycmVjdCBhc3NldCBhdHRhY2hlZCwgcGxlYXNlIGF0dGFjaCAJAAJYAAAAAQUAAAAKQTRBQXNzZXRJRAIAAAAGIG9ubHkuAwkAAGcAAAACAAAAAAAAAAAGBQAAAARkYXlzCQAAAgAAAAECAAAAJ0Nob29zZSBMb2NraW5nIGRheXMgaW4gYmV0d2VlbiA3IHRvIDkwLgMJAABmAAAAAgUAAAAEZGF5cwUAAAAPbWF4aW11bWxvY2tkYXlzCQAAAgAAAAECAAAATVlvdSBFbnRlcmVkIGRheXMgZ3JlYXRlciB0aGFuIDkwIHBsZWFzZSBFbnRlciBuby4gb2YgZGF5cyBpbiBiZXR3ZWVuIDcgdG8gOTAuAwkAAGYAAAACAAAAAAfA1a0ACAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAADVQbGVhc2UgQXR0YWNoIG1pbmltdW0gMzMzIEE0QSBUbyBBY2hpZXZlIEJST05aRSBUSUVSLgMJAABnAAAAAgUAAAAEVUxCVAgFAAAAA3BtdAAAAAZhbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAAhUaWVyX09mXwUAAAAKY3VycmVudEtleQIAAAAGQlJPTlpFCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQUAAAAMbmV3QTRBQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAFVRvdGFsX0xvY2tfQmxvY2tzX09mXwUAAAAKY3VycmVudEtleQUAAAAPdG90YWxsb2NrYmxvY2tzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAPTG9ja19TdGF0dXNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAApsb2Nrc3RhdHVzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAC1Jld2FyZHNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAVUaWVyMQUAAAADbmlsAwkAAGcAAAACBQAAAARVTFNUCAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAACFRpZXJfT2ZfBQAAAApjdXJyZW50S2V5AgAAAAZTSUxWRVIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9oZWlnaHRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxuZXdBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAA90b3RhbGxvY2tibG9ja3MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAA9Mb2NrX1N0YXR1c19PZl8FAAAACmN1cnJlbnRLZXkFAAAACmxvY2tzdGF0dXMJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAADFRpZXIxcmV3YXJkcwUAAAADbmlsAwkAAGcAAAACBQAAAARVTEdUCAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAACFRpZXJfT2ZfBQAAAApjdXJyZW50S2V5AgAAAARHT0xECQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQUAAAAMbmV3QTRBQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAFVRvdGFsX0xvY2tfQmxvY2tzX09mXwUAAAAKY3VycmVudEtleQUAAAAPdG90YWxsb2NrYmxvY2tzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAPTG9ja19TdGF0dXNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAApsb2Nrc3RhdHVzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAC1Jld2FyZHNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxUaWVyMnJld2FyZHMFAAAAA25pbAMJAAAAAAAAAgUAAAAEVUxEVAgFAAAAA3BtdAAAAAZhbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAAhUaWVyX09mXwUAAAAKY3VycmVudEtleQIAAAAHRElBTU9ORAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X2hlaWdodF9PZl8FAAAACmN1cnJlbnRLZXkFAAAABmhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkFAAAADG5ld0E0QUFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABVUb3RhbF9Mb2NrX0Jsb2Nrc19PZl8FAAAACmN1cnJlbnRLZXkFAAAAD3RvdGFsbG9ja2Jsb2NrcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAAD0xvY2tfU3RhdHVzX09mXwUAAAAKY3VycmVudEtleQUAAAAKbG9ja3N0YXR1cwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAAAtSZXdhcmRzX09mXwUAAAAKY3VycmVudEtleQUAAAAMVGllcjNyZXdhcmRzBQAAAANuaWwJAAACAAAAAQIAAAAoUGxlYXNlIENob29zZSBhIFJhbmdlIEJldHdlZW4gMzMzLTEyMDAwLgAAAAFpAQAAAAhXaXRoZHJhdwAAAAAEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAARY2hlY2tkZXBvc2l0dmFsdWUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BAAAAA9mZXRjaFJld2FyZERhdGEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAE1RvdGFsX1VTRFRfQ2xhaW1lZDoEAAAAEnRvdGFscmV3YXJkY2xhaW1lZAkAAGQAAAACBQAAAA9mZXRjaFJld2FyZERhdGEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkDCQAAZgAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAZoZWlnaHQJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAFWW91ciAJAAGkAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkCAAAAYiBBNEEgYXJlIFVuZGVyIExvY2suIENvbnNpZGVyIGxhc3QgOCBkaWdpdHMgYXMgdmFsdWUgYWZ0ZXIgRGVjaW1hbHMuIFRva2VuIHdpbGwgYmUgVW5sb2NrZWQgYWZ0ZXIgCQABpAAAAAEJAABlAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABVUb3RhbF9Mb2NrX0Jsb2Nrc19PZl8FAAAACmN1cnJlbnRLZXkFAAAABmhlaWdodAMJAAAAAAAAAgUAAAARY2hlY2tkZXBvc2l0dmFsdWUAAAAAAAAAAAAJAAACAAAAAQIAAAAmWW91IEhhdmUgQWxyZWFkeSBXaXRoZHJhdyB5b3VyIEFtb3VudC4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQUAAAAKQTRBQXNzZXRJRAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAAC1VTRFRBc3NldElECQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5AAAAAAAAAAAACQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAPTG9ja19TdGF0dXNfT2ZfBQAAAApjdXJyZW50S2V5AgAAAAZVTkxPQ0sJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAE1RvdGFsX1VTRFRfQ2xhaW1lZDoFAAAAEnRvdGFscmV3YXJkY2xhaW1lZAUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXmdN7SD",
    "height": 1713149,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Fha7EnXrRgSgeTuSoQH5mGAx4XJcRGanemfzaiHfmNre
Next: 2fXwCrwq7fYXRPEUpGR8acVmZMG7xk2KewGrT9zvpygB

Diff: 
Old New Differences
1 1  {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let A4AAssetID = base58'J9VzWPfRSQyCbEv5oWpxLSihigbpbJsGBHJZV9Ct8ook'
4 + let A4AAssetID = base58'8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g'
5 5  
6 - let USDTAssetID = base58'Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H'
6 + let USDTAssetID = base58'7RB3BWayeCVPq3kkpkeJZAFv2DYCB5gEwnutEpRofaw4'
7 7  
8 8  @Callable(i)
9 9  func IssueA4A () = {
57 57      let currentKey = toBase58String(i.caller.bytes)
58 58      let maximumlockdays = 90
59 59      let lockstatus = "LOCKED"
60 +     let ULBT = 99999999999
60 61      let ULST = 599999999999
61 62      let ULGT = 1199999999999
62 63      let ULDT = 1200000000000
63 64      let oneday = 1440
64 65      let actualblocks = (oneday * days)
65 66      let totallockblocks = (height + actualblocks)
66 -     let Tier1 = 72000
67 +     let Tier1 = 36000
67 68      let Tier1rewards = fraction(fraction(Tier1, pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
68 69      let Tier2rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
69 70      let Tier3rewards = fraction(fraction((Tier1 * 4), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
71 +     let Tier4rewards = fraction(fraction((Tier1 * 8), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
70 72      let currentA4AAmount =     match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
71 73          case a: Int => 
72 74              a
80 82              then throw("Choose Locking days in between 7 to 90.")
81 83              else if ((days > maximumlockdays))
82 84                  then throw("You Entered days greater than 90 please Enter no. of days in between 7 to 90.")
83 -                 else if ((100000000000 > pmt.amount))
84 -                     then throw("Please Attach minimum 1000 A4A To Achieve SILVER TIER.")
85 -                     else if ((ULST >= pmt.amount))
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 -                         else if ((ULGT >= pmt.amount))
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 -                             else if ((ULDT == pmt.amount))
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 -                                 else throw("Please Choose a Range Between 1000-12000.")
85 +                 else if ((33300000000 > pmt.amount))
86 +                     then throw("Please Attach minimum 333 A4A To Achieve BRONZE TIER.")
87 +                     else if ((ULBT >= pmt.amount))
88 +                         then [StringEntry(("Tier_Of_" + currentKey), "BRONZE"), 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), Tier1)]
89 +                         else if ((ULST >= pmt.amount))
90 +                             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)]
91 +                             else if ((ULGT >= pmt.amount))
92 +                                 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)]
93 +                                 else if ((ULDT == pmt.amount))
94 +                                     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)]
95 +                                     else throw("Please Choose a Range Between 333-12000.")
92 96      }
93 97  
94 98  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let A4AAssetID = base58'J9VzWPfRSQyCbEv5oWpxLSihigbpbJsGBHJZV9Ct8ook'
4 + let A4AAssetID = base58'8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g'
5 5  
6 - let USDTAssetID = base58'Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H'
6 + let USDTAssetID = base58'7RB3BWayeCVPq3kkpkeJZAFv2DYCB5gEwnutEpRofaw4'
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 NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
14 14      let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
15 15      let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
16 16      let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
17 17      let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
18 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 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 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 38      let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
39 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 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 +     let ULBT = 99999999999
60 61      let ULST = 599999999999
61 62      let ULGT = 1199999999999
62 63      let ULDT = 1200000000000
63 64      let oneday = 1440
64 65      let actualblocks = (oneday * days)
65 66      let totallockblocks = (height + actualblocks)
66 -     let Tier1 = 72000
67 +     let Tier1 = 36000
67 68      let Tier1rewards = fraction(fraction(Tier1, pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
68 69      let Tier2rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
69 70      let Tier3rewards = fraction(fraction((Tier1 * 4), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
71 +     let Tier4rewards = fraction(fraction((Tier1 * 8), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
70 72      let currentA4AAmount =     match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
71 73          case a: Int => 
72 74              a
73 75          case _ => 
74 76              0
75 77      }
76 78      let newA4AAmount = (currentA4AAmount + pmt.amount)
77 79      if ((pmt.assetId != A4AAssetID))
78 80          then throw((("Incorrect asset attached, please attach " + toBase58String(A4AAssetID)) + " only."))
79 81          else if ((6 >= days))
80 82              then throw("Choose Locking days in between 7 to 90.")
81 83              else if ((days > maximumlockdays))
82 84                  then throw("You Entered days greater than 90 please Enter no. of days in between 7 to 90.")
83 -                 else if ((100000000000 > pmt.amount))
84 -                     then throw("Please Attach minimum 1000 A4A To Achieve SILVER TIER.")
85 -                     else if ((ULST >= pmt.amount))
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 -                         else if ((ULGT >= pmt.amount))
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 -                             else if ((ULDT == pmt.amount))
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 -                                 else throw("Please Choose a Range Between 1000-12000.")
85 +                 else if ((33300000000 > pmt.amount))
86 +                     then throw("Please Attach minimum 333 A4A To Achieve BRONZE TIER.")
87 +                     else if ((ULBT >= pmt.amount))
88 +                         then [StringEntry(("Tier_Of_" + currentKey), "BRONZE"), 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), Tier1)]
89 +                         else if ((ULST >= pmt.amount))
90 +                             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)]
91 +                             else if ((ULGT >= pmt.amount))
92 +                                 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)]
93 +                                 else if ((ULDT == pmt.amount))
94 +                                     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)]
95 +                                     else throw("Please Choose a Range Between 333-12000.")
92 96      }
93 97  
94 98  
95 99  
96 100  @Callable(i)
97 101  func Withdraw () = {
98 102      let currentKey = toBase58String(i.caller.bytes)
99 103      let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
100 104      let fetchRewardData = getIntegerValue(this, "Total_USDT_Claimed:")
101 105      let totalrewardclaimed = (fetchRewardData + getIntegerValue(this, ("Rewards_Of_" + currentKey)))
102 106      if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
103 107          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))))
104 108          else if ((checkdepositvalue == 0))
105 109              then throw("You Have Already Withdraw your Amount.")
106 110              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)]
107 111      }
108 112  
109 113  
110 114  @Verifier(tx)
111 115  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
112 116

Old	New		Differences
1	1		{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let A4AAssetID = base58'~~J9VzWPfRSQyCbEv5oWpxLSihigbpbJsGBHJZV9Ct8ook~~'
	4	+	let A4AAssetID = base58'8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g'
5	5
6		-	let USDTAssetID = base58'~~Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H~~'
	6	+	let USDTAssetID = base58'7RB3BWayeCVPq3kkpkeJZAFv2DYCB5gEwnutEpRofaw4'
7	7
8	8		@Callable(i)
9	9		func IssueA4A () = {

57	57		let currentKey = toBase58String(i.caller.bytes)
58	58		let maximumlockdays = 90
59	59		let lockstatus = "LOCKED"
	60	+	let ULBT = 99999999999
60	61		let ULST = 599999999999
61	62		let ULGT = 1199999999999
62	63		let ULDT = 1200000000000
63	64		let oneday = 1440
64	65		let actualblocks = (oneday * days)
65	66		let totallockblocks = (height + actualblocks)
66		-	let Tier1 = ~~72000~~
	67	+	let Tier1 = 36000
67	68		let Tier1rewards = fraction(fraction(Tier1, pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
68	69		let Tier2rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
69	70		let Tier3rewards = fraction(fraction((Tier1 * 4), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
	71	+	let Tier4rewards = fraction(fraction((Tier1 * 8), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
70	72		let currentA4AAmount = match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
71	73		case a: Int =>
72	74		a

80	82		then throw("Choose Locking days in between 7 to 90.")
81	83		else if ((days > maximumlockdays))
82	84		then throw("You Entered days greater than 90 please Enter no. of days in between 7 to 90.")
83		-	else if ((100000000000 > pmt.amount))
84		-	then throw("Please Attach minimum 1000 A4A To Achieve SILVER TIER.")
85		-	else if ((ULST >= pmt.amount))
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		-	else if ((ULGT >= pmt.amount))
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		-	else if ((ULDT == pmt.amount))
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		-	else throw("Please Choose a Range Between 1000-12000.")
	85	+	else if ((33300000000 > pmt.amount))
	86	+	then throw("Please Attach minimum 333 A4A To Achieve BRONZE TIER.")
	87	+	else if ((ULBT >= pmt.amount))
	88	+	then [StringEntry(("Tier_Of_" + currentKey), "BRONZE"), 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), Tier1)]
	89	+	else if ((ULST >= pmt.amount))
	90	+	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)]
	91	+	else if ((ULGT >= pmt.amount))
	92	+	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)]
	93	+	else if ((ULDT == pmt.amount))
	94	+	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)]
	95	+	else throw("Please Choose a Range Between 333-12000.")
92	96		}
93	97
94	98

Old	New		Differences
1	1		{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let A4AAssetID = base58'~~J9VzWPfRSQyCbEv5oWpxLSihigbpbJsGBHJZV9Ct8ook~~'
	4	+	let A4AAssetID = base58'8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g'
5	5
6		-	let USDTAssetID = base58'~~Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H~~'
	6	+	let USDTAssetID = base58'7RB3BWayeCVPq3kkpkeJZAFv2DYCB5gEwnutEpRofaw4'
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 NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
14	14		let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
15	15		let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
16	16		let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
17	17		let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
18	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	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	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	38		let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
39	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	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	+	let ULBT = 99999999999
60	61		let ULST = 599999999999
61	62		let ULGT = 1199999999999
62	63		let ULDT = 1200000000000
63	64		let oneday = 1440
64	65		let actualblocks = (oneday * days)
65	66		let totallockblocks = (height + actualblocks)
66		-	let Tier1 = ~~72000~~
	67	+	let Tier1 = 36000
67	68		let Tier1rewards = fraction(fraction(Tier1, pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
68	69		let Tier2rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
69	70		let Tier3rewards = fraction(fraction((Tier1 * 4), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
	71	+	let Tier4rewards = fraction(fraction((Tier1 * 8), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
70	72		let currentA4AAmount = match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
71	73		case a: Int =>
72	74		a
73	75		case _ =>
74	76		0
75	77		}
76	78		let newA4AAmount = (currentA4AAmount + pmt.amount)
77	79		if ((pmt.assetId != A4AAssetID))
78	80		then throw((("Incorrect asset attached, please attach " + toBase58String(A4AAssetID)) + " only."))
79	81		else if ((6 >= days))
80	82		then throw("Choose Locking days in between 7 to 90.")
81	83		else if ((days > maximumlockdays))
82	84		then throw("You Entered days greater than 90 please Enter no. of days in between 7 to 90.")
83		-	else if ((100000000000 > pmt.amount))
84		-	then throw("Please Attach minimum 1000 A4A To Achieve SILVER TIER.")
85		-	else if ((ULST >= pmt.amount))
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		-	else if ((ULGT >= pmt.amount))
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		-	else if ((ULDT == pmt.amount))
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		-	else throw("Please Choose a Range Between 1000-12000.")
	85	+	else if ((33300000000 > pmt.amount))
	86	+	then throw("Please Attach minimum 333 A4A To Achieve BRONZE TIER.")
	87	+	else if ((ULBT >= pmt.amount))
	88	+	then [StringEntry(("Tier_Of_" + currentKey), "BRONZE"), 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), Tier1)]
	89	+	else if ((ULST >= pmt.amount))
	90	+	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)]
	91	+	else if ((ULGT >= pmt.amount))
	92	+	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)]
	93	+	else if ((ULDT == pmt.amount))
	94	+	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)]
	95	+	else throw("Please Choose a Range Between 333-12000.")
92	96		}
93	97
94	98
95	99
96	100		@Callable(i)
97	101		func Withdraw () = {
98	102		let currentKey = toBase58String(i.caller.bytes)
99	103		let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
100	104		let fetchRewardData = getIntegerValue(this, "Total_USDT_Claimed:")
101	105		let totalrewardclaimed = (fetchRewardData + getIntegerValue(this, ("Rewards_Of_" + currentKey)))
102	106		if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
103	107		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))))
104	108		else if ((checkdepositvalue == 0))
105	109		then throw("You Have Already Withdraw your Amount.")
106	110		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)]
107	111		}
108	112
109	113
110	114		@Verifier(tx)
111	115		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
112	116

github/deemru/w8io/873ac7e 
50.43 ms ◑