w8 · tx · DBd···r8p

tx · DBdyyhYW8PMHQpB2VDnf1mYBFgpautxWMmwLz8Esr8p

3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj:  -0.01400000 Waves

2021.09.18 20:29 [1708791] smart account 3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DBdyyhYW8PMHQpB2VDnf1mYBFgpautxWMmwLz8Esr8p",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1631986220889,
    "version": 2,
    "chainId": 84,
    "sender": "3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj",
    "senderPublicKey": "C246qxhuyo9DBk1pjMzEQSVAWmiqYupG2swGkxTeAvLV",
    "proofs": [
        "369upa3UfUN8ePXvPCLc1iTCaXKRV7aEcM7ib9yh8fdCr6mgR3JuJtx2GePwiubepyg6ZdyQB9hkCAcKk2JxjGcW"
    ],
    "script": "base64:AAIEAAAAAAAAAA0IAhIAEgASAwoBARIAAAAAAgAAAAAKQTRBQXNzZXRJRAEAAAAg9DTyRKCmlXCwOtkAGpfNfYYWHUJfNxVA8Rex0Yei1JcAAAAAC1VTRFRBc3NldElEAQAAACDtbp7OYZSc/c7mGpIdLd7i5i2Qwk2YHwe8BMMPlpx8cQAAAAQAAAABaQEAAAAISXNzdWVBNEEAAAAABAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAALUHJpY2VQZXJBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAACUJBTExFVC9UTgQAAAAMTmV3QTRBVG9Vc2VyCQAAawAAAAMAAAAAAAABhqAIBQAAAANwbXQAAAAGYW1vdW50BQAAAAtQcmljZVBlckE0QQQAAAARUHJldmlvdXNJc3N1ZWRBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAFFRvdGFsX0lzc3VlZF9CYWxsZXQ6BAAAAA5Ub3RhbElzc3VlZEE0QQkAAGQAAAACBQAAABFQcmV2aW91c0lzc3VlZEE0QQUAAAAMTmV3QTRBVG9Vc2VyBAAAABdQcmV2aW91c0E0QVJlc2VydmVWYWx1ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAbVG90YWxfQmFsbGV0X1Jlc2VydmVfSW5fVE46BAAAAA9BNEFSZXNlcnZlVmFsdWUJAABkAAAAAgUAAAAXUHJldmlvdXNBNEFSZXNlcnZlVmFsdWUIBQAAAANwbXQAAAAGYW1vdW50BAAAABZQcmV2aW91c0E0QUJhY2t1cFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABpCYWxsZXRfQmFja3VwX1ZhbHVlX0luX1ROOgQAAAAOQTRBQmFja3VwUHJpY2UJAABrAAAAAwAAAAAAAAGGoAUAAAAPQTRBUmVzZXJ2ZVZhbHVlBQAAAA5Ub3RhbElzc3VlZEE0QQQAAAAKRmVlQWRkcmVzcwEAAAAgUoPZoIvXkJI7M+XgQERyG3Ox4PxeH5gdLMWeskjH4iADCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAK0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCwgcGxlYXNlIGF0dGFjaCBUTi4DCQAAZgAAAAIAAAAAAABMS0AIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAAMVBsZWFzZSBBdHRhY2ggbWluaW11bSAwLjA1IFROIFRvIElzc3VlIEE0QSBBc3NldC4JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAFFRvdGFsX0lzc3VlZF9CYWxsZXQ6BQAAAA5Ub3RhbElzc3VlZEE0QQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAbVG90YWxfQmFsbGV0X1Jlc2VydmVfSW5fVE46BQAAAA9BNEFSZXNlcnZlVmFsdWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAGkJhbGxldF9CYWNrdXBfVmFsdWVfSW5fVE46BQAAAA5BNEFCYWNrdXBQcmljZQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAdtZXNzYWdlAgAAACU8aDE+QTRBIElzc3VlZCBTdWNjZXNzZnVsbHkhPC9oMT48YnI+CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAKQTRBQXNzZXRJRAUAAAAMTmV3QTRBVG9Vc2VyBgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAABpAAAAAgkAAGgAAAACBQAAAAxOZXdBNEFUb1VzZXIAAAAAAAAAAGMAAAAAAAAAAGQFAAAACkE0QUFzc2V0SUQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQUAAAAKRmVlQWRkcmVzcwkAAGkAAAACCQAAaAAAAAIFAAAADE5ld0E0QVRvVXNlcgAAAAAAAAAAAQAAAAAAAAAAZAUAAAAKQTRBQXNzZXRJRAUAAAADbmlsAAAAAWkBAAAACUxpcXVpZGF0ZQAAAAAEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5BAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAAEVByZXZpb3VzSXNzdWVkQTRBCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABRUb3RhbF9Jc3N1ZWRfQmFsbGV0OgQAAAARUHJldmlvdXNCdXJuZWRBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAEVRvdGFsX0J1cm5lZF9BNEE6BAAAAA5Ub3RhbElzc3VlZEE0QQkAAGUAAAACBQAAABFQcmV2aW91c0lzc3VlZEE0QQgFAAAAA3BtdAAAAAZhbW91bnQEAAAADlRvdGFsQnVybmVkQTRBCQAAZAAAAAIFAAAAEVByZXZpb3VzQnVybmVkQTRBCAUAAAADcG10AAAABmFtb3VudAQAAAAXUHJldmlvdXNBNEFSZXNlcnZlVmFsdWUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAG1RvdGFsX0JhbGxldF9SZXNlcnZlX0luX1ROOgQAAAAWUHJldmlvdXNBNEFCYWNrdXBQcmljZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAaQmFsbGV0X0JhY2t1cF9WYWx1ZV9Jbl9UTjoEAAAAEmNhbGN1bGF0ZWJ1cm52YWx1ZQkAAGsAAAADBQAAABZQcmV2aW91c0E0QUJhY2t1cFByaWNlCAUAAAADcG10AAAABmFtb3VudAAAAAAAAAGGoAQAAAAPQTRBUmVzZXJ2ZVZhbHVlCQAAZQAAAAIFAAAAF1ByZXZpb3VzQTRBUmVzZXJ2ZVZhbHVlBQAAABJjYWxjdWxhdGVidXJudmFsdWUEAAAADkE0QUJhY2t1cFByaWNlCQAAawAAAAMAAAAAAAABhqAFAAAAD0E0QVJlc2VydmVWYWx1ZQUAAAAOVG90YWxJc3N1ZWRBNEEDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAACkE0QUFzc2V0SUQJAAACAAAAAQIAAABHS2luZGx5IERlcG9zaXQgT25seSA4aGRzVkN4UEJWRW1WVVp5eVg4U2Q5OFo5aFU3Rm55MjZXOTZzaktpVHc4ZyAoQTRBKS4DCQAAZgAAAAIAAAAAAAABhqAIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAALUF0dGFjaCBBbW91bnQgbXVzdCBiZSBncmVhdGVyIHRoYW4gMC4wMDEgQTRBLgkABEwAAAACCQEAAAAEQnVybgAAAAIFAAAACkE0QUFzc2V0SUQIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABRUb3RhbF9Jc3N1ZWRfQmFsbGV0OgUAAAAOVG90YWxJc3N1ZWRBNEEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEVRvdGFsX0J1cm5lZF9BNEE6BQAAAA5Ub3RhbEJ1cm5lZEE0QQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAbVG90YWxfQmFsbGV0X1Jlc2VydmVfSW5fVE46BQAAAA9BNEFSZXNlcnZlVmFsdWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAGkJhbGxldF9CYWNrdXBfVmFsdWVfSW5fVE46BQAAAA5BNEFCYWNrdXBQcmljZQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAdtZXNzYWdlAgAAACk8aDE+QTRBIExpcXVpZGF0ZWQgU3VjY2Vzc2Z1bGx5ITwvaDE+PGJyPgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAEmNhbGN1bGF0ZWJ1cm52YWx1ZQUAAAAEdW5pdAUAAAADbmlsAAAAAWkBAAAAB0RlcG9zaXQAAAABAAAABGRheXMEAAAAA3BtdAMJAAAAAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAAEdObyBwYXltZW50IGF0dGFjaGVkLCBQbGVhc2UgQXR0YWNoIEE0QSBUb2tlbiBhcyBwZXIgVElFUiBpbiBwYXltZW50WzFdLgQAAAAKY3VycmVudEtleQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA9tYXhpbXVtbG9ja2RheXMAAAAAAAAAAFoEAAAACmxvY2tzdGF0dXMCAAAABkxPQ0tFRAQAAAAEVUxTVAAAAACLsslv/wQAAAAEVUxHVAAAAAEXZZLf/wQAAAAEVUxEVAAAAAEXZZLgAAQAAAAGb25lZGF5AAAAAAAAAAWgBAAAAAxhY3R1YWxibG9ja3MJAABoAAAAAgUAAAAGb25lZGF5BQAAAARkYXlzBAAAAA90b3RhbGxvY2tibG9ja3MJAABkAAAAAgUAAAAGaGVpZ2h0BQAAAAxhY3R1YWxibG9ja3MEAAAABVRpZXIxAAAAAAAAAAK3BAAAAAxUaWVyMXJld2FyZHMJAABrAAAAAwkAAGsAAAADBQAAAAVUaWVyMQgFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAABQAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjJyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAAAggFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAABQAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjNyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGkAAAACCQAAaAAAAAIFAAAABVRpZXIxAAAAAAAAAAAZAAAAAAAAAAAKCAUAAAADcG10AAAABmFtb3VudAkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAFAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAUAAAAMYWN0dWFsYmxvY2tzCQAAbAAAAAYAAAAAAAAAAAoAAAAAAAAAAAAAAAAAAAAAAAYAAAAAAAAAAAAAAAAAAAAAAAAFAAAAAlVQBAAAABBjdXJyZW50QTRBQW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAADG5ld0E0QUFtb3VudAkAAGQAAAACBQAAABBjdXJyZW50QTRBQW1vdW50CAUAAAADcG10AAAABmFtb3VudAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAKQTRBQXNzZXRJRAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAoSW5jb3JyZWN0IGFzc2V0IGF0dGFjaGVkLCBwbGVhc2UgYXR0YWNoIAkAAlgAAAABBQAAAApBNEFBc3NldElEAgAAAAYgb25seS4DCQAAZwAAAAIAAAAAAAAAAAYFAAAABGRheXMJAAACAAAAAQIAAAAnQ2hvb3NlIExvY2tpbmcgZGF5cyBpbiBiZXR3ZWVuIDcgdG8gOTAuAwkAAGYAAAACBQAAAARkYXlzBQAAAA9tYXhpbXVtbG9ja2RheXMJAAACAAAAAQIAAABNWW91IEVudGVyZWQgZGF5cyBncmVhdGVyIHRoYW4gOTAgcGxlYXNlIEVudGVyIG5vLiBvZiBkYXlzIGluIGJldHdlZW4gNyB0byA5MC4DCQAAZgAAAAIAAAAAF0h26AAIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAANlBsZWFzZSBBdHRhY2ggbWluaW11bSAxMDAwIEE0QSBUbyBBY2hpZXZlIFNJTFZFUiBUSUVSLgMJAABnAAAAAgUAAAAEVUxTVAgFAAAAA3BtdAAAAAZhbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAAhUaWVyX09mXwUAAAAKY3VycmVudEtleQIAAAAGU0lMVkVSCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQUAAAAMbmV3QTRBQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAFVRvdGFsX0xvY2tfQmxvY2tzX09mXwUAAAAKY3VycmVudEtleQUAAAAPdG90YWxsb2NrYmxvY2tzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAPTG9ja19TdGF0dXNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAApsb2Nrc3RhdHVzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAC1Jld2FyZHNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxUaWVyMXJld2FyZHMFAAAAA25pbAMJAABnAAAAAgUAAAAEVUxHVAgFAAAAA3BtdAAAAAZhbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAAhUaWVyX09mXwUAAAAKY3VycmVudEtleQIAAAAER09MRAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X2hlaWdodF9PZl8FAAAACmN1cnJlbnRLZXkFAAAABmhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkFAAAADG5ld0E0QUFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABVUb3RhbF9Mb2NrX0Jsb2Nrc19PZl8FAAAACmN1cnJlbnRLZXkFAAAAD3RvdGFsbG9ja2Jsb2NrcwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAAD0xvY2tfU3RhdHVzX09mXwUAAAAKY3VycmVudEtleQUAAAAKbG9ja3N0YXR1cwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAAAtSZXdhcmRzX09mXwUAAAAKY3VycmVudEtleQUAAAAMVGllcjJyZXdhcmRzBQAAAANuaWwDCQAAAAAAAAIFAAAABFVMRFQIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAIVGllcl9PZl8FAAAACmN1cnJlbnRLZXkCAAAAB0RJQU1PTkQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9oZWlnaHRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAZoZWlnaHQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxuZXdBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAA90b3RhbGxvY2tibG9ja3MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAA9Mb2NrX1N0YXR1c19PZl8FAAAACmN1cnJlbnRLZXkFAAAACmxvY2tzdGF0dXMJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAADFRpZXIzcmV3YXJkcwUAAAADbmlsCQAAAgAAAAECAAAAKVBsZWFzZSBDaG9vc2UgYSBSYW5nZSBCZXR3ZWVuIDEwMDAtMTIwMDAuAAAAAWkBAAAACFdpdGhkcmF3AAAAAAQAAAAKY3VycmVudEtleQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAABFjaGVja2RlcG9zaXR2YWx1ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkDCQAAZgAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAZoZWlnaHQJAAACAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAFWW91ciAJAAGkAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkCAAAAYiBBNEEgYXJlIFVuZGVyIExvY2suIENvbnNpZGVyIGxhc3QgNSBkaWdpdHMgYXMgdmFsdWUgYWZ0ZXIgRGVjaW1hbHMuIFRva2VuIHdpbGwgYmUgVW5sb2NrZWQgYWZ0ZXIgCQABpAAAAAEJAABlAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABVUb3RhbF9Mb2NrX0Jsb2Nrc19PZl8FAAAACmN1cnJlbnRLZXkFAAAABmhlaWdodAMJAAAAAAAAAgUAAAARY2hlY2tkZXBvc2l0dmFsdWUAAAAAAAAAAAAJAAACAAAAAQIAAAAmWW91IEhhdmUgQWxyZWFkeSBXaXRoZHJhdyB5b3VyIEFtb3VudC4JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQUAAAAKQTRBQXNzZXRJRAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAAC1VTRFRBc3NldElECQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5AAAAAAAAAAAACQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAPTG9ja19TdGF0dXNfT2ZfBQAAAApjdXJyZW50S2V5AgAAAAZVTkxPQ0sJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5QSzK5g==",
    "height": 1708791,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6hdzaacHpmB1RDHmYXvB8XZJ16z8JXJy78SkaLipm5iR
