tx · HZGTYHJuRj2YCeyLj7p8Zow1J3QpCKNRqKXCmjzyQNja

3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj:  -0.01400000 Waves

2021.10.11 07:30 [1741132] smart account 3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HZGTYHJuRj2YCeyLj7p8Zow1J3QpCKNRqKXCmjzyQNja",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1633926660478,
    "version": 2,
    "chainId": 84,
    "sender": "3NARdCrmQCEs9RNtwCSRc6JCoThQGyXjrAj",
    "senderPublicKey": "C246qxhuyo9DBk1pjMzEQSVAWmiqYupG2swGkxTeAvLV",
    "proofs": [
        "29Wdu4qJshy51KvMHuij2ivcCeztKaTr1o7DcietRFsSkFxyNfbRTxAkZW686tfaequhKRP17eYGTKd4krnNtGB7"
    ],
    "script": "base64:AAIEAAAAAAAAAA8IAhIAEgASAwoBARIAEgAAAAAFAAAAAApBNEFBc3NldElEAQAAACByarr7pbGvbKjC25EQtAxsVoAzV+UMwNJVwz0ikDXgtQAAAAALVVNEVEFzc2V0SUQBAAAAIF9XaRjICieBJvFbl+3E7E35wrtZyxIYi4RgoF+m9/zzAAAAAAtDT0RFQXNzZXRJRAEAAAAgw7tamQ+/dXoyJwRZ/Fb5N4jdONzqCnQ4LyXft9O80qAAAAAACkZlZUFkZHJlc3MBAAAAIFKD2aCL15CSOzPl4EBEchtzseD8Xh+YHSzFnrJIx+IgAAAAAApkZXZBZGRyZXNzAQAAACBxPzntQa7CXqUpHrNREofekMqtlOVQyxdZBdjFyNZ4GwAAAAUAAAABaQEAAAAISXNzdWVBNEEAAAAABAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAALUHJpY2VQZXJBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAABkE0QS9UTgQAAAAKQTRBSGFyZENhcAkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAKQTRBSGFyZENhcAQAAAAMTmV3QTRBVG9Vc2VyCQAAawAAAAMAAAAAAAABhqAIBQAAAANwbXQAAAAGYW1vdW50BQAAAAtQcmljZVBlckE0QQQAAAARUHJldmlvdXNJc3N1ZWRBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAEVRvdGFsX0lzc3VlZF9BNEE6BAAAAA5Ub3RhbElzc3VlZEE0QQkAAGQAAAACBQAAABFQcmV2aW91c0lzc3VlZEE0QQUAAAAMTmV3QTRBVG9Vc2VyBAAAAA5QZW5kaW5nTWludGluZwkAAGUAAAACBQAAAApBNEFIYXJkQ2FwBQAAAA5Ub3RhbElzc3VlZEE0QQQAAAAXUHJldmlvdXNBNEFSZXNlcnZlVmFsdWUJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAGFRvdGFsX0E0QV9SZXNlcnZlX0luX1ROOgQAAAAPQTRBUmVzZXJ2ZVZhbHVlCQAAZAAAAAIFAAAAF1ByZXZpb3VzQTRBUmVzZXJ2ZVZhbHVlCAUAAAADcG10AAAABmFtb3VudAQAAAAWUHJldmlvdXNBNEFCYWNrdXBQcmljZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAXQTRBX0JhY2t1cF9WYWx1ZV9Jbl9UTjoEAAAADkE0QUJhY2t1cFByaWNlCQAAawAAAAMAAAAAAAABhqAFAAAAD0E0QVJlc2VydmVWYWx1ZQUAAAAOVG90YWxJc3N1ZWRBNEEDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCQAAAgAAAAECAAAAK0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCwgcGxlYXNlIGF0dGFjaCBUTi4DCQAAZgAAAAIAAAAAAABMS0AIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAAMVBsZWFzZSBBdHRhY2ggbWluaW11bSAwLjA1IFROIFRvIElzc3VlIEE0QSBBc3NldC4DCQAAZgAAAAIFAAAADlRvdGFsSXNzdWVkQTRBBQAAAApBNEFIYXJkQ2FwCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAALkE0QSBNaW50aW5nIGlzIGFib3V0IHRvIHJlYWNoIHRoZSBIYXJkIENhcCBvZiAJAAGkAAAAAQUAAAAKQTRBSGFyZENhcAIAAAAvLzEwXjggQTRBLiBQbGVhc2UgUmVkdWNlIHlvdXIgTWludGluZyBPcmRlciBieSAJAAGkAAAAAQUAAAAOUGVuZGluZ01pbnRpbmcCAAAACCBvciBwdXQgCQABpAAAAAEJAABlAAAAAgUAAAAKQTRBSGFyZENhcAUAAAARUHJldmlvdXNJc3N1ZWRBNEECAAAABS8xMF44CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABFUb3RhbF9Jc3N1ZWRfQTRBOgUAAAAOVG90YWxJc3N1ZWRBNEEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAFEJhbGFuY2VfTWludGluZ19BNEE6BQAAAA5QZW5kaW5nTWludGluZwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAYVG90YWxfQTRBX1Jlc2VydmVfSW5fVE46BQAAAA9BNEFSZXNlcnZlVmFsdWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAF0E0QV9CYWNrdXBfVmFsdWVfSW5fVE46BQAAAA5BNEFCYWNrdXBQcmljZQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAdtZXNzYWdlAgAAACU8aDE+QTRBIElzc3VlZCBTdWNjZXNzZnVsbHkhPC9oMT48YnI+CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAKQTRBQXNzZXRJRAUAAAAMTmV3QTRBVG9Vc2VyBgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAABpAAAAAgkAAGgAAAACBQAAAAxOZXdBNEFUb1VzZXIAAAAAAAAAA94AAAAAAAAAA+gFAAAACkE0QUFzc2V0SUQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQUAAAAKRmVlQWRkcmVzcwkAAGkAAAACCQAAaAAAAAIFAAAADE5ld0E0QVRvVXNlcgAAAAAAAAAACQAAAAAAAAAD6AUAAAAKQTRBQXNzZXRJRAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAUYWRkcmVzc0Zyb21QdWJsaWNLZXkAAAABBQAAAApkZXZBZGRyZXNzCQAAaQAAAAIJAABoAAAAAgUAAAAMTmV3QTRBVG9Vc2VyAAAAAAAAAAABAAAAAAAAAAPoBQAAAApBNEFBc3NldElEBQAAAANuaWwAAAABaQEAAAAJTGlxdWlkYXRlAAAAAAQAAAAKY3VycmVudEtleQkAAlgAAAABCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkEAAAAA3BtdAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAARUHJldmlvdXNJc3N1ZWRBNEEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAAEVRvdGFsX0lzc3VlZF9BNEE6BAAAABFQcmV2aW91c0J1cm5lZEE0QQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAARVG90YWxfQnVybmVkX0E0QToEAAAADlRvdGFsSXNzdWVkQTRBCQAAZQAAAAIFAAAAEVByZXZpb3VzSXNzdWVkQTRBCAUAAAADcG10AAAABmFtb3VudAQAAAAOVG90YWxCdXJuZWRBNEEJAABkAAAAAgUAAAARUHJldmlvdXNCdXJuZWRBNEEIBQAAAANwbXQAAAAGYW1vdW50BAAAABdQcmV2aW91c0E0QVJlc2VydmVWYWx1ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAAYVG90YWxfQTRBX1Jlc2VydmVfSW5fVE46BAAAABZQcmV2aW91c0E0QUJhY2t1cFByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABdBNEFfQmFja3VwX1ZhbHVlX0luX1ROOgQAAAASY2FsY3VsYXRlYnVybnZhbHVlCQAAawAAAAMFAAAAFlByZXZpb3VzQTRBQmFja3VwUHJpY2UIBQAAAANwbXQAAAAGYW1vdW50AAAAAAAAAYagBAAAAA9BNEFSZXNlcnZlVmFsdWUJAABlAAAAAgUAAAAXUHJldmlvdXNBNEFSZXNlcnZlVmFsdWUFAAAAEmNhbGN1bGF0ZWJ1cm52YWx1ZQQAAAAOQTRBQmFja3VwUHJpY2UJAABrAAAAAwAAAAAAAAGGoAUAAAAPQTRBUmVzZXJ2ZVZhbHVlBQAAAA5Ub3RhbElzc3VlZEE0QQMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAKQTRBQXNzZXRJRAkAAAIAAAABAgAAAEdLaW5kbHkgRGVwb3NpdCBPbmx5IDhoZHNWQ3hQQlZFbVZVWnl5WDhTZDk4WjloVTdGbnkyNlc5NnNqS2lUdzhnIChBNEEpLgMJAABmAAAAAgAAAAAAAAGGoAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAAtQXR0YWNoIEFtb3VudCBtdXN0IGJlIGdyZWF0ZXIgdGhhbiAwLjAwMSBBNEEuCQAETAAAAAIJAQAAAARCdXJuAAAAAgUAAAAKQTRBQXNzZXRJRAgFAAAAA3BtdAAAAAZhbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEVRvdGFsX0lzc3VlZF9BNEE6BQAAAA5Ub3RhbElzc3VlZEE0QQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAARVG90YWxfQnVybmVkX0E0QToFAAAADlRvdGFsQnVybmVkQTRBCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABhUb3RhbF9BNEFfUmVzZXJ2ZV9Jbl9UTjoFAAAAD0E0QVJlc2VydmVWYWx1ZQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAXQTRBX0JhY2t1cF9WYWx1ZV9Jbl9UTjoFAAAADkE0QUJhY2t1cFByaWNlCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAAB21lc3NhZ2UCAAAAKTxoMT5BNEEgTGlxdWlkYXRlZCBTdWNjZXNzZnVsbHkhPC9oMT48YnI+CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAGkAAAACCQAAaAAAAAIFAAAAEmNhbGN1bGF0ZWJ1cm52YWx1ZQAAAAAAAAAD3gAAAAAAAAAD6AUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCQEAAAAUYWRkcmVzc0Zyb21QdWJsaWNLZXkAAAABBQAAAApGZWVBZGRyZXNzCQAAaQAAAAIJAABoAAAAAgUAAAASY2FsY3VsYXRlYnVybnZhbHVlAAAAAAAAAAAJAAAAAAAAAAPoBQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEFAAAACmRldkFkZHJlc3MJAABpAAAAAgkAAGgAAAACBQAAABJjYWxjdWxhdGVidXJudmFsdWUAAAAAAAAAAAEAAAAAAAAAA+gFAAAABHVuaXQFAAAAA25pbAAAAAFpAQAAAAdEZXBvc2l0AAAAAQAAAARkYXlzBAAAAANwbXQDCQAAAAAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAJAAACAAAAAQIAAABHTm8gcGF5bWVudCBhdHRhY2hlZCwgUGxlYXNlIEF0dGFjaCBBNEEgVG9rZW4gYXMgcGVyIFRJRVIgaW4gcGF5bWVudFsxXS4EAAAACmN1cnJlbnRLZXkJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAAPbWF4aW11bWxvY2tkYXlzAAAAAAAAAABaBAAAAApsb2Nrc3RhdHVzAgAAAAZMT0NLRUQEAAAABFVMQlQAAAAAF0h25/8EAAAABFVMU1QAAAAAi7LJb/8EAAAABFVMR1QAAAABF2WS3/8EAAAABFVMRFQAAAABF2WS4AAEAAAABm9uZWRheQAAAAAAAAAFoAQAAAAMYWN0dWFsYmxvY2tzCQAAaAAAAAIFAAAABm9uZWRheQUAAAAEZGF5cwQAAAAPdG90YWxsb2NrYmxvY2tzCQAAZAAAAAIFAAAABmhlaWdodAUAAAAMYWN0dWFsYmxvY2tzBAAAAAVUaWVyMQAAAAAAAACMoAQAAAAMVGllcjFyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAAAggFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjJyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAABAgFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAMVGllcjNyZXdhcmRzCQAAawAAAAMJAABrAAAAAwkAAGgAAAACBQAAAAVUaWVyMQAAAAAAAAAACAgFAAAAA3BtdAAAAAZhbW91bnQJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAACAAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAADGFjdHVhbGJsb2NrcwkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAAAAAAAAAAAAAAAABQAAAAJVUAQAAAAPU3Rha2VkQTRBQW1vdW50BAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMCAAAADVN0YWtlZF9BbW91bnQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAASbmV3U3Rha2VkQTRBQW1vdW50CQAAZAAAAAIFAAAAD1N0YWtlZEE0QUFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQEAAAAEGN1cnJlbnRBNEFBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAMbmV3QTRBQW1vdW50CQAAZAAAAAIFAAAAEGN1cnJlbnRBNEFBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50AwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkBQAAAApBNEFBc3NldElECQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAChJbmNvcnJlY3QgYXNzZXQgYXR0YWNoZWQsIHBsZWFzZSBhdHRhY2ggCQACWAAAAAEFAAAACkE0QUFzc2V0SUQCAAAABiBvbmx5LgMJAABnAAAAAgAAAAAAAAAABgUAAAAEZGF5cwkAAAIAAAABAgAAACdDaG9vc2UgTG9ja2luZyBkYXlzIGluIGJldHdlZW4gNyB0byA5MC4DCQAAZgAAAAIFAAAABGRheXMFAAAAD21heGltdW1sb2NrZGF5cwkAAAIAAAABAgAAAE1Zb3UgRW50ZXJlZCBkYXlzIGdyZWF0ZXIgdGhhbiA5MCBwbGVhc2UgRW50ZXIgbm8uIG9mIGRheXMgaW4gYmV0d2VlbiA3IHRvIDkwLgMJAABmAAAAAgAAAAAHwNWtAAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAA1UGxlYXNlIEF0dGFjaCBtaW5pbXVtIDMzMyBBNEEgVG8gQWNoaWV2ZSBCUk9OWkUgVElFUi4DCQAAZwAAAAIFAAAABFVMQlQIBQAAAANwbXQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAIVGllcl9PZl8FAAAACmN1cnJlbnRLZXkCAAAABkJST05aRQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X2hlaWdodF9PZl8FAAAACmN1cnJlbnRLZXkFAAAABmhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAANU3Rha2VkX0Ftb3VudAUAAAASbmV3U3Rha2VkQTRBQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQUAAAAMbmV3QTRBQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAFVRvdGFsX0xvY2tfQmxvY2tzX09mXwUAAAAKY3VycmVudEtleQUAAAAPdG90YWxsb2NrYmxvY2tzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAPTG9ja19TdGF0dXNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAApsb2Nrc3RhdHVzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAC1Jld2FyZHNfT2ZfBQAAAApjdXJyZW50S2V5CQAAawAAAAMJAABrAAAAAwUAAAAFVGllcjEIBQAAAANwbXQAAAAGYW1vdW50CQAAbAAAAAYAAAAAAAAAAAoAAAAAAAAAAAAAAAAAAAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAFAAAAAlVQBQAAAAxhY3R1YWxibG9ja3MJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAAAAAAAAAAABgAAAAAAAAAAAAAAAAAAAAAAAAUAAAACVVAFAAAAA25pbAMJAABnAAAAAgUAAAAEVUxTVAgFAAAAA3BtdAAAAAZhbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAAhUaWVyX09mXwUAAAAKY3VycmVudEtleQIAAAAGU0lMVkVSCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1TdGFrZWRfQW1vdW50BQAAABJuZXdTdGFrZWRBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxuZXdBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAA90b3RhbGxvY2tibG9ja3MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAA9Mb2NrX1N0YXR1c19PZl8FAAAACmN1cnJlbnRLZXkFAAAACmxvY2tzdGF0dXMJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAADFRpZXIxcmV3YXJkcwUAAAADbmlsAwkAAGcAAAACBQAAAARVTEdUCAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAACFRpZXJfT2ZfBQAAAApjdXJyZW50S2V5AgAAAARHT0xECQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1TdGFrZWRfQW1vdW50BQAAABJuZXdTdGFrZWRBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxuZXdBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAA90b3RhbGxvY2tibG9ja3MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAA9Mb2NrX1N0YXR1c19PZl8FAAAACmN1cnJlbnRLZXkFAAAACmxvY2tzdGF0dXMJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAADFRpZXIycmV3YXJkcwUAAAADbmlsAwkAAAAAAAACBQAAAARVTERUCAUAAAADcG10AAAABmFtb3VudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAACFRpZXJfT2ZfBQAAAApjdXJyZW50S2V5AgAAAAdESUFNT05ECQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1TdGFrZWRfQW1vdW50BQAAABJuZXdTdGFrZWRBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAxuZXdBNEFBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAA90b3RhbGxvY2tibG9ja3MJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACAgAAAA9Mb2NrX1N0YXR1c19PZl8FAAAACmN1cnJlbnRLZXkFAAAACmxvY2tzdGF0dXMJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkFAAAADFRpZXIzcmV3YXJkcwUAAAADbmlsCQAAAgAAAAECAAAAKFBsZWFzZSBDaG9vc2UgYSBSYW5nZSBCZXR3ZWVuIDMzMy0xMjAwMC4AAAABaQEAAAAIV2l0aGRyYXcAAAAABAAAAApjdXJyZW50S2V5CQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAEWNoZWNrZGVwb3NpdHZhbHVlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEkRlcG9zaXRfQW1vdW50X09mXwUAAAAKY3VycmVudEtleQQAAAAQY2hlY2tzdGFrZWR2YWx1ZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwIAAAANU3Rha2VkX0Ftb3VudAQAAAAObmV3c3Rha2VkdmFsdWUJAABlAAAAAgUAAAAQY2hlY2tzdGFrZWR2YWx1ZQUAAAARY2hlY2tkZXBvc2l0dmFsdWUEAAAAC2NoZWNrOTBEZ2FwCQAAZQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQQAAAAPZmV0Y2hSZXdhcmREYXRhCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzAgAAABNUb3RhbF9VU0RUX0NsYWltZWQ6BAAAABJ0b3RhbHJld2FyZGNsYWltZWQJAABkAAAAAgUAAAAPZmV0Y2hSZXdhcmREYXRhCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAC1Jld2FyZHNfT2ZfBQAAAApjdXJyZW50S2V5AwkAAGYAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAFVRvdGFsX0xvY2tfQmxvY2tzX09mXwUAAAAKY3VycmVudEtleQUAAAAGaGVpZ2h0CQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAABVlvdXIgCQABpAAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5AgAAAGIgQTRBIGFyZSBVbmRlciBMb2NrLiBDb25zaWRlciBsYXN0IDggZGlnaXRzIGFzIHZhbHVlIGFmdGVyIERlY2ltYWxzLiBUb2tlbiB3aWxsIGJlIFVubG9ja2VkIGFmdGVyIAkAAaQAAAABCQAAZQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAZoZWlnaHQDCQAAAAAAAAIFAAAAEWNoZWNrZGVwb3NpdHZhbHVlAAAAAAAAAAAACQAAAgAAAAECAAAAJllvdSBIYXZlIEFscmVhZHkgV2l0aGRyYXcgeW91ciBBbW91bnQuAwkAAAAAAAACBQAAAAtjaGVjazkwRGdhcAAAAAAAAAH6QAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5BQAAAApBNEFBc3NldElECQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAAAtSZXdhcmRzX09mXwUAAAAKY3VycmVudEtleQUAAAALVVNEVEFzc2V0SUQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQAAaQAAAAIJAABoAAAAAgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAMAAAAAAAAAA+gFAAAAC0NPREVBc3NldElECQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAIVGllcl9PZl8FAAAACmN1cnJlbnRLZXkCAAAABE5PTkUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9oZWlnaHRfT2ZfBQAAAApjdXJyZW50S2V5AAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1TdGFrZWRfQW1vdW50BQAAAA5uZXdzdGFrZWR2YWx1ZQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAVVG90YWxfTG9ja19CbG9ja3NfT2ZfBQAAAApjdXJyZW50S2V5AAAAAAAAAAAACQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgIAAAAPTG9ja19TdGF0dXNfT2ZfBQAAAApjdXJyZW50S2V5AgAAAAZVTkxPQ0sJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAALUmV3YXJkc19PZl8FAAAACmN1cnJlbnRLZXkAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAE1RvdGFsX1VTRFRfQ2xhaW1lZDoFAAAAEnRvdGFscmV3YXJkY2xhaW1lZAUAAAADbmlsCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACAgAAABJEZXBvc2l0X0Ftb3VudF9PZl8FAAAACmN1cnJlbnRLZXkFAAAACkE0QUFzc2V0SUQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzCQABLAAAAAICAAAAC1Jld2FyZHNfT2ZfBQAAAApjdXJyZW50S2V5BQAAAAtVU0RUQXNzZXRJRAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAACFRpZXJfT2ZfBQAAAApjdXJyZW50S2V5AgAAAAROT05FCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAEkRlcG9zaXRfaGVpZ2h0X09mXwUAAAAKY3VycmVudEtleQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAANU3Rha2VkX0Ftb3VudAUAAAAObmV3c3Rha2VkdmFsdWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAASRGVwb3NpdF9BbW91bnRfT2ZfBQAAAApjdXJyZW50S2V5AAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAFVRvdGFsX0xvY2tfQmxvY2tzX09mXwUAAAAKY3VycmVudEtleQAAAAAAAAAAAAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAICAAAAD0xvY2tfU3RhdHVzX09mXwUAAAAKY3VycmVudEtleQIAAAAGVU5MT0NLCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAICAAAAC1Jld2FyZHNfT2ZfBQAAAApjdXJyZW50S2V5AAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABNUb3RhbF9VU0RUX0NsYWltZWQ6BQAAABJ0b3RhbHJld2FyZGNsYWltZWQFAAAAA25pbAAAAAFpAQAAAAtEZXBvc2l0VVNEVAAAAAAEAAAAA3BtdAMJAAAAAAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAADxObyBwYXltZW50IGF0dGFjaGVkLCBQbGVhc2UgQXR0YWNoIFVTRFQgVG9rZW4gaW4gcGF5bWVudFsxXS4EAAAADWNhbGxlcmFkZHJlc3MJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAANVVNEVGRlcG9zaXRvcgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwIAAAAPRnVuZGluZ19BZGRyZXNzBAAAAA9mZXRjaG9sZFVTRFRiYWwJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMCAAAADFVTRFRfQmFsYW5jZQQAAAAKb2xkVVNEVGJhbAQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzAgAAAAxVU0RUX0JhbGFuY2UDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAQAAAAKbmV3VVNEVGJhbAkAAGQAAAACBQAAAApvbGRVU0RUYmFsCAUAAAADcG10AAAABmFtb3VudAMJAQAAAAIhPQAAAAIFAAAADVVTRFRkZXBvc2l0b3IFAAAADWNhbGxlcmFkZHJlc3MJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAAIkkga25vdyBZb3UgYXJlIG5vdCBBbiBBZG1pbi4gT25seSAFAAAADVVTRFRkZXBvc2l0b3ICAAAAHiBoYXMgcmlnaHRzIHRvIGFkZCBVU0RUIEZ1bmRzLgMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAALVVNEVEFzc2V0SUQJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAAGUtpbmRseSBEZXBvc2l0IE9ubHkgVVNEVCAJAAJYAAAAAQUAAAALVVNEVEFzc2V0SUQCAAAACSBBc3NldElELgMJAABmAAAAAgAAAAAAAA9CQAgFAAAAA3BtdAAAAAZhbW91bnQJAAACAAAAAQIAAAAqQXR0YWNoIG1pbmltdW0gMSBVU0RUIGF0bGVhc3QgRm9yIFBheW1lbnQuCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAxVU0RUX0JhbGFuY2UFAAAACm5ld1VTRFRiYWwFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5+rcMag==",
    "height": 1741132,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 86btHPKWzbttB2Ruj2SuyeF18JdfDYpotPPsseyAHuuK
