tx · BmgcgxssVLPeLLrj4APW3dinkwgLQz1smNpZnu3G34J9

3NAVsUiHMQhkX4keYNiV59vmRTzsnvCTA4a:  -0.01400000 Waves

2020.10.19 23:21 [1227930] smart account 3NAVsUiHMQhkX4keYNiV59vmRTzsnvCTA4a > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BmgcgxssVLPeLLrj4APW3dinkwgLQz1smNpZnu3G34J9",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1603138960678,
    "version": 2,
    "chainId": 84,
    "sender": "3NAVsUiHMQhkX4keYNiV59vmRTzsnvCTA4a",
    "senderPublicKey": "7rC1eUHm39ujzNxeYHmmZia2bTsJ1Un38mzD1QHNVwUN",
    "proofs": [
        "XQJDEgmDznvK22eFPMG8AhxEZfRMdvRVvw512duY65T9cN3U7zXmHHe3DwrYajteDVL3to1uPkW5mrAVnzzqNms"
    ],
    "script": "base64:AAIEAAAAAAAAABEIAhIDCgEIEgMKAQgSAwoBCAAAAA0AAAAAAXYBAAAAIEog5FEp0a5b61Us9FxZZv7TFazObMUmFN4GJ9vOqfk7AAAAAAFvAQAAACBlwAgSzsM+70d8C1Jb3wzHWPTczpzKAVyB9scXCgMiOwAAAAABbAIAAAAjM04yaEhhcUVFWGpGSEU1RzhOVHc2djdLTk13Y0hvYjJFbmEAAAAAAWYAAAAAAAAAAAoAAAAAAXAAAAAAAAAAB9AAAAAAA3ByMQAAAAAAAAABLAAAAAADcHIyAAAAAAAAAADIAAAAAANwcjMAAAAAAAAAAGQAAAAAAWgFAAAABmhlaWdodAEAAAAMZ2V0U3RhdGlzdGljAAAAAAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzAgAAAAlzdGF0aXN0aWMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQkAASwAAAACAgAAABQwXzBfMF8wXzBfMF8wXzBfMF8wXwkAAaQAAAABBQAAAAFoAQAAAAdnZXRVc2VyAAAAAgAAAAF1AAAAAXIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAABdQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhCQAEuQAAAAIJAARMAAAAAgIAAAANMF8wXzBfMF8wXzBfMAkABEwAAAACBQAAAAFyCQAETAAAAAICAAAABzBfMF8wXzAFAAAAA25pbAIAAAABXwEAAAALZ2V0UmVmZXJyYWwAAAABAAAAAXIEAAAAAXoJAAS1AAAAAgUAAAABcgIAAAAJcmVmZXJyYWw6AwkBAAAACWlzRGVmaW5lZAAAAAEJAAGRAAAAAgUAAAABegAAAAAAAAAAAQMJAQAAAAlpc0RlZmluZWQAAAABCQAEJgAAAAEJAAGRAAAAAgUAAAABegAAAAAAAAAAAQkAAZEAAAACBQAAAAF6AAAAAAAAAAABAgAAAAEwAgAAAAEwAQAAAAtnZXRXaXRoZHJhdwAAAAEAAAABcwQAAAABYQkABLUAAAACBQAAAAFzAgAAAAQgSUlJBAAAAAFiCQAEtQAAAAIJAAGRAAAAAgUAAAABYQAAAAAAAAAAAAIAAAABLgQAAAABaQkAAGgAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABYgAAAAAAAAAAAAAAAAAABfXhAAMJAAAAAAAAAgkAAZAAAAABBQAAAAFiAAAAAAAAAAABBQAAAAFpCQAAZAAAAAIJAABoAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAWIAAAAAAAAAAAEJAABsAAAABgAAAAAAAAAACgAAAAAAAAAAAAkAAGUAAAACAAAAAAAAAAAICQABMQAAAAEJAAGRAAAAAgUAAAABYgAAAAAAAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAUAAAAISEFMRkRPV04FAAAAAWkAAAADAAAAAWkBAAAAB2RlcG9zaXQAAAABAAAAAXIEAAAAAXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAAAXoIBQAAAAF0AAAABmFtb3VudAQAAAABawQAAAAHJG1hdGNoMAgFAAAAAXQAAAAHYXNzZXRJZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAKQnl0ZVZlY3RvcgQAAAACaWQFAAAAByRtYXRjaDAJAAJYAAAAAQUAAAACaWQCAAAAAAMJAQAAAAIhPQAAAAIIBQAAAAF0AAAAB2Fzc2V0SWQFAAAAAXYJAAACAAAAAQIAAAAOT25seSBJSUkgdG9rZW4DCQAAZgAAAAIAAAAAAAAAJxAFAAAAAXoJAAACAAAAAQIAAAAYTWluIHN1bSAwLjAwMDEgSUlJIHRva2VuBAAAAAFhCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAAXMJAAS1AAAAAgkBAAAADGdldFN0YXRpc3RpYwAAAAACAAAAAV8DCQAAAAAAAAIFAAAAAWEFAAAAAWwJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAJc3RhdGlzdGljCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABAkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAUJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAGCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAABwUAAAABegkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAgJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAJCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAACgUAAAADbmlsAgAAAAFfBQAAAANuaWwEAAAAAXgJAABoAAAAAgkAAGkAAAACBQAAAAF6AAAAAAAAACcQCQAAZAAAAAIAAAAAAAAAJxAFAAAAAXAEAAAAAXkJAABlAAAAAgUAAAABeAUAAAABegQAAAABdQkABLUAAAACCQEAAAAHZ2V0VXNlcgAAAAIFAAAAAWEJAQAAAAtnZXRSZWZlcnJhbAAAAAEFAAAAAXICAAAAAV8EAAAAA3VkMgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAIDCQAAAAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABwIAAAABMAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAlzdGF0aXN0aWMJAAS5AAAAAgkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAAFAAAAAXoJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAABAAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAAAgkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAMJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAECQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAHCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAACAUAAAABeQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAkJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAKBQAAAANuaWwCAAAAAV8JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAABYQkABLkAAAACCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAAAAUAAAABegkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAEFAAAAAXgJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIFAAAAA3VkMgUAAAABeAkABEwAAAACCQABpAAAAAEJAABpAAAAAgkAAGQAAAACBQAAAAN1ZDIFAAAAAXgFAAAAAWYJAARMAAAAAgkAAaQAAAABBQAAAAFoCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABQkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAHCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACAkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAkJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAKCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACwUAAAADbmlsAgAAAAFfBQAAAANuaWwEAAAAAnIxCQAEtQAAAAIJAQAAAAdnZXRVc2VyAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAHAgAAAAEwAgAAAAFfBAAAAANzcjEJAABoAAAAAgkAAGkAAAACBQAAAAF6AAAAAAAAACcQBQAAAANwcjEDCQAAAAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAcCAAAAATAJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAJc3RhdGlzdGljCQAEuQAAAAIJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAABQAAAAF6CQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAAAQAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAADCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAABAUAAAADc3IxCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAABQAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAHCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAIBQAAAAF5BQAAAANzcjEJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAJCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAACgUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAWEJAAS5AAAAAgkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAAFAAAAAXoJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAABBQAAAAF4CQAETAAAAAIJAAGkAAAAAQkAAGQAAAACBQAAAAN1ZDIFAAAAAXgJAARMAAAAAgkAAaQAAAABCQAAaQAAAAIJAABkAAAAAgUAAAADdWQyBQAAAAF4BQAAAAFmCQAETAAAAAIJAAGkAAAAAQUAAAABaAkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAUJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAGCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABwkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAgJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAJCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACgkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAsFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAcJAAS5AAAAAgkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAEJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAAAgkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAQJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAABQkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAGCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAcJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJyMQAAAAAAAAAACAUAAAADc3IxCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAkJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAACgkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAnIxAAAAAAAAAAALBQAAAANzcjEFAAAAA25pbAIAAAABXwUAAAADbmlsBAAAAAJyMgkABLUAAAACCQEAAAAHZ2V0VXNlcgAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAcCAAAAATACAAAAAV8EAAAAA3NyMgkAAGgAAAACCQAAaQAAAAIFAAAAAXoAAAAAAAAAJxAFAAAAA3ByMgMJAAAAAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAABwIAAAABMAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAlzdGF0aXN0aWMJAAS5AAAAAgkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAAFAAAAAXoJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAABAAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAAAgkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAMJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAQFAAAAA3NyMQUAAAADc3IyCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAABQAAAAAAAAAAAgkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAHCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQAAZAAAAAIJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAgFAAAAAXkFAAAAA3NyMQUAAAADc3IyCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAACQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAoFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAFhCQAEuQAAAAIJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAAABQAAAAF6CQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAAAQUAAAABeAkABEwAAAACCQABpAAAAAEJAABkAAAAAgUAAAADdWQyBQAAAAF4CQAETAAAAAIJAAGkAAAAAQkAAGkAAAACCQAAZAAAAAIFAAAAA3VkMgUAAAABeAUAAAABZgkABEwAAAACCQABpAAAAAEFAAAAAWgJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAFCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABgkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAcJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAICQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACQkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAoJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAALBQAAAANuaWwCAAAAAV8JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAHCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAAAAkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAAAwkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAECQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAUJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAABgkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAHCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAgFAAAAA3NyMQkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAJCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAoJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJyMQAAAAAAAAAACwUAAAADc3IxBQAAAANuaWwCAAAAAV8JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAABwkABLkAAAACCQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAAJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAACCQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAMJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAABAkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAFCQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAABwkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAICQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAkFAAAAA3NyMgkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAKCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAsFAAAAA3NyMgUAAAADbmlsAgAAAAFfBQAAAANuaWwEAAAAAnIzCQAEtQAAAAIJAQAAAAdnZXRVc2VyAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAABwIAAAABMAIAAAABXwQAAAADc3IzCQAAaAAAAAIJAABpAAAAAgUAAAABegAAAAAAAAAnEAUAAAADcHIzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAACXN0YXRpc3RpYwkABLkAAAACCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAAAAUAAAABegkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAEAAAAAAAAAAAEJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAACCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAAAwkABEwAAAACCQABpAAAAAEJAABkAAAAAgkAAGQAAAACCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAEBQAAAANzcjEFAAAAA3NyMgUAAAADc3IzCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAABQAAAAAAAAAAAwkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAHCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQAAZAAAAAIJAABkAAAAAgkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAACAUAAAABeQUAAAADc3IxBQAAAANzcjIFAAAAA3NyMwkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAkJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAKBQAAAANuaWwCAAAAAV8JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAABYQkABLkAAAACCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAAAAUAAAABegkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAEFAAAAAXgJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIFAAAAA3VkMgUAAAABeAkABEwAAAACCQABpAAAAAEJAABpAAAAAgkAAGQAAAACBQAAAAN1ZDIFAAAAAXgFAAAAAWYJAARMAAAAAgkAAaQAAAABBQAAAAFoCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABQkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAHCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACAkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAkJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAKCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACwUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABwkABLkAAAACCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAAJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAACCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAMJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAABAkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAFCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAABwkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAIBQAAAANzcjEJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAACQkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAKCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAsFAAAAA3NyMQUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAcJAAS5AAAAAgkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAEJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAAAgkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAQJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAABQkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAGCQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAcJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAACAkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAJBQAAAANzcjIJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAACgkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAnIyAAAAAAAAAAALBQAAAANzcjIFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAHCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAJyMwAAAAAAAAAAAAkABEwAAAACCQABkQAAAAIFAAAAAnIzAAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAACcjMAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAJyMwAAAAAAAAAAAwkABEwAAAACCQABkQAAAAIFAAAAAnIzAAAAAAAAAAAECQAETAAAAAIJAAGRAAAAAgUAAAACcjMAAAAAAAAAAAUJAARMAAAAAgkAAZEAAAACBQAAAAJyMwAAAAAAAAAABgkABEwAAAACCQABkQAAAAIFAAAAAnIzAAAAAAAAAAAHCQAETAAAAAIJAAGRAAAAAgUAAAACcjMAAAAAAAAAAAgJAARMAAAAAgkAAZEAAAACBQAAAAJyMwAAAAAAAAAACQkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAnIzAAAAAAAAAAAKBQAAAANzcjMJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJyMwAAAAAAAAAACwUAAAADc3IzBQAAAANuaWwCAAAAAV8FAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAEAAAABdwQAAAABeQkBAAAAC2dldFdpdGhkcmF3AAAAAQUAAAABdwQAAAABYQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAF1CQAEtQAAAAIJAQAAAAdnZXRVc2VyAAAAAgUAAAABYQIAAAABMAIAAAABXwQAAAABcwkABLUAAAACCQEAAAAMZ2V0U3RhdGlzdGljAAAAAAIAAAABXwQAAAABagkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAQEAAAAAXgJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAACBAAAAAFkCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAAAwQAAAABYgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAsEAAAAAWcJAABkAAAAAgUAAAABagUAAAABZgQAAAABbQMJAABnAAAAAgUAAAABaAUAAAABZwkAAGQAAAACBQAAAAF4BQAAAAFiCQAAZAAAAAIJAABoAAAAAgkAAGQAAAACCQAAZQAAAAIFAAAAAWYFAAAAAWcFAAAAAWgFAAAAAWQFAAAAAWIDCQAAZwAAAAIAAAAAAAAAAAAFAAAAAXkJAAACAAAAAQIAAAAeQ2FuJ3Qgd2l0aGRyYXcgbmVnYXRpdmUgYW1vdW50AwkAAGcAAAACBQAAAAFiBQAAAAF5CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAACXN0YXRpc3RpYwkABLkAAAACCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAAAAkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAEJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAACCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAAAwAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAQJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAFCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAABgUAAAABeQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAcJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAICQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAACQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAoFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAFhCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABAkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAUFAAAAAXkJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAAGBQAAAAF5CQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABwkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAgJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAJCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACgkABEwAAAACCQABpAAAAAEJAABlAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAsFAAAAAXkFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAAXkFAAAAAXYFAAAAA25pbAMJAABmAAAAAgAAAAAAAAAAAAkAAGUAAAACBQAAAAFtBQAAAAF5CQAAAgAAAAECAAAAEk5vdCBlbm91Z2ggYmFsYW5jZQQAAAABbgkAAGUAAAACCQAAZAAAAAIFAAAAAXgFAAAAAWIFAAAAAXkJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAJc3RhdGlzdGljCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAAAQkABEwAAAACCQABpAAAAAEJAABlAAAAAgkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAAAgUAAAABeQkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAsJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAADAAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABAkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAUJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAGCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAACwkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAcJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAICQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAACQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAoFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAFhCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAAAQkABEwAAAACCQABpAAAAAEFAAAAAW4JAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABAkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAUFAAAAAXkJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAAGBQAAAAF5CQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABwkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAgJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAJCQAETAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAKAgAAAAJfMAUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAABeQUAAAABdgUAAAADbmlsAAAAAWkBAAAACU1hcmtldGluZwAAAAEAAAABdwQAAAABeQkBAAAAC2dldFdpdGhkcmF3AAAAAQUAAAABdwQAAAABYQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAFzCQAEtQAAAAIJAQAAAAxnZXRTdGF0aXN0aWMAAAAAAgAAAAFfAwkAAGcAAAACAAAAAAAAAAAABQAAAAF5CQAAAgAAAAECAAAAHkNhbid0IHdpdGhkcmF3IG5lZ2F0aXZlIGFtb3VudAMJAABmAAAAAgUAAAABeQAAAAAAAAAnEAkAAAIAAAABAgAAABJOb3QgZW5vdWdoIGJhbGFuY2UJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAJc3RhdGlzdGljCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABAkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAUJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAGCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABwkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAgJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAJCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAACgUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAABeQUAAAABdgUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAFFNldFNjcmlwdFRyYW5zYWN0aW9uBAAAAAFkBQAAAAckbWF0Y2gwCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAABbwbqTlXl",
    "height": 1227930,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Dpv3NJ76Fz7aTeyHLznRE8eYGk7QNSkAda6Fa8eNZeK4