Next: FKXY88GDfsbRqYg1HmH2iC42wHcfMo9PvcF2uRsMJNzD

Diff: 
Old New Differences
67 67      let Tier1rewards = fraction(fraction(Tier1, pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
68 68      let Tier2rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
69 69      let Tier3rewards = fraction(fraction(((Tier1 * 25) / 10), pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
70 -     let currentMDCAmount =     match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
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 -     let newMDCAmount = (currentMDCAmount + pmt.amount)
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))
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 -                         then [StringEntry(("Tier_Of_" + currentKey), "SILVER"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newMDCAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier1rewards)]
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 -                             then [StringEntry(("Tier_Of_" + currentKey), "GOLD"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newMDCAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier2rewards)]
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 -                                 then [StringEntry(("Tier_Of_" + currentKey), "DIAMOND"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newMDCAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier3rewards)]
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  
98 98      let currentKey = toBase58String(i.caller.bytes)
99 99      let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
100 100      if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
101 -         then throw(((("Your " + toString(getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)))) + " MDC are Under Lock. Consider last 5 digits as value after Decimals. Token will be Unlocked after ") + toString((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - height))))
101 +         then throw(((("Your " + toString(getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)))) + " A4A are Under Lock. Consider last 5 digits as value after Decimals. Token will be Unlocked after ") + toString((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - height))))
102 102          else if ((checkdepositvalue == 0))
103 103              then throw("You Have Already Withdraw your Amount.")
104 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)]
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let A4AAssetID = base58'HSHJecCLGF7DEPA23dJe6WwroaLeDnik5eptjxEJYvwY'
5 5  
6 6  let USDTAssetID = base58'GyqTYDea3DWBaAyQs5S5uH2223ucELYFazJpZLCfMznU'
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, "BALLET/TN")
13 13      let NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
14 14      let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_Ballet:")
15 15      let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
16 16      let PreviousA4AReserveValue = getIntegerValue(this, "Total_Ballet_Reserve_In_TN:")
17 17      let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
18 18      let PreviousA4ABackupPrice = getIntegerValue(this, "Ballet_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_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)]
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_Ballet:")
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_Ballet_Reserve_In_TN:")
39 39      let PreviousA4ABackupPrice = getIntegerValue(this, "Ballet_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_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)]
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 = 695
67 67      let Tier1rewards = fraction(fraction(Tier1, pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
68 68      let Tier2rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
69 69      let Tier3rewards = fraction(fraction(((Tier1 * 25) / 10), pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
70 -     let currentMDCAmount =     match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
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 -     let newMDCAmount = (currentMDCAmount + pmt.amount)
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 -                         then [StringEntry(("Tier_Of_" + currentKey), "SILVER"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newMDCAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier1rewards)]
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 -                             then [StringEntry(("Tier_Of_" + currentKey), "GOLD"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newMDCAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier2rewards)]
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 -                                 then [StringEntry(("Tier_Of_" + currentKey), "DIAMOND"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newMDCAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier3rewards)]
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 100      if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
101 -         then throw(((("Your " + toString(getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)))) + " MDC are Under Lock. Consider last 5 digits as value after Decimals. Token will be Unlocked after ") + toString((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - height))))
101 +         then throw(((("Your " + toString(getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)))) + " A4A are Under Lock. Consider last 5 digits as value after Decimals. Token will be Unlocked after ") + toString((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - height))))
102 102          else if ((checkdepositvalue == 0))
103 103              then throw("You Have Already Withdraw your Amount.")
104 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)]
105 105      }
106 106  
107 107  
108 108  @Verifier(tx)
109 109  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
110 110