Next: G9qWeT2ZQagTEk1QTZXbfAEE4EbTvPvSeBy6URjxVNjh

Diff: 

OldNewDifferences
11 {-# STDLIB_VERSION 4 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let CODEAssetID = base58'F11g74azdw3SZN83raygbu9useimfTwSQ7HmTLggAq26'
4+let A4AAssetID = base58'8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g'
55 
6-let StartHeight = 0
6+let USDTAssetID = base58'7RB3BWayeCVPq3kkpkeJZAFv2DYCB5gEwnutEpRofaw4'
77 
8-let blockdiff = (height - StartHeight)
9-
10-let StartInflation = (fraction(10000000, 1, blockdiff) + 6)
8+let CODEAssetID = base58'EB4CUQH4fHzzQt9YjcHtA6T7uosHNH9RnQKHgBdZHPCB'
119 
1210 let FeeAddress = base58'6Z73KxcX3sugpiStpSRXxKxTmWqCaLVwFeM6kwyiKVDR'
1311 
1412 let devAddress = base58'8d4zGuTjT3h67Z4DatzMXdXXW1GvoQhMTjwCGFxJuene'
1513 
1614 @Callable(i)
17-func Claim () = {
15+func IssueA4A () = {
16+    let pmt = value(i.payments[0])
17+    let currentKey = toBase58String(i.caller.bytes)
18+    let PricePerA4A = getIntegerValue(this, "A4A/TN")
19+    let A4AHardCap = getIntegerValue(this, "A4AHardCap")
20+    let NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
21+    let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
22+    let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
23+    let PendingMinting = (A4AHardCap - TotalIssuedA4A)
24+    let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
25+    let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
26+    let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
27+    let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
28+    if (isDefined(pmt.assetId))
29+        then throw("Incorrect asset attached, please attach TN.")
30+        else if ((5000000 > pmt.amount))
31+            then throw("Please Attach minimum 0.05 TN To Issue A4A Asset.")
32+            else if ((TotalIssuedA4A > A4AHardCap))
33+                then throw((((((("A4A Minting is about to reach the Hard Cap of " + toString(A4AHardCap)) + "/10^8 A4A. Please Reduce your Minting Order by ") + toString(PendingMinting)) + " or put ") + toString((A4AHardCap - PreviousIssuedA4A))) + "/10^8"))
34+                else [IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), IntegerEntry("Balance_Minting_A4A:", PendingMinting), IntegerEntry("Total_A4A_Reserve_In_TN:", A4AReserveValue), IntegerEntry("A4A_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Issued Successfully!</h1><br>"), Reissue(A4AAssetID, NewA4AToUser, true), ScriptTransfer(i.caller, ((NewA4AToUser * 990) / 1000), A4AAssetID), ScriptTransfer(addressFromPublicKey(FeeAddress), ((NewA4AToUser * 9) / 1000), A4AAssetID), ScriptTransfer(addressFromPublicKey(devAddress), ((NewA4AToUser * 1) / 1000), A4AAssetID)]
35+    }
36+
37+
38+
39+@Callable(i)
40+func Liquidate () = {
41+    let currentKey = toBase58String(i.callerPublicKey)
42+    let pmt = value(i.payments[0])
43+    let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
44+    let PreviousBurnedA4A = getIntegerValue(this, "Total_Burned_A4A:")
45+    let TotalIssuedA4A = (PreviousIssuedA4A - pmt.amount)
46+    let TotalBurnedA4A = (PreviousBurnedA4A + pmt.amount)
47+    let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
48+    let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
49+    let calculateburnvalue = fraction(PreviousA4ABackupPrice, pmt.amount, 100000)
50+    let A4AReserveValue = (PreviousA4AReserveValue - calculateburnvalue)
51+    let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
52+    if ((pmt.assetId != A4AAssetID))
53+        then throw("Kindly Deposit Only 8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g (A4A).")
54+        else if ((100000 > pmt.amount))
55+            then throw("Attach Amount must be greater than 0.001 A4A.")
56+            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 * 990) / 1000), unit), ScriptTransfer(addressFromPublicKey(FeeAddress), ((calculateburnvalue * 9) / 1000), unit), ScriptTransfer(addressFromPublicKey(devAddress), ((calculateburnvalue * 1) / 1000), unit)]
57+    }
58+
59+
60+
61+@Callable(i)
62+func Deposit (days) = {
1863     let pmt = if ((size(i.payments) == 1))
1964         then i.payments[0]
20-        else throw("No Payments Attached Please Attach CODE Asset Only.")
65+        else throw("No payment attached, Please Attach A4A Token as per TIER in payment[1].")
2166     let currentKey = toBase58String(i.caller.bytes)
22-    let allowdedpymt = (blockdiff * 100000)
23-    let NewCODEToUser = (StartInflation * pmt.amount)
24-    let PreviousIssuedCODE = getIntegerValue(this, "Total_Issued_CODE:")
25-    let TotalIssuedCODE = (PreviousIssuedCODE + NewCODEToUser)
26-    let PreviousBurnedCODE = getIntegerValue(this, "Total_Burned_CODE:")
27-    let TotalBurnedCODE = (PreviousBurnedCODE + pmt.amount)
28-    let PreviousTxnsCODE = getIntegerValue(this, "Total_Txns:")
29-    let TotalTxnsCODE = (PreviousTxnsCODE + 1)
30-    let fetchuserstakedblanace = valueOrErrorMessage(getIntegerValue(addressFromPublicKey(base58'C246qxhuyo9DBk1pjMzEQSVAWmiqYupG2swGkxTeAvLV'), ("Deposit_Amount_Of_" + currentKey)), "Address not Found")
31-    if ((StartHeight > height))
32-        then throw((("DApp is Not Started Yet please Wait until " + toString((StartHeight - height))) + " blocks"))
33-        else if ((pmt.assetId != CODEAssetID))
34-            then throw(("Incorrect asset attached, please attach " + toBase58String(CODEAssetID)))
35-            else if ((100000 > pmt.amount))
36-                then throw("Please Attach minimum 0.001 CODE To Issue CODE Asset.")
37-                else if ((pmt.amount > allowdedpymt))
38-                    then throw((("You can attach maximum " + toString(allowdedpymt)) + "/10^8 CODE."))
39-                    else [IntegerEntry("Inflation", StartInflation), IntegerEntry("Total_Issued_CODE:", TotalIssuedCODE), IntegerEntry("Total_Burned_CODE:", TotalBurnedCODE), IntegerEntry("Total_Txns:", TotalTxnsCODE), IntegerEntry(("Claim_Amount_" + currentKey), NewCODEToUser), IntegerEntry("User_Staked_Amount:", fetchuserstakedblanace), Burn(CODEAssetID, pmt.amount), ScriptTransfer(i.caller, NewCODEToUser, CODEAssetID), StringEntry("message", "<h1>CODE Issued Successfully!</h1><br>")]
67+    let maximumlockdays = 90
68+    let lockstatus = "LOCKED"
69+    let ULBT = 99999999999
70+    let ULST = 599999999999
71+    let ULGT = 1199999999999
72+    let ULDT = 1200000000000
73+    let oneday = 1440
74+    let actualblocks = (oneday * days)
75+    let totallockblocks = (height + actualblocks)
76+    let Tier1 = 36000
77+    let Tier1rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
78+    let Tier2rewards = fraction(fraction((Tier1 * 4), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
79+    let Tier3rewards = fraction(fraction((Tier1 * 8), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
80+    let StakedA4AAmount =     match getInteger(this, "Staked_Amount") {
81+        case a: Int => 
82+            a
83+        case _ => 
84+            0
85+    }
86+    let newStakedA4AAmount = (StakedA4AAmount + pmt.amount)
87+    let currentA4AAmount =     match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
88+        case a: Int => 
89+            a
90+        case _ => 
91+            0
92+    }
93+    let newA4AAmount = (currentA4AAmount + pmt.amount)
94+    if ((pmt.assetId != A4AAssetID))
95+        then throw((("Incorrect asset attached, please attach " + toBase58String(A4AAssetID)) + " only."))
96+        else if ((6 >= days))
97+            then throw("Choose Locking days in between 7 to 90.")
98+            else if ((days > maximumlockdays))
99+                then throw("You Entered days greater than 90 please Enter no. of days in between 7 to 90.")
100+                else if ((33300000000 > pmt.amount))
101+                    then throw("Please Attach minimum 333 A4A To Achieve BRONZE TIER.")
102+                    else if ((ULBT >= pmt.amount))
103+                        then [StringEntry(("Tier_Of_" + currentKey), "BRONZE"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), fraction(fraction(Tier1, pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP)))]
104+                        else if ((ULST >= pmt.amount))
105+                            then [StringEntry(("Tier_Of_" + currentKey), "SILVER"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier1rewards)]
106+                            else if ((ULGT >= pmt.amount))
107+                                then [StringEntry(("Tier_Of_" + currentKey), "GOLD"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier2rewards)]
108+                                else if ((ULDT == pmt.amount))
109+                                    then [StringEntry(("Tier_Of_" + currentKey), "DIAMOND"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier3rewards)]
110+                                    else throw("Please Choose a Range Between 333-12000.")
111+    }
112+
113+
114+
115+@Callable(i)
116+func Withdraw () = {
117+    let currentKey = toBase58String(i.caller.bytes)
118+    let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
119+    let checkstakedvalue = getIntegerValue(this, "Staked_Amount")
120+    let newstakedvalue = (checkstakedvalue - checkdepositvalue)
121+    let check90Dgap = (getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - getIntegerValue(this, ("Deposit_height_Of_" + currentKey)))
122+    let fetchRewardData = getIntegerValue(this, "Total_USDT_Claimed:")
123+    let totalrewardclaimed = (fetchRewardData + getIntegerValue(this, ("Rewards_Of_" + currentKey)))
124+    if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
125+        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))))
126+        else if ((checkdepositvalue == 0))
127+            then throw("You Have Already Withdraw your Amount.")
128+            else if ((check90Dgap == 129600))
129+                then [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), ScriptTransfer(i.caller, ((getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)) * 3) / 1000), CODEAssetID), StringEntry(("Tier_Of_" + currentKey), "NONE"), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), IntegerEntry("Staked_Amount", newstakedvalue), IntegerEntry(("Deposit_Amount_Of_" + currentKey), 0), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), 0), StringEntry(("Lock_Status_Of_" + currentKey), "UNLOCK"), IntegerEntry(("Rewards_Of_" + currentKey), 0), IntegerEntry("Total_USDT_Claimed:", totalrewardclaimed)]
130+                else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), StringEntry(("Tier_Of_" + currentKey), "NONE"), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), IntegerEntry("Staked_Amount", newstakedvalue), IntegerEntry(("Deposit_Amount_Of_" + currentKey), 0), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), 0), StringEntry(("Lock_Status_Of_" + currentKey), "UNLOCK"), IntegerEntry(("Rewards_Of_" + currentKey), 0), IntegerEntry("Total_USDT_Claimed:", totalrewardclaimed)]
131+    }
132+
133+
134+
135+@Callable(i)
136+func DepositUSDT () = {
137+    let pmt = if ((size(i.payments) == 1))
138+        then i.payments[0]
139+        else throw("No payment attached, Please Attach USDT Token in payment[1].")
140+    let calleraddress = toBase58String(i.caller.bytes)
141+    let USDTdepositor = getStringValue(this, "Funding_Address")
142+    let fetcholdUSDTbal = getIntegerValue(this, "USDT_Balance")
143+    let oldUSDTbal =     match getInteger(this, "USDT_Balance") {
144+        case a: Int => 
145+            a
146+        case _ => 
147+            0
148+    }
149+    let newUSDTbal = (oldUSDTbal + pmt.amount)
150+    if ((USDTdepositor != calleraddress))
151+        then throw((("I know You are not An Admin. Only " + USDTdepositor) + " has rights to add USDT Funds."))
152+        else if ((pmt.assetId != USDTAssetID))
153+            then throw((("Kindly Deposit Only USDT " + toBase58String(USDTAssetID)) + " AssetID."))
154+            else if ((1000000 > pmt.amount))
155+                then throw("Attach minimum 1 USDT atleast For Payment.")
156+                else [IntegerEntry("USDT_Balance", newUSDTbal)]
40157     }
41158 
42159 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 4 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let CODEAssetID = base58'F11g74azdw3SZN83raygbu9useimfTwSQ7HmTLggAq26'
4+let A4AAssetID = base58'8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g'
55 
6-let StartHeight = 0
6+let USDTAssetID = base58'7RB3BWayeCVPq3kkpkeJZAFv2DYCB5gEwnutEpRofaw4'
77 
8-let blockdiff = (height - StartHeight)
9-
10-let StartInflation = (fraction(10000000, 1, blockdiff) + 6)
8+let CODEAssetID = base58'EB4CUQH4fHzzQt9YjcHtA6T7uosHNH9RnQKHgBdZHPCB'
119 
1210 let FeeAddress = base58'6Z73KxcX3sugpiStpSRXxKxTmWqCaLVwFeM6kwyiKVDR'
1311 
1412 let devAddress = base58'8d4zGuTjT3h67Z4DatzMXdXXW1GvoQhMTjwCGFxJuene'
1513 
1614 @Callable(i)
17-func Claim () = {
15+func IssueA4A () = {
16+    let pmt = value(i.payments[0])
17+    let currentKey = toBase58String(i.caller.bytes)
18+    let PricePerA4A = getIntegerValue(this, "A4A/TN")
19+    let A4AHardCap = getIntegerValue(this, "A4AHardCap")
20+    let NewA4AToUser = fraction(100000, pmt.amount, PricePerA4A)
21+    let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
22+    let TotalIssuedA4A = (PreviousIssuedA4A + NewA4AToUser)
23+    let PendingMinting = (A4AHardCap - TotalIssuedA4A)
24+    let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
25+    let A4AReserveValue = (PreviousA4AReserveValue + pmt.amount)
26+    let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
27+    let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
28+    if (isDefined(pmt.assetId))
29+        then throw("Incorrect asset attached, please attach TN.")
30+        else if ((5000000 > pmt.amount))
31+            then throw("Please Attach minimum 0.05 TN To Issue A4A Asset.")
32+            else if ((TotalIssuedA4A > A4AHardCap))
33+                then throw((((((("A4A Minting is about to reach the Hard Cap of " + toString(A4AHardCap)) + "/10^8 A4A. Please Reduce your Minting Order by ") + toString(PendingMinting)) + " or put ") + toString((A4AHardCap - PreviousIssuedA4A))) + "/10^8"))
34+                else [IntegerEntry("Total_Issued_A4A:", TotalIssuedA4A), IntegerEntry("Balance_Minting_A4A:", PendingMinting), IntegerEntry("Total_A4A_Reserve_In_TN:", A4AReserveValue), IntegerEntry("A4A_Backup_Value_In_TN:", A4ABackupPrice), StringEntry("message", "<h1>A4A Issued Successfully!</h1><br>"), Reissue(A4AAssetID, NewA4AToUser, true), ScriptTransfer(i.caller, ((NewA4AToUser * 990) / 1000), A4AAssetID), ScriptTransfer(addressFromPublicKey(FeeAddress), ((NewA4AToUser * 9) / 1000), A4AAssetID), ScriptTransfer(addressFromPublicKey(devAddress), ((NewA4AToUser * 1) / 1000), A4AAssetID)]
35+    }
36+
37+
38+
39+@Callable(i)
40+func Liquidate () = {
41+    let currentKey = toBase58String(i.callerPublicKey)
42+    let pmt = value(i.payments[0])
43+    let PreviousIssuedA4A = getIntegerValue(this, "Total_Issued_A4A:")
44+    let PreviousBurnedA4A = getIntegerValue(this, "Total_Burned_A4A:")
45+    let TotalIssuedA4A = (PreviousIssuedA4A - pmt.amount)
46+    let TotalBurnedA4A = (PreviousBurnedA4A + pmt.amount)
47+    let PreviousA4AReserveValue = getIntegerValue(this, "Total_A4A_Reserve_In_TN:")
48+    let PreviousA4ABackupPrice = getIntegerValue(this, "A4A_Backup_Value_In_TN:")
49+    let calculateburnvalue = fraction(PreviousA4ABackupPrice, pmt.amount, 100000)
50+    let A4AReserveValue = (PreviousA4AReserveValue - calculateburnvalue)
51+    let A4ABackupPrice = fraction(100000, A4AReserveValue, TotalIssuedA4A)
52+    if ((pmt.assetId != A4AAssetID))
53+        then throw("Kindly Deposit Only 8hdsVCxPBVEmVUZyyX8Sd98Z9hU7Fny26W96sjKiTw8g (A4A).")
54+        else if ((100000 > pmt.amount))
55+            then throw("Attach Amount must be greater than 0.001 A4A.")
56+            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 * 990) / 1000), unit), ScriptTransfer(addressFromPublicKey(FeeAddress), ((calculateburnvalue * 9) / 1000), unit), ScriptTransfer(addressFromPublicKey(devAddress), ((calculateburnvalue * 1) / 1000), unit)]
57+    }
58+
59+
60+
61+@Callable(i)
62+func Deposit (days) = {
1863     let pmt = if ((size(i.payments) == 1))
1964         then i.payments[0]
20-        else throw("No Payments Attached Please Attach CODE Asset Only.")
65+        else throw("No payment attached, Please Attach A4A Token as per TIER in payment[1].")
2166     let currentKey = toBase58String(i.caller.bytes)
22-    let allowdedpymt = (blockdiff * 100000)
23-    let NewCODEToUser = (StartInflation * pmt.amount)
24-    let PreviousIssuedCODE = getIntegerValue(this, "Total_Issued_CODE:")
25-    let TotalIssuedCODE = (PreviousIssuedCODE + NewCODEToUser)
26-    let PreviousBurnedCODE = getIntegerValue(this, "Total_Burned_CODE:")
27-    let TotalBurnedCODE = (PreviousBurnedCODE + pmt.amount)
28-    let PreviousTxnsCODE = getIntegerValue(this, "Total_Txns:")
29-    let TotalTxnsCODE = (PreviousTxnsCODE + 1)
30-    let fetchuserstakedblanace = valueOrErrorMessage(getIntegerValue(addressFromPublicKey(base58'C246qxhuyo9DBk1pjMzEQSVAWmiqYupG2swGkxTeAvLV'), ("Deposit_Amount_Of_" + currentKey)), "Address not Found")
31-    if ((StartHeight > height))
32-        then throw((("DApp is Not Started Yet please Wait until " + toString((StartHeight - height))) + " blocks"))
33-        else if ((pmt.assetId != CODEAssetID))
34-            then throw(("Incorrect asset attached, please attach " + toBase58String(CODEAssetID)))
35-            else if ((100000 > pmt.amount))
36-                then throw("Please Attach minimum 0.001 CODE To Issue CODE Asset.")
37-                else if ((pmt.amount > allowdedpymt))
38-                    then throw((("You can attach maximum " + toString(allowdedpymt)) + "/10^8 CODE."))
39-                    else [IntegerEntry("Inflation", StartInflation), IntegerEntry("Total_Issued_CODE:", TotalIssuedCODE), IntegerEntry("Total_Burned_CODE:", TotalBurnedCODE), IntegerEntry("Total_Txns:", TotalTxnsCODE), IntegerEntry(("Claim_Amount_" + currentKey), NewCODEToUser), IntegerEntry("User_Staked_Amount:", fetchuserstakedblanace), Burn(CODEAssetID, pmt.amount), ScriptTransfer(i.caller, NewCODEToUser, CODEAssetID), StringEntry("message", "<h1>CODE Issued Successfully!</h1><br>")]
67+    let maximumlockdays = 90
68+    let lockstatus = "LOCKED"
69+    let ULBT = 99999999999
70+    let ULST = 599999999999
71+    let ULGT = 1199999999999
72+    let ULDT = 1200000000000
73+    let oneday = 1440
74+    let actualblocks = (oneday * days)
75+    let totallockblocks = (height + actualblocks)
76+    let Tier1 = 36000
77+    let Tier1rewards = fraction(fraction((Tier1 * 2), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
78+    let Tier2rewards = fraction(fraction((Tier1 * 4), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
79+    let Tier3rewards = fraction(fraction((Tier1 * 8), pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP))
80+    let StakedA4AAmount =     match getInteger(this, "Staked_Amount") {
81+        case a: Int => 
82+            a
83+        case _ => 
84+            0
85+    }
86+    let newStakedA4AAmount = (StakedA4AAmount + pmt.amount)
87+    let currentA4AAmount =     match getInteger(this, ("Deposit_Amount_Of_" + currentKey)) {
88+        case a: Int => 
89+            a
90+        case _ => 
91+            0
92+    }
93+    let newA4AAmount = (currentA4AAmount + pmt.amount)
94+    if ((pmt.assetId != A4AAssetID))
95+        then throw((("Incorrect asset attached, please attach " + toBase58String(A4AAssetID)) + " only."))
96+        else if ((6 >= days))
97+            then throw("Choose Locking days in between 7 to 90.")
98+            else if ((days > maximumlockdays))
99+                then throw("You Entered days greater than 90 please Enter no. of days in between 7 to 90.")
100+                else if ((33300000000 > pmt.amount))
101+                    then throw("Please Attach minimum 333 A4A To Achieve BRONZE TIER.")
102+                    else if ((ULBT >= pmt.amount))
103+                        then [StringEntry(("Tier_Of_" + currentKey), "BRONZE"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), fraction(fraction(Tier1, pmt.amount, pow(10, 0, 8, 0, 0, UP)), actualblocks, pow(10, 0, 6, 0, 0, UP)))]
104+                        else if ((ULST >= pmt.amount))
105+                            then [StringEntry(("Tier_Of_" + currentKey), "SILVER"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier1rewards)]
106+                            else if ((ULGT >= pmt.amount))
107+                                then [StringEntry(("Tier_Of_" + currentKey), "GOLD"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier2rewards)]
108+                                else if ((ULDT == pmt.amount))
109+                                    then [StringEntry(("Tier_Of_" + currentKey), "DIAMOND"), IntegerEntry(("Deposit_height_Of_" + currentKey), height), IntegerEntry("Staked_Amount", newStakedA4AAmount), IntegerEntry(("Deposit_Amount_Of_" + currentKey), newA4AAmount), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), totallockblocks), StringEntry(("Lock_Status_Of_" + currentKey), lockstatus), IntegerEntry(("Rewards_Of_" + currentKey), Tier3rewards)]
110+                                    else throw("Please Choose a Range Between 333-12000.")
111+    }
112+
113+
114+
115+@Callable(i)
116+func Withdraw () = {
117+    let currentKey = toBase58String(i.caller.bytes)
118+    let checkdepositvalue = getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey))
119+    let checkstakedvalue = getIntegerValue(this, "Staked_Amount")
120+    let newstakedvalue = (checkstakedvalue - checkdepositvalue)
121+    let check90Dgap = (getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) - getIntegerValue(this, ("Deposit_height_Of_" + currentKey)))
122+    let fetchRewardData = getIntegerValue(this, "Total_USDT_Claimed:")
123+    let totalrewardclaimed = (fetchRewardData + getIntegerValue(this, ("Rewards_Of_" + currentKey)))
124+    if ((getIntegerValue(this, ("Total_Lock_Blocks_Of_" + currentKey)) > height))
125+        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))))
126+        else if ((checkdepositvalue == 0))
127+            then throw("You Have Already Withdraw your Amount.")
128+            else if ((check90Dgap == 129600))
129+                then [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), ScriptTransfer(i.caller, ((getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)) * 3) / 1000), CODEAssetID), StringEntry(("Tier_Of_" + currentKey), "NONE"), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), IntegerEntry("Staked_Amount", newstakedvalue), IntegerEntry(("Deposit_Amount_Of_" + currentKey), 0), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), 0), StringEntry(("Lock_Status_Of_" + currentKey), "UNLOCK"), IntegerEntry(("Rewards_Of_" + currentKey), 0), IntegerEntry("Total_USDT_Claimed:", totalrewardclaimed)]
130+                else [ScriptTransfer(i.caller, getIntegerValue(this, ("Deposit_Amount_Of_" + currentKey)), A4AAssetID), ScriptTransfer(i.caller, getIntegerValue(this, ("Rewards_Of_" + currentKey)), USDTAssetID), StringEntry(("Tier_Of_" + currentKey), "NONE"), IntegerEntry(("Deposit_height_Of_" + currentKey), 0), IntegerEntry("Staked_Amount", newstakedvalue), IntegerEntry(("Deposit_Amount_Of_" + currentKey), 0), IntegerEntry(("Total_Lock_Blocks_Of_" + currentKey), 0), StringEntry(("Lock_Status_Of_" + currentKey), "UNLOCK"), IntegerEntry(("Rewards_Of_" + currentKey), 0), IntegerEntry("Total_USDT_Claimed:", totalrewardclaimed)]
131+    }
132+
133+
134+
135+@Callable(i)
136+func DepositUSDT () = {
137+    let pmt = if ((size(i.payments) == 1))
138+        then i.payments[0]
139+        else throw("No payment attached, Please Attach USDT Token in payment[1].")
140+    let calleraddress = toBase58String(i.caller.bytes)
141+    let USDTdepositor = getStringValue(this, "Funding_Address")
142+    let fetcholdUSDTbal = getIntegerValue(this, "USDT_Balance")
143+    let oldUSDTbal =     match getInteger(this, "USDT_Balance") {
144+        case a: Int => 
145+            a
146+        case _ => 
147+            0
148+    }
149+    let newUSDTbal = (oldUSDTbal + pmt.amount)
150+    if ((USDTdepositor != calleraddress))
151+        then throw((("I know You are not An Admin. Only " + USDTdepositor) + " has rights to add USDT Funds."))
152+        else if ((pmt.assetId != USDTAssetID))
153+            then throw((("Kindly Deposit Only USDT " + toBase58String(USDTAssetID)) + " AssetID."))
154+            else if ((1000000 > pmt.amount))
155+                then throw("Attach minimum 1 USDT atleast For Payment.")
156+                else [IntegerEntry("USDT_Balance", newUSDTbal)]
40157     }
41158 
42159 
43160 @Verifier(tx)
44161 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
45162 
github/deemru/w8io/873ac7e 
30.11 ms ◑