Next: 4ZjNiPmXjMJsQkZNuiPia6CnELj3mu9z4iBe1RTL7rg4

Diff: 

OldNewDifferences
99 
1010 let d = 10
1111 
12-let e = 20
12+let e = 2000
1313 
14-let f = 3
14+let f = 300
1515 
16-let g = 2
16+let g = 200
1717 
18-let h = 1
18+let h = 100
1919 
20-func i () = {
21-    let j = getString(this, "statistic")
22-    if ($isInstanceOf(j, "String"))
20+let i = height
21+
22+func j () = {
23+    let k = getString(this, "statistic")
24+    if ($isInstanceOf(k, "String"))
2325         then {
24-            let k = j
25-            k
26+            let l = k
27+            l
2628             }
27-        else "0_0_0_0_0_0_0_0_0"
29+        else ("0_0_0_0_0_0_0_0_0_0_" + toString(i))
2830     }
2931 
3032 
31-func l (m) = {
32-    let j = getString(this, m)
33-    if ($isInstanceOf(j, "String"))
33+func m (n,o) = {
34+    let k = getString(this, n)
35+    if ($isInstanceOf(k, "String"))
3436         then {
35-            let k = j
36-            k
37+            let l = k
38+            l
3739             }
38-        else "0_0_0_0_0_0_0_0_0_0_0_0"
40+        else makeString(["0_0_0_0_0_0_0", o, "0_0_0_0"], "_")
3941     }
4042 
4143 
42-func n (o) = {
43-    let k = split(o, " III")
44-    let p = split(k[0], ".")
45-    let q = (parseIntValue(p[0]) * 100000000)
46-    if ((size(p) == 1))
47-        then q
48-        else ((parseIntValue(p[1]) * pow(10, 0, (8 - size(p[1])), 0, 0, HALFDOWN)) + q)
44+func p (o) = {
45+    let q = split(o, "referral:")
46+    if (isDefined(q[1]))
47+        then if (isDefined(addressFromString(q[1])))
48+            then q[1]
49+            else "0"
50+        else "0"
4951     }
5052 
5153 
52-@Callable(q)
53-func deposit (r) = {
54-    let s = value(q.payments[0])
55-    let t = s.amount
56-    let u = {
57-        let j = s.assetId
58-        if ($isInstanceOf(j, "ByteVector"))
54+func r (s) = {
55+    let l = split(s, " III")
56+    let t = split(l[0], ".")
57+    let u = (parseIntValue(t[0]) * 100000000)
58+    if ((size(t) == 1))
59+        then u
60+        else ((parseIntValue(t[1]) * pow(10, 0, (8 - size(t[1])), 0, 0, HALFDOWN)) + u)
61+    }
62+
63+
64+@Callable(u)
65+func deposit (o) = {
66+    let v = value(u.payments[0])
67+    let q = v.amount
68+    let w = {
69+        let k = v.assetId
70+        if ($isInstanceOf(k, "ByteVector"))
5971             then {
60-                let v = j
61-                toBase58String(v)
72+                let x = k
73+                toBase58String(x)
6274                 }
6375             else ""
6476         }
65-    if ((s.assetId != a))
77+    if ((v.assetId != a))
6678         then throw("Only III token")
67-        else {
68-            let k = toBase58String(q.caller.bytes)
69-            let o = split(i(), "_")
70-            if ((k == c))
71-                then [StringEntry("statistic", makeString([o[0], o[1], o[2], o[3], o[4], o[5], o[6], toString((parseIntValue(o[7]) + t)), o[8]], "_"))]
72-                else {
73-                    let w = lastBlock.height
74-                    let x = ((t / 100) * (100 + e))
75-                    let y = (x - t)
76-                    let z = split(l(k), "_")
77-                    let A = parseIntValue(z[2])
78-                    if ((z[7] == "0"))
79-                        then [StringEntry("statistic", makeString([toString((parseIntValue(o[0]) + t)), toString((parseIntValue(o[1]) + 1)), o[2], o[3], o[4], o[5], o[6], o[7], toString((parseIntValue(o[8]) + y))], "_")), StringEntry(k, makeString([toString((parseIntValue(z[0]) + t)), toString((parseIntValue(z[1]) + x)), toString((A + x)), toString(((A + x) / d)), toString(w), z[5], z[6], z[7], z[8], z[9], z[10], z[11]], "_"))]
80-                        else {
81-                            let B = split(l(z[7]), "_")
82-                            let C = ((t / 100) * f)
83-                            if ((B[7] == "0"))
84-                                then [StringEntry("statistic", makeString([toString((parseIntValue(o[0]) + t)), toString((parseIntValue(o[1]) + 1)), o[2], o[3], toString((parseIntValue(o[4]) + C)), toString((parseIntValue(o[5]) + 1)), o[6], o[7], toString(((parseIntValue(o[8]) + y) + C))], "_")), StringEntry(k, makeString([toString((parseIntValue(z[0]) + t)), toString((parseIntValue(z[1]) + x)), toString((A + x)), toString(((A + x) / d)), toString(w), z[5], z[6], z[7], z[8], z[9], z[10], z[11]], "_")), StringEntry(z[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_"))]
85-                                else {
86-                                    let D = split(l(B[7]), "_")
87-                                    let E = ((t / 100) * g)
88-                                    if ((D[7] == "0"))
89-                                        then [StringEntry("statistic", makeString([toString((parseIntValue(o[0]) + t)), toString((parseIntValue(o[1]) + 1)), o[2], o[3], toString(((parseIntValue(o[4]) + C) + E)), toString((parseIntValue(o[5]) + 2)), o[6], o[7], toString((((parseIntValue(o[8]) + y) + C) + E))], "_")), StringEntry(k, makeString([toString((parseIntValue(z[0]) + t)), toString((parseIntValue(z[1]) + x)), toString((A + x)), toString(((A + x) / d)), toString(w), z[5], z[6], z[7], z[8], z[9], z[10], z[11]], "_")), StringEntry(z[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_")), StringEntry(B[7], makeString([D[0], D[1], D[2], D[3], D[4], D[5], D[6], D[7], D[8], toString((parseIntValue(D[9]) + E)), D[10], toString((parseIntValue(D[11]) + E))], "_"))]
90-                                        else {
91-                                            let F = split(l(D[7]), "_")
92-                                            let G = ((t / 100) * h)
93-[StringEntry("statistic", makeString([toString((parseIntValue(o[0]) + t)), toString((parseIntValue(o[1]) + 1)), o[2], o[3], toString((((parseIntValue(o[4]) + C) + E) + G)), toString((parseIntValue(o[5]) + 3)), o[6], o[7], toString(((((parseIntValue(o[8]) + y) + C) + E) + G))], "_")), StringEntry(k, makeString([toString((parseIntValue(z[0]) + t)), toString((parseIntValue(z[1]) + x)), toString((A + x)), toString(((A + x) / d)), toString(w), z[5], z[6], z[7], z[8], z[9], z[10], z[11]], "_")), StringEntry(z[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_")), StringEntry(B[7], makeString([D[0], D[1], D[2], D[3], D[4], D[5], D[6], D[7], D[8], toString((parseIntValue(D[9]) + E)), D[10], toString((parseIntValue(D[11]) + E))], "_")), StringEntry(D[7], makeString([F[0], F[1], F[2], F[3], F[4], F[5], F[6], F[7], F[8], F[9], toString((parseIntValue(F[10]) + G)), toString((parseIntValue(F[11]) + G))], "_"))]
94-                                            }
95-                                    }
96-                            }
97-                    }
98-            }
79+        else if ((10000 > q))
80+            then throw("Min sum 0.0001 III token")
81+            else {
82+                let l = toBase58String(u.caller.bytes)
83+                let s = split(j(), "_")
84+                if ((l == c))
85+                    then [StringEntry("statistic", makeString([s[0], s[1], s[2], s[3], s[4], s[5], s[6], toString((parseIntValue(s[7]) + q)), s[8], s[9], s[10]], "_"))]
86+                    else {
87+                        let y = ((q / 10000) * (10000 + e))
88+                        let z = (y - q)
89+                        let n = split(m(l, p(o)), "_")
90+                        let A = parseIntValue(n[2])
91+                        if ((n[7] == "0"))
92+                            then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + q)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], s[4], s[5], s[6], s[7], toString((parseIntValue(s[8]) + z)), s[9], s[10]], "_")), StringEntry(l, makeString([toString((parseIntValue(n[0]) + q)), toString((parseIntValue(n[1]) + y)), toString((A + y)), toString(((A + y) / d)), toString(i), n[5], n[6], n[7], n[8], n[9], n[10], n[11]], "_"))]
93+                            else {
94+                                let B = split(m(n[7], "0"), "_")
95+                                let C = ((q / 10000) * f)
96+                                if ((B[7] == "0"))
97+                                    then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + q)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((parseIntValue(s[4]) + C)), toString((parseIntValue(s[5]) + 1)), s[6], s[7], toString(((parseIntValue(s[8]) + z) + C)), s[9], s[10]], "_")), StringEntry(l, makeString([toString((parseIntValue(n[0]) + q)), toString((parseIntValue(n[1]) + y)), toString((A + y)), toString(((A + y) / d)), toString(i), n[5], n[6], n[7], n[8], n[9], n[10], n[11]], "_")), StringEntry(n[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_"))]
98+                                    else {
99+                                        let D = split(m(B[7], "0"), "_")
100+                                        let E = ((q / 10000) * g)
101+                                        if ((D[7] == "0"))
102+                                            then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + q)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString(((parseIntValue(s[4]) + C) + E)), toString((parseIntValue(s[5]) + 2)), s[6], s[7], toString((((parseIntValue(s[8]) + z) + C) + E)), s[9], s[10]], "_")), StringEntry(l, makeString([toString((parseIntValue(n[0]) + q)), toString((parseIntValue(n[1]) + y)), toString((A + y)), toString(((A + y) / d)), toString(i), n[5], n[6], n[7], n[8], n[9], n[10], n[11]], "_")), StringEntry(n[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_")), StringEntry(B[7], makeString([D[0], D[1], D[2], D[3], D[4], D[5], D[6], D[7], D[8], toString((parseIntValue(D[9]) + E)), D[10], toString((parseIntValue(D[11]) + E))], "_"))]
103+                                            else {
104+                                                let F = split(m(D[7], "0"), "_")
105+                                                let G = ((q / 10000) * h)
106+[StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + q)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((((parseIntValue(s[4]) + C) + E) + G)), toString((parseIntValue(s[5]) + 3)), s[6], s[7], toString(((((parseIntValue(s[8]) + z) + C) + E) + G)), s[9], s[10]], "_")), StringEntry(l, makeString([toString((parseIntValue(n[0]) + q)), toString((parseIntValue(n[1]) + y)), toString((A + y)), toString(((A + y) / d)), toString(i), n[5], n[6], n[7], n[8], n[9], n[10], n[11]], "_")), StringEntry(n[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_")), StringEntry(B[7], makeString([D[0], D[1], D[2], D[3], D[4], D[5], D[6], D[7], D[8], toString((parseIntValue(D[9]) + E)), D[10], toString((parseIntValue(D[11]) + E))], "_")), StringEntry(D[7], makeString([F[0], F[1], F[2], F[3], F[4], F[5], F[6], F[7], F[8], F[9], toString((parseIntValue(F[10]) + G)), toString((parseIntValue(F[11]) + G))], "_"))]
107+                                                }
108+                                        }
109+                                }
110+                        }
111+                }
99112     }
100113 
101114 
102115 
103-@Callable(q)
116+@Callable(u)
104117 func withdraw (H) = {
105-    let y = n(H)
106-    let k = toBase58String(q.caller.bytes)
107-    let z = split(l(k), "_")
108-    let o = split(i(), "_")
109-    let w = lastBlock.height
110-    let I = parseIntValue(z[4])
111-    let x = parseIntValue(z[2])
112-    let J = parseIntValue(z[3])
113-    let p = parseIntValue(z[11])
118+    let z = r(H)
119+    let l = toBase58String(u.caller.bytes)
120+    let n = split(m(l, "0"), "_")
121+    let s = split(j(), "_")
122+    let I = parseIntValue(n[4])
123+    let y = parseIntValue(n[2])
124+    let J = parseIntValue(n[3])
125+    let t = parseIntValue(n[11])
114126     let K = (I + d)
115-    let L = if ((w >= K))
116-        then (x + p)
117-        else ((((d - K) + w) * J) + p)
118-    if ((0 > y))
127+    let L = if ((i >= K))
128+        then (y + t)
129+        else ((((d - K) + i) * J) + t)
130+    if ((0 >= z))
119131         then throw("Can't withdraw negative amount")
120-        else if ((p >= y))
121-            then [StringEntry("statistic", makeString([o[0], o[1], o[2], toString((parseIntValue(o[3]) + 1)), o[4], o[5], toString((parseIntValue(o[6]) + y)), o[7], o[8]], "_")), StringEntry(k, makeString([z[0], z[1], z[2], z[3], z[4], toString((parseIntValue(z[5]) + y)), toString((parseIntValue(z[6]) + y)), z[7], z[8], z[9], z[10], toString((parseIntValue(z[11]) - y))], "_")), ScriptTransfer(q.caller, y, a)]
122-            else if ((0 > (L - y)))
123-                then throw(((((((((((((((("h" + toString(w)) + " / j") + toString(I)) + " / x") + toString(x)) + " / d") + toString(J)) + " / b") + toString(p)) + " / g") + toString(K)) + " / m") + toString(L)) + " / ((f-g+h)*d)+b ") + toString(((((d - K) + w) * J) + p))))
124-                else throw(((((((((((((((("h" + toString(w)) + " / j") + toString(I)) + " / x") + toString(x)) + " / d") + toString(J)) + " / b") + toString(p)) + " / g") + toString(K)) + " / m") + toString(L)) + " / ((f-g+h)*d)+b ") + toString(((((d - K) + w) * J) + p))))
132+        else if ((t >= z))
133+            then [StringEntry("statistic", makeString([s[0], s[1], s[2], toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + z)), s[7], s[8], s[9], s[10]], "_")), StringEntry(l, makeString([n[0], n[1], n[2], n[3], n[4], toString((parseIntValue(n[5]) + z)), toString((parseIntValue(n[6]) + z)), n[7], n[8], n[9], n[10], toString((parseIntValue(n[11]) - z))], "_")), ScriptTransfer(u.caller, z, a)]
134+            else if ((0 > (L - z)))
135+                then throw("Not enough balance")
136+                else {
137+                    let M = ((y + t) - z)
138+[StringEntry("statistic", makeString([s[0], s[1], toString(((parseIntValue(s[2]) + z) - parseIntValue(n[11]))), toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + parseIntValue(n[11]))), s[7], s[8], s[9], s[10]], "_")), StringEntry(l, makeString([n[0], n[1], toString(M), n[3], n[4], toString((parseIntValue(n[5]) + z)), toString((parseIntValue(n[6]) + z)), n[7], n[8], n[9], (n[10] + "_0")], "_")), ScriptTransfer(u.caller, z, a)]
139+                    }
125140     }
126141 
127142 
128-@Verifier(M)
129-func N () = {
130-    let j = M
131-    if ($isInstanceOf(j, "SetScriptTransaction"))
143+
144+@Callable(u)
145+func Marketing (H) = {
146+    let z = r(H)
147+    let l = toBase58String(u.caller.bytes)
148+    let s = split(j(), "_")
149+    if ((0 >= z))
150+        then throw("Can't withdraw negative amount")
151+        else if ((z > 10000))
152+            then throw("Not enough balance")
153+            else [StringEntry("statistic", makeString([s[0], s[1], s[2], s[3], s[4], s[5], s[6], s[7], s[8], s[9], s[10]], "_")), ScriptTransfer(u.caller, z, a)]
154+    }
155+
156+
157+@Verifier(N)
158+func O () = {
159+    let k = N
160+    if ($isInstanceOf(k, "SetScriptTransaction"))
132161         then {
133-            let J = j
134-            sigVerify(M.bodyBytes, M.proofs[0], b)
162+            let J = k
163+            sigVerify(N.bodyBytes, N.proofs[0], b)
135164             }
136165         else true
137166     }

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 4 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = base58'5zNG3WFGEh3tA38hAZSvD9fMTsR7hwPU7XR4qZqGjs46'
55 
66 let b = base58'7rC1eUHm39ujzNxeYHmmZia2bTsJ1Un38mzD1QHNVwUN'
77 
88 let c = "3N2hHaqEEXjFHE5G8NTw6v7KNMwcHob2Ena"
99 
1010 let d = 10
1111 
12-let e = 20
12+let e = 2000
1313 
14-let f = 3
14+let f = 300
1515 
16-let g = 2
16+let g = 200
1717 
18-let h = 1
18+let h = 100
1919 
20-func i () = {
21-    let j = getString(this, "statistic")
22-    if ($isInstanceOf(j, "String"))
20+let i = height
21+
22+func j () = {
23+    let k = getString(this, "statistic")
24+    if ($isInstanceOf(k, "String"))
2325         then {
24-            let k = j
25-            k
26+            let l = k
27+            l
2628             }
27-        else "0_0_0_0_0_0_0_0_0"
29+        else ("0_0_0_0_0_0_0_0_0_0_" + toString(i))
2830     }
2931 
3032 
31-func l (m) = {
32-    let j = getString(this, m)
33-    if ($isInstanceOf(j, "String"))
33+func m (n,o) = {
34+    let k = getString(this, n)
35+    if ($isInstanceOf(k, "String"))
3436         then {
35-            let k = j
36-            k
37+            let l = k
38+            l
3739             }
38-        else "0_0_0_0_0_0_0_0_0_0_0_0"
40+        else makeString(["0_0_0_0_0_0_0", o, "0_0_0_0"], "_")
3941     }
4042 
4143 
42-func n (o) = {
43-    let k = split(o, " III")
44-    let p = split(k[0], ".")
45-    let q = (parseIntValue(p[0]) * 100000000)
46-    if ((size(p) == 1))
47-        then q
48-        else ((parseIntValue(p[1]) * pow(10, 0, (8 - size(p[1])), 0, 0, HALFDOWN)) + q)
44+func p (o) = {
45+    let q = split(o, "referral:")
46+    if (isDefined(q[1]))
47+        then if (isDefined(addressFromString(q[1])))
48+            then q[1]
49+            else "0"
50+        else "0"
4951     }
5052 
5153 
52-@Callable(q)
53-func deposit (r) = {
54-    let s = value(q.payments[0])
55-    let t = s.amount
56-    let u = {
57-        let j = s.assetId
58-        if ($isInstanceOf(j, "ByteVector"))
54+func r (s) = {
55+    let l = split(s, " III")
56+    let t = split(l[0], ".")
57+    let u = (parseIntValue(t[0]) * 100000000)
58+    if ((size(t) == 1))
59+        then u
60+        else ((parseIntValue(t[1]) * pow(10, 0, (8 - size(t[1])), 0, 0, HALFDOWN)) + u)
61+    }
62+
63+
64+@Callable(u)
65+func deposit (o) = {
66+    let v = value(u.payments[0])
67+    let q = v.amount
68+    let w = {
69+        let k = v.assetId
70+        if ($isInstanceOf(k, "ByteVector"))
5971             then {
60-                let v = j
61-                toBase58String(v)
72+                let x = k
73+                toBase58String(x)
6274                 }
6375             else ""
6476         }
65-    if ((s.assetId != a))
77+    if ((v.assetId != a))
6678         then throw("Only III token")
67-        else {
68-            let k = toBase58String(q.caller.bytes)
69-            let o = split(i(), "_")
70-            if ((k == c))
71-                then [StringEntry("statistic", makeString([o[0], o[1], o[2], o[3], o[4], o[5], o[6], toString((parseIntValue(o[7]) + t)), o[8]], "_"))]
72-                else {
73-                    let w = lastBlock.height
74-                    let x = ((t / 100) * (100 + e))
75-                    let y = (x - t)
76-                    let z = split(l(k), "_")
77-                    let A = parseIntValue(z[2])
78-                    if ((z[7] == "0"))
79-                        then [StringEntry("statistic", makeString([toString((parseIntValue(o[0]) + t)), toString((parseIntValue(o[1]) + 1)), o[2], o[3], o[4], o[5], o[6], o[7], toString((parseIntValue(o[8]) + y))], "_")), StringEntry(k, makeString([toString((parseIntValue(z[0]) + t)), toString((parseIntValue(z[1]) + x)), toString((A + x)), toString(((A + x) / d)), toString(w), z[5], z[6], z[7], z[8], z[9], z[10], z[11]], "_"))]
80-                        else {
81-                            let B = split(l(z[7]), "_")
82-                            let C = ((t / 100) * f)
83-                            if ((B[7] == "0"))
84-                                then [StringEntry("statistic", makeString([toString((parseIntValue(o[0]) + t)), toString((parseIntValue(o[1]) + 1)), o[2], o[3], toString((parseIntValue(o[4]) + C)), toString((parseIntValue(o[5]) + 1)), o[6], o[7], toString(((parseIntValue(o[8]) + y) + C))], "_")), StringEntry(k, makeString([toString((parseIntValue(z[0]) + t)), toString((parseIntValue(z[1]) + x)), toString((A + x)), toString(((A + x) / d)), toString(w), z[5], z[6], z[7], z[8], z[9], z[10], z[11]], "_")), StringEntry(z[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_"))]
85-                                else {
86-                                    let D = split(l(B[7]), "_")
87-                                    let E = ((t / 100) * g)
88-                                    if ((D[7] == "0"))
89-                                        then [StringEntry("statistic", makeString([toString((parseIntValue(o[0]) + t)), toString((parseIntValue(o[1]) + 1)), o[2], o[3], toString(((parseIntValue(o[4]) + C) + E)), toString((parseIntValue(o[5]) + 2)), o[6], o[7], toString((((parseIntValue(o[8]) + y) + C) + E))], "_")), StringEntry(k, makeString([toString((parseIntValue(z[0]) + t)), toString((parseIntValue(z[1]) + x)), toString((A + x)), toString(((A + x) / d)), toString(w), z[5], z[6], z[7], z[8], z[9], z[10], z[11]], "_")), StringEntry(z[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_")), StringEntry(B[7], makeString([D[0], D[1], D[2], D[3], D[4], D[5], D[6], D[7], D[8], toString((parseIntValue(D[9]) + E)), D[10], toString((parseIntValue(D[11]) + E))], "_"))]
90-                                        else {
91-                                            let F = split(l(D[7]), "_")
92-                                            let G = ((t / 100) * h)
93-[StringEntry("statistic", makeString([toString((parseIntValue(o[0]) + t)), toString((parseIntValue(o[1]) + 1)), o[2], o[3], toString((((parseIntValue(o[4]) + C) + E) + G)), toString((parseIntValue(o[5]) + 3)), o[6], o[7], toString(((((parseIntValue(o[8]) + y) + C) + E) + G))], "_")), StringEntry(k, makeString([toString((parseIntValue(z[0]) + t)), toString((parseIntValue(z[1]) + x)), toString((A + x)), toString(((A + x) / d)), toString(w), z[5], z[6], z[7], z[8], z[9], z[10], z[11]], "_")), StringEntry(z[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_")), StringEntry(B[7], makeString([D[0], D[1], D[2], D[3], D[4], D[5], D[6], D[7], D[8], toString((parseIntValue(D[9]) + E)), D[10], toString((parseIntValue(D[11]) + E))], "_")), StringEntry(D[7], makeString([F[0], F[1], F[2], F[3], F[4], F[5], F[6], F[7], F[8], F[9], toString((parseIntValue(F[10]) + G)), toString((parseIntValue(F[11]) + G))], "_"))]
94-                                            }
95-                                    }
96-                            }
97-                    }
98-            }
79+        else if ((10000 > q))
80+            then throw("Min sum 0.0001 III token")
81+            else {
82+                let l = toBase58String(u.caller.bytes)
83+                let s = split(j(), "_")
84+                if ((l == c))
85+                    then [StringEntry("statistic", makeString([s[0], s[1], s[2], s[3], s[4], s[5], s[6], toString((parseIntValue(s[7]) + q)), s[8], s[9], s[10]], "_"))]
86+                    else {
87+                        let y = ((q / 10000) * (10000 + e))
88+                        let z = (y - q)
89+                        let n = split(m(l, p(o)), "_")
90+                        let A = parseIntValue(n[2])
91+                        if ((n[7] == "0"))
92+                            then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + q)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], s[4], s[5], s[6], s[7], toString((parseIntValue(s[8]) + z)), s[9], s[10]], "_")), StringEntry(l, makeString([toString((parseIntValue(n[0]) + q)), toString((parseIntValue(n[1]) + y)), toString((A + y)), toString(((A + y) / d)), toString(i), n[5], n[6], n[7], n[8], n[9], n[10], n[11]], "_"))]
93+                            else {
94+                                let B = split(m(n[7], "0"), "_")
95+                                let C = ((q / 10000) * f)
96+                                if ((B[7] == "0"))
97+                                    then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + q)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((parseIntValue(s[4]) + C)), toString((parseIntValue(s[5]) + 1)), s[6], s[7], toString(((parseIntValue(s[8]) + z) + C)), s[9], s[10]], "_")), StringEntry(l, makeString([toString((parseIntValue(n[0]) + q)), toString((parseIntValue(n[1]) + y)), toString((A + y)), toString(((A + y) / d)), toString(i), n[5], n[6], n[7], n[8], n[9], n[10], n[11]], "_")), StringEntry(n[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_"))]
98+                                    else {
99+                                        let D = split(m(B[7], "0"), "_")
100+                                        let E = ((q / 10000) * g)
101+                                        if ((D[7] == "0"))
102+                                            then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + q)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString(((parseIntValue(s[4]) + C) + E)), toString((parseIntValue(s[5]) + 2)), s[6], s[7], toString((((parseIntValue(s[8]) + z) + C) + E)), s[9], s[10]], "_")), StringEntry(l, makeString([toString((parseIntValue(n[0]) + q)), toString((parseIntValue(n[1]) + y)), toString((A + y)), toString(((A + y) / d)), toString(i), n[5], n[6], n[7], n[8], n[9], n[10], n[11]], "_")), StringEntry(n[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_")), StringEntry(B[7], makeString([D[0], D[1], D[2], D[3], D[4], D[5], D[6], D[7], D[8], toString((parseIntValue(D[9]) + E)), D[10], toString((parseIntValue(D[11]) + E))], "_"))]
103+                                            else {
104+                                                let F = split(m(D[7], "0"), "_")
105+                                                let G = ((q / 10000) * h)
106+[StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + q)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((((parseIntValue(s[4]) + C) + E) + G)), toString((parseIntValue(s[5]) + 3)), s[6], s[7], toString(((((parseIntValue(s[8]) + z) + C) + E) + G)), s[9], s[10]], "_")), StringEntry(l, makeString([toString((parseIntValue(n[0]) + q)), toString((parseIntValue(n[1]) + y)), toString((A + y)), toString(((A + y) / d)), toString(i), n[5], n[6], n[7], n[8], n[9], n[10], n[11]], "_")), StringEntry(n[7], makeString([B[0], B[1], B[2], B[3], B[4], B[5], B[6], B[7], toString((parseIntValue(B[8]) + C)), B[9], B[10], toString((parseIntValue(B[11]) + C))], "_")), StringEntry(B[7], makeString([D[0], D[1], D[2], D[3], D[4], D[5], D[6], D[7], D[8], toString((parseIntValue(D[9]) + E)), D[10], toString((parseIntValue(D[11]) + E))], "_")), StringEntry(D[7], makeString([F[0], F[1], F[2], F[3], F[4], F[5], F[6], F[7], F[8], F[9], toString((parseIntValue(F[10]) + G)), toString((parseIntValue(F[11]) + G))], "_"))]
107+                                                }
108+                                        }
109+                                }
110+                        }
111+                }
99112     }
100113 
101114 
102115 
103-@Callable(q)
116+@Callable(u)
104117 func withdraw (H) = {
105-    let y = n(H)
106-    let k = toBase58String(q.caller.bytes)
107-    let z = split(l(k), "_")
108-    let o = split(i(), "_")
109-    let w = lastBlock.height
110-    let I = parseIntValue(z[4])
111-    let x = parseIntValue(z[2])
112-    let J = parseIntValue(z[3])
113-    let p = parseIntValue(z[11])
118+    let z = r(H)
119+    let l = toBase58String(u.caller.bytes)
120+    let n = split(m(l, "0"), "_")
121+    let s = split(j(), "_")
122+    let I = parseIntValue(n[4])
123+    let y = parseIntValue(n[2])
124+    let J = parseIntValue(n[3])
125+    let t = parseIntValue(n[11])
114126     let K = (I + d)
115-    let L = if ((w >= K))
116-        then (x + p)
117-        else ((((d - K) + w) * J) + p)
118-    if ((0 > y))
127+    let L = if ((i >= K))
128+        then (y + t)
129+        else ((((d - K) + i) * J) + t)
130+    if ((0 >= z))
119131         then throw("Can't withdraw negative amount")
120-        else if ((p >= y))
121-            then [StringEntry("statistic", makeString([o[0], o[1], o[2], toString((parseIntValue(o[3]) + 1)), o[4], o[5], toString((parseIntValue(o[6]) + y)), o[7], o[8]], "_")), StringEntry(k, makeString([z[0], z[1], z[2], z[3], z[4], toString((parseIntValue(z[5]) + y)), toString((parseIntValue(z[6]) + y)), z[7], z[8], z[9], z[10], toString((parseIntValue(z[11]) - y))], "_")), ScriptTransfer(q.caller, y, a)]
122-            else if ((0 > (L - y)))
123-                then throw(((((((((((((((("h" + toString(w)) + " / j") + toString(I)) + " / x") + toString(x)) + " / d") + toString(J)) + " / b") + toString(p)) + " / g") + toString(K)) + " / m") + toString(L)) + " / ((f-g+h)*d)+b ") + toString(((((d - K) + w) * J) + p))))
124-                else throw(((((((((((((((("h" + toString(w)) + " / j") + toString(I)) + " / x") + toString(x)) + " / d") + toString(J)) + " / b") + toString(p)) + " / g") + toString(K)) + " / m") + toString(L)) + " / ((f-g+h)*d)+b ") + toString(((((d - K) + w) * J) + p))))
132+        else if ((t >= z))
133+            then [StringEntry("statistic", makeString([s[0], s[1], s[2], toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + z)), s[7], s[8], s[9], s[10]], "_")), StringEntry(l, makeString([n[0], n[1], n[2], n[3], n[4], toString((parseIntValue(n[5]) + z)), toString((parseIntValue(n[6]) + z)), n[7], n[8], n[9], n[10], toString((parseIntValue(n[11]) - z))], "_")), ScriptTransfer(u.caller, z, a)]
134+            else if ((0 > (L - z)))
135+                then throw("Not enough balance")
136+                else {
137+                    let M = ((y + t) - z)
138+[StringEntry("statistic", makeString([s[0], s[1], toString(((parseIntValue(s[2]) + z) - parseIntValue(n[11]))), toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + parseIntValue(n[11]))), s[7], s[8], s[9], s[10]], "_")), StringEntry(l, makeString([n[0], n[1], toString(M), n[3], n[4], toString((parseIntValue(n[5]) + z)), toString((parseIntValue(n[6]) + z)), n[7], n[8], n[9], (n[10] + "_0")], "_")), ScriptTransfer(u.caller, z, a)]
139+                    }
125140     }
126141 
127142 
128-@Verifier(M)
129-func N () = {
130-    let j = M
131-    if ($isInstanceOf(j, "SetScriptTransaction"))
143+
144+@Callable(u)
145+func Marketing (H) = {
146+    let z = r(H)
147+    let l = toBase58String(u.caller.bytes)
148+    let s = split(j(), "_")
149+    if ((0 >= z))
150+        then throw("Can't withdraw negative amount")
151+        else if ((z > 10000))
152+            then throw("Not enough balance")
153+            else [StringEntry("statistic", makeString([s[0], s[1], s[2], s[3], s[4], s[5], s[6], s[7], s[8], s[9], s[10]], "_")), ScriptTransfer(u.caller, z, a)]
154+    }
155+
156+
157+@Verifier(N)
158+func O () = {
159+    let k = N
160+    if ($isInstanceOf(k, "SetScriptTransaction"))
132161         then {
133-            let J = j
134-            sigVerify(M.bodyBytes, M.proofs[0], b)
162+            let J = k
163+            sigVerify(N.bodyBytes, N.proofs[0], b)
135164             }
136165         else true
137166     }
138167 
github/deemru/w8io/6500d08 
81.86 ms ◑