Old	New		Differences
67	67		let Tier1rewards = fraction(fraction(Tier1, pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
68	68		let Tier2rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
69	69		let Tier3rewards = fraction(fraction(((Tier1 * 25) / 10), pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
70		-	let ~~currentMDCAmount~~ = match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
	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		-	let ~~newMDCAmount~~ = (~~currentMDCAmount~~ + pmt.amount)
	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))

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		-	then [StringEntry(("Tier_Of_" + currentKey), "SILVER"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), ~~newMDCAmount~~), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier1rewards)]
	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		-	then [StringEntry(("Tier_Of_" + currentKey), "GOLD"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), ~~newMDCAmount~~), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier2rewards)]
	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		-	then [StringEntry(("Tier_Of_" + currentKey), "DIAMOND"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), ~~newMDCAmount~~), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier3rewards)]
	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

98	98		let currentKey = toBase58String(i.caller.bytes)
99	99		let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
100	100		if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
101		-	then throw(((("Your " + toString(getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)))) + " ~~MDC~~ are Under Lock. Consider last 5 digits as value after Decimals. Token will be Unlocked after ") + toString((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - height))))
	101	+	then throw(((("Your " + toString(getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)))) + " A4A are Under Lock. Consider last 5 digits as value after Decimals. Token will be Unlocked after ") + toString((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - height))))
102	102		else if ((checkdepositvalue == 0))
103	103		then throw("You Have Already Withdraw your Amount.")
104	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)]

Old	New		Differences
1	1		{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let A4AAssetID = base58'HSHJecCLGF7DEPA23dJe6WwroaLeDnik5eptjxEJYvwY'
5	5
6	6		let USDTAssetID = base58'GyqTYDea3DWBaAyQs5S5uH2223ucELYFazJpZLCfMznU'
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, "BALLET/TN")
13	13		let NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
14	14		let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_Ballet:")
15	15		let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
16	16		let PreviousA4AReserveValue = getIntegerValue(this, "Total_Ballet_Reserve_In_TN:")
17	17		let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
18	18		let PreviousA4ABackupPrice = getIntegerValue(this, "Ballet_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_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)]
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_Ballet:")
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_Ballet_Reserve_In_TN:")
39	39		let PreviousA4ABackupPrice = getIntegerValue(this, "Ballet_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_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)]
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 = 695
67	67		let Tier1rewards = fraction(fraction(Tier1, pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
68	68		let Tier2rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
69	69		let Tier3rewards = fraction(fraction(((Tier1 * 25) / 10), pmt.amount, pow(10, 0, 5, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
70		-	let ~~currentMDCAmount~~ = match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
	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		-	let ~~newMDCAmount~~ = (~~currentMDCAmount~~ + pmt.amount)
	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		-	then [StringEntry(("Tier_Of_" + currentKey), "SILVER"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), ~~newMDCAmount~~), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier1rewards)]
	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		-	then [StringEntry(("Tier_Of_" + currentKey), "GOLD"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), ~~newMDCAmount~~), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier2rewards)]
	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		-	then [StringEntry(("Tier_Of_" + currentKey), "DIAMOND"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry(("Deposit_Amount_Of_" + currentKey), ~~newMDCAmount~~), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier3rewards)]
	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	100		if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
101		-	then throw(((("Your " + toString(getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)))) + " ~~MDC~~ are Under Lock. Consider last 5 digits as value after Decimals. Token will be Unlocked after ") + toString((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - height))))
	101	+	then throw(((("Your " + toString(getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)))) + " A4A are Under Lock. Consider last 5 digits as value after Decimals. Token will be Unlocked after ") + toString((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - height))))
102	102		else if ((checkdepositvalue == 0))
103	103		then throw("You Have Already Withdraw your Amount.")
104	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)]
105	105		}
106	106
107	107
108	108		@Verifier(tx)
109	109		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
110	110

github/deemru/w8io/873ac7e 
43.11 ms ◑