w8 · tx · ALD···Sga

tx · ALDjPAiGt8oRiX2Xj9K4jBK1iK94CeNnj414EScriSga

3MpKmkFmjoGLpPWhScheYrN7fjdJAFp9tEX:  -0.01400000 Waves

2020.10.12 20:35 [1217644] smart account 3MpKmkFmjoGLpPWhScheYrN7fjdJAFp9tEX > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "ALDjPAiGt8oRiX2Xj9K4jBK1iK94CeNnj414EScriSga",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1602524135445,
    "version": 2,
    "chainId": 84,
    "sender": "3MpKmkFmjoGLpPWhScheYrN7fjdJAFp9tEX",
    "senderPublicKey": "33Gr5uEJMDMKdRs25QUDvTeQ7q5EpGcAdPztrFvQWdv9",
    "proofs": [
        "2z4Z9KXKgCjwyk7UcAELC1C4gC8uGioFxyTDpisjZVv1m7VV2f3ZiaYYyGfD9DvoCeLE24B4WJ1P6xbN2jjKWVy8"
    ],
    "script": "base64:AAIEAAAAAAAAAAkIAhIAEgMKAQEAAAAIAAAAAAJhcgIAAAAjM04yaEhhcUVFWGpGSEU1RzhOVHc2djdLTk13Y0hvYjJFbmEAAAAAAWYAAAAAAAAAAGQAAAAAAXAAAAAAAAAAABQAAAAAA3ByMQAAAAAAAAAAAwAAAAADcHIyAAAAAAAAAAACAAAAAANwcjMAAAAAAAAAAAEBAAAADGdldFN0YXRpc3RpYwAAAAAEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwIAAAAJc3RhdGlzdGljAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWECAAAAETBfMF8wXzBfMF8wXzBfMF8wAQAAAAdnZXRVc2VyAAAAAQAAAAR1c2VyBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMFAAAABHVzZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQIAAAAXMF8wXzBfMF8wXzBfMF8wXzBfMF8wXzAAAAACAAAAAWkBAAAAB2RlcG9zaXQAAAAABAAAAAF0CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAF6CAUAAAABdAAAAAZhbW91bnQDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAAXQAAAAHYXNzZXRJZAkAAAIAAAABAgAAACFjYW4gaG9kbCB3YXZlcyBvbmx5IGF0IHRoZSBtb21lbnQEAAAAAWEJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAABcwkABLUAAAACCQEAAAAMZ2V0U3RhdGlzdGljAAAAAAIAAAABXwMJAAAAAAAAAgUAAAABYQUAAAACYXIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAJc3RhdGlzdGljCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABAkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAUJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAGCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAABwUAAAABegkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAgFAAAAA25pbAIAAAABXwUAAAADbmlsBAAAAAFoCAUAAAAJbGFzdEJsb2NrAAAABmhlaWdodAQAAAABeAkAAGgAAAACCQAAaQAAAAIFAAAAAXoAAAAAAAAAAGQJAABkAAAAAgAAAAAAAAAAZAUAAAABcAQAAAABeQkAAGUAAAACBQAAAAF4BQAAAAF6BAAAAAF1CQAEtQAAAAIJAQAAAAdnZXRVc2VyAAAAAQUAAAABYQIAAAABXwQAAAADdWQyCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAAAgMJAAAAAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAHAgAAAAEwCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAACXN0YXRpc3RpYwkABLkAAAACCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAAAAUAAAABegkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAEAAAAAAAAAAAEJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAACCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAAAwkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAQJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAFCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABgkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAcJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAIBQAAAAF5BQAAAANuaWwCAAAAAV8JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAABYQkABLkAAAACCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAAAAUAAAABegkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAEFAAAAAXgJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIFAAAAA3VkMgUAAAABeAkABEwAAAACCQABpAAAAAEJAABpAAAAAgkAAGQAAAACBQAAAAN1ZDIFAAAAAXgFAAAAAWYJAARMAAAAAgkAAaQAAAABBQAAAAFoCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABQkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAHCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACAkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAkJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAKCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACwUAAAADbmlsAgAAAAFfBQAAAANuaWwEAAAAAnIxCQAEtQAAAAIJAQAAAAdnZXRVc2VyAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAAHAgAAAAFfBAAAAANzcjEJAABoAAAAAgkAAGkAAAACBQAAAAF6AAAAAAAAAABkBQAAAANwcjEDCQAAAAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAcCAAAAATAJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAJc3RhdGlzdGljCQAEuQAAAAIJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAABQAAAAF6CQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAAAQAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAADCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAABAUAAAADc3IxCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAABQAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAHCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAIBQAAAAF5BQAAAANzcjEFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAFhCQAEuQAAAAIJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAAABQAAAAF6CQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAAAQUAAAABeAkABEwAAAACCQABpAAAAAEJAABkAAAAAgUAAAADdWQyBQAAAAF4CQAETAAAAAIJAAGkAAAAAQkAAGkAAAACCQAAZAAAAAIFAAAAA3VkMgUAAAABeAUAAAABZgkABEwAAAACCQABpAAAAAEFAAAAAWgJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAFCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABgkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAcJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAICQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACQkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAoJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAALBQAAAANuaWwCAAAAAV8JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAHCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAAAAkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAAAwkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAECQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAUJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAABgkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAHCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAgFAAAAA3NyMQkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAJCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAoJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJyMQAAAAAAAAAACwUAAAADc3IxBQAAAANuaWwCAAAAAV8FAAAAA25pbAQAAAACcjIJAAS1AAAAAgkBAAAAB2dldFVzZXIAAAABCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAHAgAAAAFfBAAAAANzcjIJAABoAAAAAgkAAGkAAAACBQAAAAF6AAAAAAAAAABkBQAAAANwcjIDCQAAAAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAcCAAAAATAJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAJc3RhdGlzdGljCQAEuQAAAAIJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAABQAAAAF6CQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAAAQAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAADCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAEBQAAAANzcjEFAAAAA3NyMgkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAUAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAGCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABwkABEwAAAACCQABpAAAAAEJAABkAAAAAgkAAGQAAAACCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAIBQAAAAF5BQAAAANzcjEFAAAAA3NyMgUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAWEJAAS5AAAAAgkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAAFAAAAAXoJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAABBQAAAAF4CQAETAAAAAIJAAGkAAAAAQkAAGQAAAACBQAAAAN1ZDIFAAAAAXgJAARMAAAAAgkAAaQAAAABCQAAaQAAAAIJAABkAAAAAgUAAAADdWQyBQAAAAF4BQAAAAFmCQAETAAAAAIJAAGkAAAAAQUAAAABaAkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAUJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAGCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABwkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAgJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAJCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACgkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAsFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAcJAAS5AAAAAgkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAEJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAAAgkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAQJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAABQkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAGCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAcJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJyMQAAAAAAAAAACAUAAAADc3IxCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAkJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAACgkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAnIxAAAAAAAAAAALBQAAAANzcjEFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAHCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAAAAkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAAAwkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAECQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAUJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAABgkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAHCQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAgJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJyMgAAAAAAAAAACQUAAAADc3IyCQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAoJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJyMgAAAAAAAAAACwUAAAADc3IyBQAAAANuaWwCAAAAAV8FAAAAA25pbAQAAAACcjMJAAS1AAAAAgkBAAAAB2dldFVzZXIAAAABCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAHAgAAAAFfBAAAAANzcjMJAABoAAAAAgkAAGkAAAACBQAAAAF6AAAAAAAAAABkBQAAAANwcjMJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAJc3RhdGlzdGljCQAEuQAAAAIJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAABQAAAAF6CQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABcwAAAAAAAAAAAQAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAADCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQAAZAAAAAIJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAQFAAAAA3NyMQUAAAADc3IyBQAAAANzcjMJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAFAAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABgkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAcJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAABkAAAAAgkAAGQAAAACCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAAIBQAAAAF5BQAAAANzcjEFAAAAA3NyMgUAAAADc3IzBQAAAANuaWwCAAAAAV8JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAABYQkABLkAAAACCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAAAAUAAAABegkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAEFAAAAAXgJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIFAAAAA3VkMgUAAAABeAkABEwAAAACCQABpAAAAAEJAABpAAAAAgkAAGQAAAACBQAAAAN1ZDIFAAAAAXgFAAAAAWYJAARMAAAAAgkAAaQAAAABBQAAAAFoCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABQkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAHCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACAkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAkJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAKCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACwUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABwkABLkAAAACCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAAJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAAAQkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAACCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAMJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAABAkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAFCQAETAAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAYJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAABwkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAIBQAAAANzcjEJAARMAAAAAgkAAZEAAAACBQAAAAJyMQAAAAAAAAAACQkABEwAAAACCQABkQAAAAIFAAAAAnIxAAAAAAAAAAAKCQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAsFAAAAA3NyMQUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAGRAAAAAgUAAAACcjEAAAAAAAAAAAcJAAS5AAAAAgkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAEJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAAAgkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAQJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAABQkABEwAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAGCQAETAAAAAIJAAGRAAAAAgUAAAACcjIAAAAAAAAAAAcJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAACAkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAJBQAAAANzcjIJAARMAAAAAgkAAZEAAAACBQAAAAJyMgAAAAAAAAAACgkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAnIyAAAAAAAAAAALBQAAAANzcjIFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABkQAAAAIFAAAAAnIyAAAAAAAAAAAHCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAJyMwAAAAAAAAAAAAkABEwAAAACCQABkQAAAAIFAAAAAnIzAAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAACcjMAAAAAAAAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAJyMwAAAAAAAAAAAwkABEwAAAACCQABkQAAAAIFAAAAAnIzAAAAAAAAAAAECQAETAAAAAIJAAGRAAAAAgUAAAACcjMAAAAAAAAAAAUJAARMAAAAAgkAAZEAAAACBQAAAAJyMwAAAAAAAAAABgkABEwAAAACCQABkQAAAAIFAAAAAnIzAAAAAAAAAAAHCQAETAAAAAIJAAGRAAAAAgUAAAACcjMAAAAAAAAAAAgJAARMAAAAAgkAAZEAAAACBQAAAAJyMwAAAAAAAAAACQkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAnIzAAAAAAAAAAAKBQAAAANzcjMJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAJyMwAAAAAAAAAACwUAAAADc3IzBQAAAANuaWwCAAAAAV8FAAAAA25pbAAAAAFpAQAAAAh3aXRoZHJhdwAAAAEAAAABeQQAAAABYQkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAF1CQAEtQAAAAIJAQAAAAdnZXRVc2VyAAAAAQUAAAABYQIAAAABXwQAAAABcwkABLUAAAACCQEAAAAMZ2V0U3RhdGlzdGljAAAAAAIAAAABXwQAAAABaAgFAAAACWxhc3RCbG9jawAAAAZoZWlnaHQEAAAAAWoJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAABBAAAAAF4CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAAAgQAAAABZAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAMEAAAAAWIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAALBAAAAAFnCQAAZAAAAAIFAAAAAWoFAAAAAWYEAAAAAW0DCQAAZwAAAAIFAAAAAWgFAAAAAWcJAABkAAAAAgUAAAABeAUAAAABYgkAAGQAAAACCQAAaAAAAAIFAAAAAWQJAABlAAAAAgkAAGUAAAACBQAAAAFmBQAAAAFnBQAAAAFoBQAAAAFiAwkAAGYAAAACAAAAAAAAAAAABQAAAAF5CQAAAgAAAAECAAAAHkNhbid0IHdpdGhkcmF3IG5lZ2F0aXZlIGFtb3VudAMJAABnAAAAAgUAAAABYgUAAAABeQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAlzdGF0aXN0aWMJAAS5AAAAAgkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAAJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAAAgkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAMAAAAAAAAAAAEJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAECQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABQkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAYFAAAAAXkJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAHCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAACAUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAWEJAAS5AAAAAgkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAAJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAABCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAAAgkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAMJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAECQAETAAAAAIJAAGkAAAAAQkAAGQAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAABQUAAAABeQkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAYFAAAAAXkJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAHCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAACAkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAkJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAKCQAETAAAAAIJAAGkAAAAAQkAAGUAAAACCQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAACwUAAAABeQUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAABeQUAAAAEdW5pdAUAAAADbmlsAwkAAGYAAAACAAAAAAAAAAAACQAAZQAAAAIFAAAAAW0FAAAAAXkJAAACAAAAAQIAAAASTm90IGVub3VnaCBiYWxhbmNlBAAAAAFuCQAAZQAAAAIJAABkAAAAAgUAAAABeAUAAAABYgUAAAABeQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAlzdGF0aXN0aWMJAAS5AAAAAgkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAAJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAABCQAETAAAAAIJAAGkAAAAAQkAAGUAAAACCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAFzAAAAAAAAAAACBQAAAAF5CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAABdQAAAAAAAAAACwkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAMAAAAAAAAAAAEJAARMAAAAAgkAAZEAAAACBQAAAAFzAAAAAAAAAAAECQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABQkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXMAAAAAAAAAAAYJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAALCQAETAAAAAIJAAGRAAAAAgUAAAABcwAAAAAAAAAABwkABEwAAAACCQABkQAAAAIFAAAAAXMAAAAAAAAAAAgFAAAAA25pbAIAAAABXwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAFhCQAEuQAAAAIJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAACQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAAAQkABEwAAAACCQABpAAAAAEFAAAAAW4JAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAADCQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABAkABEwAAAACCQABpAAAAAEJAABkAAAAAgkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAAAXUAAAAAAAAAAAUFAAAAAXkJAARMAAAAAgkAAaQAAAABCQAAZAAAAAIJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAF1AAAAAAAAAAAGBQAAAAF5CQAETAAAAAIJAAGRAAAAAgUAAAABdQAAAAAAAAAABwkABEwAAAACCQABkQAAAAIFAAAAAXUAAAAAAAAAAAgJAARMAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAJCQAETAAAAAIJAAEsAAAAAgkAAZEAAAACBQAAAAF1AAAAAAAAAAAKAgAAAAJfMAUAAAADbmlsAgAAAAFfCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAABeQUAAAAEdW5pdAUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAFFNldFNjcmlwdFRyYW5zYWN0aW9uBAAAAAFkBQAAAAckbWF0Y2gwCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAEAAAAgHkxz8qzFYQy/gEmjfxlkGkg1N6RMNBT1/p4yXLb8QTIGuFiToQ==",
    "height": 1217644,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BK3adjmCZRo7muTam5XHzKW7gqEoydxjKaudwE94yZrt
Next: HfeL95csdtAB9M2oQApv7YAh4KaUoh4yqyU8g6e7sEWX

Diff: 
Old New Differences
1 - {-# STDLIB_VERSION 3 #-}
1 + {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let ar = "3N2hHaqEEXjFHE5G8NTw6v7KNMwcHob2Ena"
31 31  
32 32  @Callable(i)
33 33  func deposit () = {
34 -     let t = extract(i.payment)
34 +     let t = value(i.payments[0])
35 35      let z = t.amount
36 36      if (isDefined(t.assetId))
37 37          then throw("can hodl waves only at the moment")
39 39              let a = toBase58String(i.caller.bytes)
40 40              let s = split(getStatistic(), "_")
41 41              if ((a == ar))
42 -                 then WriteSet([DataEntry("statistic", ((((((((((((((((s[0] + "_") + s[1]) + "_") + s[2]) + "_") + s[3]) + "_") + s[4]) + "_") + s[5]) + "_") + s[6]) + "_") + toString((parseIntValue(s[7]) + z))) + "_") + s[8]))])
42 +                 then [StringEntry("statistic", makeString([s[0], s[1], s[2], s[3], s[4], s[5], s[6], toString((parseIntValue(s[7]) + z)), s[8]], "_"))]
43 43                  else {
44 44                      let h = lastBlock.height
45 45                      let x = ((z / 100) * (100 + p))
47 47                      let u = split(getUser(a), "_")
48 48                      let ud2 = parseIntValue(u[2])
49 49                      if ((u[7] == "0"))
50 -                         then WriteSet([DataEntry("statistic", ((((((((((((((((toString((parseIntValue(s[0]) + z)) + "_") + toString((parseIntValue(s[1]) + 1))) + "_") + s[2]) + "_") + s[3]) + "_") + s[4]) + "_") + s[5]) + "_") + s[6]) + "_") + s[7]) + "_") + toString((parseIntValue(s[8]) + y)))), DataEntry(a, ((((((((((((((((((((((toString((parseIntValue(u[0]) + z)) + "_") + toString((parseIntValue(u[1]) + x))) + "_") + toString((ud2 + x))) + "_") + toString(((ud2 + x) / f))) + "_") + toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11]))])
50 +                         then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], s[4], s[5], s[6], s[7], toString((parseIntValue(s[8]) + y))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_"))]
51 51                          else {
52 52                              let r1 = split(getUser(u[7]), "_")
53 53                              let sr1 = ((z / 100) * pr1)
54 54                              if ((r1[7] == "0"))
55 -                                 then WriteSet([DataEntry("statistic", ((((((((((((((((toString((parseIntValue(s[0]) + z)) + "_") + toString((parseIntValue(s[1]) + 1))) + "_") + s[2]) + "_") + s[3]) + "_") + toString((parseIntValue(s[4]) + sr1))) + "_") + toString((parseIntValue(s[5]) + 1))) + "_") + s[6]) + "_") + s[7]) + "_") + toString(((parseIntValue(s[8]) + y) + sr1)))), DataEntry(a, ((((((((((((((((((((((toString((parseIntValue(u[0]) + z)) + "_") + toString((parseIntValue(u[1]) + x))) + "_") + toString((ud2 + x))) + "_") + toString(((ud2 + x) / f))) + "_") + toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])), DataEntry(u[7], ((((((((((((((((((((((r1[0] + "_") + r1[1]) + "_") + r1[2]) + "_") + r1[3]) + "_") + r1[4]) + "_") + r1[5]) + "_") + r1[6]) + "_") + r1[7]) + "_") + toString((parseIntValue(r1[8]) + sr1))) + "_") + r1[9]) + "_") + r1[10]) + "_") + toString((parseIntValue(r1[11]) + sr1))))])
55 +                                 then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((parseIntValue(s[4]) + sr1)), toString((parseIntValue(s[5]) + 1)), s[6], s[7], toString(((parseIntValue(s[8]) + y) + sr1))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_"))]
56 56                                  else {
57 57                                      let r2 = split(getUser(r1[7]), "_")
58 58                                      let sr2 = ((z / 100) * pr2)
59 59                                      if ((r2[7] == "0"))
60 -                                         then WriteSet([DataEntry("statistic", ((((((((((((((((toString((parseIntValue(s[0]) + z)) + "_") + toString((parseIntValue(s[1]) + 1))) + "_") + s[2]) + "_") + s[3]) + "_") + toString(((parseIntValue(s[4]) + sr1) + sr2))) + "_") + toString((parseIntValue(s[5]) + 2))) + "_") + s[6]) + "_") + s[7]) + "_") + toString((((parseIntValue(s[8]) + y) + sr1) + sr2)))), DataEntry(a, ((((((((((((((((((((((toString((parseIntValue(u[0]) + z)) + "_") + toString((parseIntValue(u[1]) + x))) + "_") + toString((ud2 + x))) + "_") + toString(((ud2 + x) / f))) + "_") + toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])), DataEntry(u[7], ((((((((((((((((((((((r1[0] + "_") + r1[1]) + "_") + r1[2]) + "_") + r1[3]) + "_") + r1[4]) + "_") + r1[5]) + "_") + r1[6]) + "_") + r1[7]) + "_") + toString((parseIntValue(r1[8]) + sr1))) + "_") + r1[9]) + "_") + r1[10]) + "_") + toString((parseIntValue(r1[11]) + sr1)))), DataEntry(r1[7], ((((((((((((((((((((((r2[0] + "_") + r2[1]) + "_") + r2[2]) + "_") + r2[3]) + "_") + r2[4]) + "_") + r2[5]) + "_") + r2[6]) + "_") + r2[7]) + "_") + r2[8]) + "_") + toString((parseIntValue(r2[9]) + sr2))) + "_") + r2[10]) + "_") + toString((parseIntValue(r2[11]) + sr2))))])
60 +                                         then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString(((parseIntValue(s[4]) + sr1) + sr2)), toString((parseIntValue(s[5]) + 2)), s[6], s[7], toString((((parseIntValue(s[8]) + y) + sr1) + sr2))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_")), StringEntry(r1[7], makeString([r2[0], r2[1], r2[2], r2[3], r2[4], r2[5], r2[6], r2[7], r2[8], toString((parseIntValue(r2[9]) + sr2)), r2[10], toString((parseIntValue(r2[11]) + sr2))], "_"))]
61 61                                          else {
62 62                                              let r3 = split(getUser(r2[7]), "_")
63 63                                              let sr3 = ((z / 100) * pr3)
64 -                                             WriteSet([DataEntry("statistic", ((((((((((((((((toString((parseIntValue(s[0]) + z)) + "_") + toString((parseIntValue(s[1]) + 1))) + "_") + s[2]) + "_") + s[3]) + "_") + toString((((parseIntValue(s[4]) + sr1) + sr2) + sr3))) + "_") + toString((parseIntValue(s[5]) + 3))) + "_") + s[6]) + "_") + s[7]) + "_") + toString(((((parseIntValue(s[8]) + y) + sr1) + sr2) + sr3)))), DataEntry(a, ((((((((((((((((((((((toString((parseIntValue(u[0]) + z)) + "_") + toString((parseIntValue(u[1]) + x))) + "_") + toString((ud2 + x))) + "_") + toString(((ud2 + x) / f))) + "_") + toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])), DataEntry(u[7], ((((((((((((((((((((((r1[0] + "_") + r1[1]) + "_") + r1[2]) + "_") + r1[3]) + "_") + r1[4]) + "_") + r1[5]) + "_") + r1[6]) + "_") + r1[7]) + "_") + toString((parseIntValue(r1[8]) + sr1))) + "_") + r1[9]) + "_") + r1[10]) + "_") + toString((parseIntValue(r1[11]) + sr1)))), DataEntry(r1[7], ((((((((((((((((((((((r2[0] + "_") + r2[1]) + "_") + r2[2]) + "_") + r2[3]) + "_") + r2[4]) + "_") + r2[5]) + "_") + r2[6]) + "_") + r2[7]) + "_") + r2[8]) + "_") + toString((parseIntValue(r2[9]) + sr2))) + "_") + r2[10]) + "_") + toString((parseIntValue(r2[11]) + sr2)))), DataEntry(r2[7], ((((((((((((((((((((((r3[0] + "_") + r3[1]) + "_") + r3[2]) + "_") + r3[3]) + "_") + r3[4]) + "_") + r3[5]) + "_") + r3[6]) + "_") + r3[7]) + "_") + r3[8]) + "_") + r3[9]) + "_") + toString((parseIntValue(r3[10]) + sr3))) + "_") + toString((parseIntValue(r3[11]) + sr3))))])
64 + [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((((parseIntValue(s[4]) + sr1) + sr2) + sr3)), toString((parseIntValue(s[5]) + 3)), s[6], s[7], toString(((((parseIntValue(s[8]) + y) + sr1) + sr2) + sr3))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_")), StringEntry(r1[7], makeString([r2[0], r2[1], r2[2], r2[3], r2[4], r2[5], r2[6], r2[7], r2[8], toString((parseIntValue(r2[9]) + sr2)), r2[10], toString((parseIntValue(r2[11]) + sr2))], "_")), StringEntry(r2[7], makeString([r3[0], r3[1], r3[2], r3[3], r3[4], r3[5], r3[6], r3[7], r3[8], r3[9], toString((parseIntValue(r3[10]) + sr3)), toString((parseIntValue(r3[11]) + sr3))], "_"))]
65 65                                              }
66 66                                      }
67 67                              }
88 88      if ((0 > y))
89 89          then throw("Can't withdraw negative amount")
90 90          else if ((b >= y))
91 -             then ScriptResult(WriteSet([DataEntry("statistic", ((((((((((((((((s[0] + "_") + s[1]) + "_") + s[2]) + "_") + toString((parseIntValue(s[3]) + 1))) + "_") + s[4]) + "_") + s[5]) + "_") + toString((parseIntValue(s[6]) + y))) + "_") + s[7]) + "_") + s[8])), DataEntry(a, ((((((((((((((((((((((u[0] + "_") + u[1]) + "_") + u[2]) + "_") + u[3]) + "_") + u[4]) + "_") + toString((parseIntValue(u[5]) + y))) + "_") + toString((parseIntValue(u[6]) + y))) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + toString((parseIntValue(u[11]) - y))))]), TransferSet([ScriptTransfer(i.caller, y, unit)]))
91 +             then [StringEntry("statistic", makeString([s[0], s[1], s[2], toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + y)), s[7], s[8]], "_")), StringEntry(a, makeString([u[0], u[1], u[2], u[3], u[4], toString((parseIntValue(u[5]) + y)), toString((parseIntValue(u[6]) + y)), u[7], u[8], u[9], u[10], toString((parseIntValue(u[11]) - y))], "_")), ScriptTransfer(i.caller, y, unit)]
92 92              else if ((0 > (m - y)))
93 93                  then throw("Not enough balance")
94 94                  else {
95 95                      let n = ((x + b) - y)
96 -                     ScriptResult(WriteSet([DataEntry("statistic", ((((((((((((((((s[0] + "_") + s[1]) + "_") + toString(((parseIntValue(s[2]) + y) - parseIntValue(u[11])))) + "_") + toString((parseIntValue(s[3]) + 1))) + "_") + s[4]) + "_") + s[5]) + "_") + toString((parseIntValue(s[6]) + parseIntValue(u[11])))) + "_") + s[7]) + "_") + s[8])), DataEntry(a, (((((((((((((((((((((u[0] + "_") + u[1]) + "_") + toString(n)) + "_") + u[3]) + "_") + u[4]) + "_") + toString((parseIntValue(u[5]) + y))) + "_") + toString((parseIntValue(u[6]) + y))) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_0"))]), TransferSet([ScriptTransfer(i.caller, y, unit)]))
96 + [StringEntry("statistic", makeString([s[0], s[1], toString(((parseIntValue(s[2]) + y) - parseIntValue(u[11]))), toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + parseIntValue(u[11]))), s[7], s[8]], "_")), StringEntry(a, makeString([u[0], u[1], toString(n), u[3], u[4], toString((parseIntValue(u[5]) + y)), toString((parseIntValue(u[6]) + y)), u[7], u[8], u[9], (u[10] + "_0")], "_")), ScriptTransfer(i.caller, y, unit)]
97 97                      }
98 98      }
99 99  
Full: 
Old New Differences
1 - {-# STDLIB_VERSION 3 #-}
1 + {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let ar = "3N2hHaqEEXjFHE5G8NTw6v7KNMwcHob2Ena"
5 5  
6 6  let f = 100
7 7  
8 8  let p = 20
9 9  
10 10  let pr1 = 3
11 11  
12 12  let pr2 = 2
13 13  
14 14  let pr3 = 1
15 15  
16 16  func getStatistic () = match getString(this, "statistic") {
17 17      case a: String => 
18 18          a
19 19      case _ => 
20 20          "0_0_0_0_0_0_0_0_0"
21 21  }
22 22  
23 23  
24 24  func getUser (user) = match getString(this, user) {
25 25      case a: String => 
26 26          a
27 27      case _ => 
28 28          "0_0_0_0_0_0_0_0_0_0_0_0"
29 29  }
30 30  
31 31  
32 32  @Callable(i)
33 33  func deposit () = {
34 -     let t = extract(i.payment)
34 +     let t = value(i.payments[0])
35 35      let z = t.amount
36 36      if (isDefined(t.assetId))
37 37          then throw("can hodl waves only at the moment")
38 38          else {
39 39              let a = toBase58String(i.caller.bytes)
40 40              let s = split(getStatistic(), "_")
41 41              if ((a == ar))
42 -                 then WriteSet([DataEntry("statistic", ((((((((((((((((s[0] + "_") + s[1]) + "_") + s[2]) + "_") + s[3]) + "_") + s[4]) + "_") + s[5]) + "_") + s[6]) + "_") + toString((parseIntValue(s[7]) + z))) + "_") + s[8]))])
42 +                 then [StringEntry("statistic", makeString([s[0], s[1], s[2], s[3], s[4], s[5], s[6], toString((parseIntValue(s[7]) + z)), s[8]], "_"))]
43 43                  else {
44 44                      let h = lastBlock.height
45 45                      let x = ((z / 100) * (100 + p))
46 46                      let y = (x - z)
47 47                      let u = split(getUser(a), "_")
48 48                      let ud2 = parseIntValue(u[2])
49 49                      if ((u[7] == "0"))
50 -                         then WriteSet([DataEntry("statistic", ((((((((((((((((toString((parseIntValue(s[0]) + z)) + "_") + toString((parseIntValue(s[1]) + 1))) + "_") + s[2]) + "_") + s[3]) + "_") + s[4]) + "_") + s[5]) + "_") + s[6]) + "_") + s[7]) + "_") + toString((parseIntValue(s[8]) + y)))), DataEntry(a, ((((((((((((((((((((((toString((parseIntValue(u[0]) + z)) + "_") + toString((parseIntValue(u[1]) + x))) + "_") + toString((ud2 + x))) + "_") + toString(((ud2 + x) / f))) + "_") + toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11]))])
50 +                         then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], s[4], s[5], s[6], s[7], toString((parseIntValue(s[8]) + y))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_"))]
51 51                          else {
52 52                              let r1 = split(getUser(u[7]), "_")
53 53                              let sr1 = ((z / 100) * pr1)
54 54                              if ((r1[7] == "0"))
55 -                                 then WriteSet([DataEntry("statistic", ((((((((((((((((toString((parseIntValue(s[0]) + z)) + "_") + toString((parseIntValue(s[1]) + 1))) + "_") + s[2]) + "_") + s[3]) + "_") + toString((parseIntValue(s[4]) + sr1))) + "_") + toString((parseIntValue(s[5]) + 1))) + "_") + s[6]) + "_") + s[7]) + "_") + toString(((parseIntValue(s[8]) + y) + sr1)))), DataEntry(a, ((((((((((((((((((((((toString((parseIntValue(u[0]) + z)) + "_") + toString((parseIntValue(u[1]) + x))) + "_") + toString((ud2 + x))) + "_") + toString(((ud2 + x) / f))) + "_") + toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])), DataEntry(u[7], ((((((((((((((((((((((r1[0] + "_") + r1[1]) + "_") + r1[2]) + "_") + r1[3]) + "_") + r1[4]) + "_") + r1[5]) + "_") + r1[6]) + "_") + r1[7]) + "_") + toString((parseIntValue(r1[8]) + sr1))) + "_") + r1[9]) + "_") + r1[10]) + "_") + toString((parseIntValue(r1[11]) + sr1))))])
55 +                                 then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((parseIntValue(s[4]) + sr1)), toString((parseIntValue(s[5]) + 1)), s[6], s[7], toString(((parseIntValue(s[8]) + y) + sr1))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_"))]
56 56                                  else {
57 57                                      let r2 = split(getUser(r1[7]), "_")
58 58                                      let sr2 = ((z / 100) * pr2)
59 59                                      if ((r2[7] == "0"))
60 -                                         then WriteSet([DataEntry("statistic", ((((((((((((((((toString((parseIntValue(s[0]) + z)) + "_") + toString((parseIntValue(s[1]) + 1))) + "_") + s[2]) + "_") + s[3]) + "_") + toString(((parseIntValue(s[4]) + sr1) + sr2))) + "_") + toString((parseIntValue(s[5]) + 2))) + "_") + s[6]) + "_") + s[7]) + "_") + toString((((parseIntValue(s[8]) + y) + sr1) + sr2)))), DataEntry(a, ((((((((((((((((((((((toString((parseIntValue(u[0]) + z)) + "_") + toString((parseIntValue(u[1]) + x))) + "_") + toString((ud2 + x))) + "_") + toString(((ud2 + x) / f))) + "_") + toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])), DataEntry(u[7], ((((((((((((((((((((((r1[0] + "_") + r1[1]) + "_") + r1[2]) + "_") + r1[3]) + "_") + r1[4]) + "_") + r1[5]) + "_") + r1[6]) + "_") + r1[7]) + "_") + toString((parseIntValue(r1[8]) + sr1))) + "_") + r1[9]) + "_") + r1[10]) + "_") + toString((parseIntValue(r1[11]) + sr1)))), DataEntry(r1[7], ((((((((((((((((((((((r2[0] + "_") + r2[1]) + "_") + r2[2]) + "_") + r2[3]) + "_") + r2[4]) + "_") + r2[5]) + "_") + r2[6]) + "_") + r2[7]) + "_") + r2[8]) + "_") + toString((parseIntValue(r2[9]) + sr2))) + "_") + r2[10]) + "_") + toString((parseIntValue(r2[11]) + sr2))))])
60 +                                         then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString(((parseIntValue(s[4]) + sr1) + sr2)), toString((parseIntValue(s[5]) + 2)), s[6], s[7], toString((((parseIntValue(s[8]) + y) + sr1) + sr2))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_")), StringEntry(r1[7], makeString([r2[0], r2[1], r2[2], r2[3], r2[4], r2[5], r2[6], r2[7], r2[8], toString((parseIntValue(r2[9]) + sr2)), r2[10], toString((parseIntValue(r2[11]) + sr2))], "_"))]
61 61                                          else {
62 62                                              let r3 = split(getUser(r2[7]), "_")
63 63                                              let sr3 = ((z / 100) * pr3)
64 -                                             WriteSet([DataEntry("statistic", ((((((((((((((((toString((parseIntValue(s[0]) + z)) + "_") + toString((parseIntValue(s[1]) + 1))) + "_") + s[2]) + "_") + s[3]) + "_") + toString((((parseIntValue(s[4]) + sr1) + sr2) + sr3))) + "_") + toString((parseIntValue(s[5]) + 3))) + "_") + s[6]) + "_") + s[7]) + "_") + toString(((((parseIntValue(s[8]) + y) + sr1) + sr2) + sr3)))), DataEntry(a, ((((((((((((((((((((((toString((parseIntValue(u[0]) + z)) + "_") + toString((parseIntValue(u[1]) + x))) + "_") + toString((ud2 + x))) + "_") + toString(((ud2 + x) / f))) + "_") + toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])), DataEntry(u[7], ((((((((((((((((((((((r1[0] + "_") + r1[1]) + "_") + r1[2]) + "_") + r1[3]) + "_") + r1[4]) + "_") + r1[5]) + "_") + r1[6]) + "_") + r1[7]) + "_") + toString((parseIntValue(r1[8]) + sr1))) + "_") + r1[9]) + "_") + r1[10]) + "_") + toString((parseIntValue(r1[11]) + sr1)))), DataEntry(r1[7], ((((((((((((((((((((((r2[0] + "_") + r2[1]) + "_") + r2[2]) + "_") + r2[3]) + "_") + r2[4]) + "_") + r2[5]) + "_") + r2[6]) + "_") + r2[7]) + "_") + r2[8]) + "_") + toString((parseIntValue(r2[9]) + sr2))) + "_") + r2[10]) + "_") + toString((parseIntValue(r2[11]) + sr2)))), DataEntry(r2[7], ((((((((((((((((((((((r3[0] + "_") + r3[1]) + "_") + r3[2]) + "_") + r3[3]) + "_") + r3[4]) + "_") + r3[5]) + "_") + r3[6]) + "_") + r3[7]) + "_") + r3[8]) + "_") + r3[9]) + "_") + toString((parseIntValue(r3[10]) + sr3))) + "_") + toString((parseIntValue(r3[11]) + sr3))))])
64 + [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((((parseIntValue(s[4]) + sr1) + sr2) + sr3)), toString((parseIntValue(s[5]) + 3)), s[6], s[7], toString(((((parseIntValue(s[8]) + y) + sr1) + sr2) + sr3))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_")), StringEntry(r1[7], makeString([r2[0], r2[1], r2[2], r2[3], r2[4], r2[5], r2[6], r2[7], r2[8], toString((parseIntValue(r2[9]) + sr2)), r2[10], toString((parseIntValue(r2[11]) + sr2))], "_")), StringEntry(r2[7], makeString([r3[0], r3[1], r3[2], r3[3], r3[4], r3[5], r3[6], r3[7], r3[8], r3[9], toString((parseIntValue(r3[10]) + sr3)), toString((parseIntValue(r3[11]) + sr3))], "_"))]
65 65                                              }
66 66                                      }
67 67                              }
68 68                      }
69 69              }
70 70      }
71 71  
72 72  
73 73  
74 74  @Callable(i)
75 75  func withdraw (y) = {
76 76      let a = toBase58String(i.caller.bytes)
77 77      let u = split(getUser(a), "_")
78 78      let s = split(getStatistic(), "_")
79 79      let h = lastBlock.height
80 80      let j = parseIntValue(u[1])
81 81      let x = parseIntValue(u[2])
82 82      let d = parseIntValue(u[3])
83 83      let b = parseIntValue(u[11])
84 84      let g = (j + f)
85 85      let m = if ((h >= g))
86 86          then (x + b)
87 87          else ((d * ((f - g) - h)) + b)
88 88      if ((0 > y))
89 89          then throw("Can't withdraw negative amount")
90 90          else if ((b >= y))
91 -             then ScriptResult(WriteSet([DataEntry("statistic", ((((((((((((((((s[0] + "_") + s[1]) + "_") + s[2]) + "_") + toString((parseIntValue(s[3]) + 1))) + "_") + s[4]) + "_") + s[5]) + "_") + toString((parseIntValue(s[6]) + y))) + "_") + s[7]) + "_") + s[8])), DataEntry(a, ((((((((((((((((((((((u[0] + "_") + u[1]) + "_") + u[2]) + "_") + u[3]) + "_") + u[4]) + "_") + toString((parseIntValue(u[5]) + y))) + "_") + toString((parseIntValue(u[6]) + y))) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + toString((parseIntValue(u[11]) - y))))]), TransferSet([ScriptTransfer(i.caller, y, unit)]))
91 +             then [StringEntry("statistic", makeString([s[0], s[1], s[2], toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + y)), s[7], s[8]], "_")), StringEntry(a, makeString([u[0], u[1], u[2], u[3], u[4], toString((parseIntValue(u[5]) + y)), toString((parseIntValue(u[6]) + y)), u[7], u[8], u[9], u[10], toString((parseIntValue(u[11]) - y))], "_")), ScriptTransfer(i.caller, y, unit)]
92 92              else if ((0 > (m - y)))
93 93                  then throw("Not enough balance")
94 94                  else {
95 95                      let n = ((x + b) - y)
96 -                     ScriptResult(WriteSet([DataEntry("statistic", ((((((((((((((((s[0] + "_") + s[1]) + "_") + toString(((parseIntValue(s[2]) + y) - parseIntValue(u[11])))) + "_") + toString((parseIntValue(s[3]) + 1))) + "_") + s[4]) + "_") + s[5]) + "_") + toString((parseIntValue(s[6]) + parseIntValue(u[11])))) + "_") + s[7]) + "_") + s[8])), DataEntry(a, (((((((((((((((((((((u[0] + "_") + u[1]) + "_") + toString(n)) + "_") + u[3]) + "_") + u[4]) + "_") + toString((parseIntValue(u[5]) + y))) + "_") + toString((parseIntValue(u[6]) + y))) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_0"))]), TransferSet([ScriptTransfer(i.caller, y, unit)]))
96 + [StringEntry("statistic", makeString([s[0], s[1], toString(((parseIntValue(s[2]) + y) - parseIntValue(u[11]))), toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + parseIntValue(u[11]))), s[7], s[8]], "_")), StringEntry(a, makeString([u[0], u[1], toString(n), u[3], u[4], toString((parseIntValue(u[5]) + y)), toString((parseIntValue(u[6]) + y)), u[7], u[8], u[9], (u[10] + "_0")], "_")), ScriptTransfer(i.caller, y, unit)]
97 97                      }
98 98      }
99 99  
100 100  
101 101  @Verifier(tx)
102 102  func verify () = match tx {
103 103      case d: SetScriptTransaction => 
104 104          sigVerify(tx.bodyBytes, tx.proofs[0], base58'33Gr5uEJMDMKdRs25QUDvTeQ7q5EpGcAdPztrFvQWdv9')
105 105      case _ => 
106 106          true
107 107  }
108 108

Old	New		Differences
1		-	{-# STDLIB_VERSION 3 #-}
	1	+	{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let ar = "3N2hHaqEEXjFHE5G8NTw6v7KNMwcHob2Ena"

31	31
32	32		@Callable(i)
33	33		func deposit () = {
34		-	let t = ~~extract~~(i.~~payment~~)
	34	+	let t = value(i.payments[0])
35	35		let z = t.amount
36	36		if (isDefined(t.assetId))
37	37		then throw("can hodl waves only at the moment")

39	39		let a = toBase58String(i.caller.bytes)
40	40		let s = split(getStatistic(), "_")
41	41		if ((a == ar))
42		-	then ~~WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~s[0] ~~+ "_") +~~ s[1]~~) + "_") +~~ s[2]~~) + "_") +~~ s[3]~~) + "_") +~~ s[4]~~) + "_") +~~ s[5]~~) + "_") +~~ s[6]~~) + "_") +~~ toString((parseIntValue(s[7]) + z))~~) +~~ "_") ~~+ s[8])~~)])
	42	+	then [StringEntry("statistic", makeString([s[0], s[1], s[2], s[3], s[4], s[5], s[6], toString((parseIntValue(s[7]) + z)), s[8]], "_"))]
43	43		else {
44	44		let h = lastBlock.height
45	45		let x = ((z / 100) * (100 + p))

47	47		let u = split(getUser(a), "_")
48	48		let ud2 = parseIntValue(u[2])
49	49		if ((u[7] == "0"))
50		-	then ~~WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~toString((parseIntValue(s[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(s[1]) + 1))~~) + "_") +~~ s[2]~~) + "_") +~~ s[3]~~) + "_") +~~ s[4]~~) + "_") +~~ s[5]~~) + "_") +~~ s[6]~~) + "_") +~~ s[7]~~) + "_") +~~ toString((parseIntValue(s[8]) + y)))), ~~DataEntry~~(a, (~~(((((((((((((((((((((~~toString((parseIntValue(u[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(u[1]) + x))~~) + "_") +~~ toString((ud2 + x))~~) + "_") +~~ toString(((ud2 + x) / f))) + "_") ~~+ toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])~~)])
	50	+	then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], s[4], s[5], s[6], s[7], toString((parseIntValue(s[8]) + y))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_"))]
51	51		else {
52	52		let r1 = split(getUser(u[7]), "_")
53	53		let sr1 = ((z / 100) * pr1)
54	54		if ((r1[7] == "0"))
55		-	then ~~WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~toString((parseIntValue(s[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(s[1]) + 1))~~) + "_") +~~ s[2]~~) + "_") +~~ s[3]~~) + "_") +~~ toString((parseIntValue(s[4]) + sr1))~~) + "_") +~~ toString((parseIntValue(s[5]) + 1))~~) + "_") +~~ s[6]~~) + "_") +~~ s[7]~~) + "_") +~~ toString(((parseIntValue(s[8]) + y) + sr1)))), ~~DataEntry~~(a, (~~(((((((((((((((((((((~~toString((parseIntValue(u[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(u[1]) + x))~~) + "_") +~~ toString((ud2 + x))~~) + "_") +~~ toString(((ud2 + x) / f))) + "_") ~~+ toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])~~), ~~DataEntry~~(u[7], (~~(((((((((((((((((((((~~r1[0] ~~+ "_") +~~ r1[1]~~) + "_") +~~ r1[2]~~) + "_") +~~ r1[3]~~) + "_") +~~ r1[4]~~) + "_") +~~ r1[5]~~) + "_") +~~ r1[6]~~) + "_") +~~ r1[7]~~) + "_") +~~ toString((parseIntValue(r1[8]) + sr1))~~) + "_") +~~ r1[9]~~) + "_") +~~ r1[10]~~) + "_") +~~ toString((parseIntValue(r1[11]) + sr1))))])
	55	+	then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((parseIntValue(s[4]) + sr1)), toString((parseIntValue(s[5]) + 1)), s[6], s[7], toString(((parseIntValue(s[8]) + y) + sr1))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_"))]
56	56		else {
57	57		let r2 = split(getUser(r1[7]), "_")
58	58		let sr2 = ((z / 100) * pr2)
59	59		if ((r2[7] == "0"))
60		-	then ~~WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~toString((parseIntValue(s[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(s[1]) + 1))~~) + "_") +~~ s[2]~~) + "_") +~~ s[3]~~) + "_") +~~ toString(((parseIntValue(s[4]) + sr1) + sr2))~~) + "_") +~~ toString((parseIntValue(s[5]) + 2))~~) + "_") +~~ s[6]~~) + "_") +~~ s[7]~~) + "_") +~~ toString((((parseIntValue(s[8]) + y) + sr1) + sr2)))), ~~DataEntry~~(a, (~~(((((((((((((((((((((~~toString((parseIntValue(u[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(u[1]) + x))~~) + "_") +~~ toString((ud2 + x))~~) + "_") +~~ toString(((ud2 + x) / f))) + "_") ~~+ toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])~~), ~~DataEntry~~(u[7], (~~(((((((((((((((((((((~~r1[0] ~~+ "_") +~~ r1[1]~~) + "_") +~~ r1[2]~~) + "_") +~~ r1[3]~~) + "_") +~~ r1[4]~~) + "_") +~~ r1[5]~~) + "_") +~~ r1[6]~~) + "_") +~~ r1[7]~~) + "_") +~~ toString((parseIntValue(r1[8]) + sr1))~~) + "_") +~~ r1[9]~~) + "_") +~~ r1[10]~~) + "_") +~~ toString((parseIntValue(r1[11]) + sr1)))), ~~DataEntry~~(r1[7], (~~(((((((((((((((((((((~~r2[0] ~~+ "_") +~~ r2[1]~~) + "_") +~~ r2[2]~~) + "_") +~~ r2[3]~~) + "_") +~~ r2[4]~~) + "_") +~~ r2[5]~~) + "_") +~~ r2[6]~~) + "_") +~~ r2[7]~~) + "_") +~~ r2[8]~~) + "_") +~~ toString((parseIntValue(r2[9]) + sr2))~~) + "_") +~~ r2[10]~~) + "_") +~~ toString((parseIntValue(r2[11]) + sr2))))])
	60	+	then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString(((parseIntValue(s[4]) + sr1) + sr2)), toString((parseIntValue(s[5]) + 2)), s[6], s[7], toString((((parseIntValue(s[8]) + y) + sr1) + sr2))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_")), StringEntry(r1[7], makeString([r2[0], r2[1], r2[2], r2[3], r2[4], r2[5], r2[6], r2[7], r2[8], toString((parseIntValue(r2[9]) + sr2)), r2[10], toString((parseIntValue(r2[11]) + sr2))], "_"))]
61	61		else {
62	62		let r3 = split(getUser(r2[7]), "_")
63	63		let sr3 = ((z / 100) * pr3)
64		-	~~WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~toString((parseIntValue(s[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(s[1]) + 1))~~) + "_") +~~ s[2]~~) + "_") +~~ s[3]~~) + "_") +~~ toString((((parseIntValue(s[4]) + sr1) + sr2) + sr3))~~) + "_") +~~ toString((parseIntValue(s[5]) + 3))~~) + "_") +~~ s[6]~~) + "_") +~~ s[7]~~) + "_") +~~ toString(((((parseIntValue(s[8]) + y) + sr1) + sr2) + sr3)))), ~~DataEntry~~(a, (~~(((((((((((((((((((((~~toString((parseIntValue(u[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(u[1]) + x))~~) + "_") +~~ toString((ud2 + x))~~) + "_") +~~ toString(((ud2 + x) / f))) + "_") ~~+ toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])~~), ~~DataEntry~~(u[7], (~~(((((((((((((((((((((~~r1[0] ~~+ "_") +~~ r1[1]~~) + "_") +~~ r1[2]~~) + "_") +~~ r1[3]~~) + "_") +~~ r1[4]~~) + "_") +~~ r1[5]~~) + "_") +~~ r1[6]~~) + "_") +~~ r1[7]~~) + "_") +~~ toString((parseIntValue(r1[8]) + sr1))~~) + "_") +~~ r1[9]~~) + "_") +~~ r1[10]~~) + "_") +~~ toString((parseIntValue(r1[11]) + sr1)))), ~~DataEntry~~(r1[7], (~~(((((((((((((((((((((~~r2[0] ~~+ "_") +~~ r2[1]~~) + "_") +~~ r2[2]~~) + "_") +~~ r2[3]~~) + "_") +~~ r2[4]~~) + "_") +~~ r2[5]~~) + "_") +~~ r2[6]~~) + "_") +~~ r2[7]~~) + "_") +~~ r2[8]~~) + "_") +~~ toString((parseIntValue(r2[9]) + sr2))~~) + "_") +~~ r2[10]~~) + "_") +~~ toString((parseIntValue(r2[11]) + sr2)))), ~~DataEntry~~(r2[7], (~~(((((((((((((((((((((~~r3[0] ~~+ "_") +~~ r3[1]~~) + "_") +~~ r3[2]~~) + "_") +~~ r3[3]~~) + "_") +~~ r3[4]~~) + "_") +~~ r3[5]~~) + "_") +~~ r3[6]~~) + "_") +~~ r3[7]~~) + "_") +~~ r3[8]~~) + "_") +~~ r3[9]~~) + "_") +~~ toString((parseIntValue(r3[10]) + sr3))~~) + "_") +~~ toString((parseIntValue(r3[11]) + sr3))))])
	64	+	[StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((((parseIntValue(s[4]) + sr1) + sr2) + sr3)), toString((parseIntValue(s[5]) + 3)), s[6], s[7], toString(((((parseIntValue(s[8]) + y) + sr1) + sr2) + sr3))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_")), StringEntry(r1[7], makeString([r2[0], r2[1], r2[2], r2[3], r2[4], r2[5], r2[6], r2[7], r2[8], toString((parseIntValue(r2[9]) + sr2)), r2[10], toString((parseIntValue(r2[11]) + sr2))], "_")), StringEntry(r2[7], makeString([r3[0], r3[1], r3[2], r3[3], r3[4], r3[5], r3[6], r3[7], r3[8], r3[9], toString((parseIntValue(r3[10]) + sr3)), toString((parseIntValue(r3[11]) + sr3))], "_"))]
65	65		}
66	66		}
67	67		}

88	88		if ((0 > y))
89	89		then throw("Can't withdraw negative amount")
90	90		else if ((b >= y))
91		-	then ~~ScriptResult(WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~s[0] ~~+ "_") +~~ s[1]~~) + "_") +~~ s[2]~~) + "_") +~~ toString((parseIntValue(s[3]) + 1))~~) + "_") +~~ s[4]~~) + "_") +~~ s[5]~~) + "_") +~~ toString((parseIntValue(s[6]) + y))~~) +~~ "_") ~~+ s[7]) + "_") + s[8])~~), ~~DataEntry~~(a, (~~(((((((((((((((((((((~~u[0] ~~+ "_") +~~ u[1]~~) + "_") +~~ u[2]~~) + "_") +~~ u[3]~~) + "_") +~~ u[4]~~) + "_") +~~ toString((parseIntValue(u[5]) + y))~~) + "_") +~~ toString((parseIntValue(u[6]) + y))~~) + "_") +~~ u[7]~~) + "_") +~~ u[8]~~) + "_") +~~ u[9]~~) + "_") +~~ u[10]~~) + "_") +~~ toString((parseIntValue(u[11]) - y))))]), ~~TransferSet([~~ScriptTransfer(i.caller, y, unit)]))
	91	+	then [StringEntry("statistic", makeString([s[0], s[1], s[2], toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + y)), s[7], s[8]], "_")), StringEntry(a, makeString([u[0], u[1], u[2], u[3], u[4], toString((parseIntValue(u[5]) + y)), toString((parseIntValue(u[6]) + y)), u[7], u[8], u[9], u[10], toString((parseIntValue(u[11]) - y))], "_")), ScriptTransfer(i.caller, y, unit)]
92	92		else if ((0 > (m - y)))
93	93		then throw("Not enough balance")
94	94		else {
95	95		let n = ((x + b) - y)
96		-	~~ScriptResult(WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~s[0] ~~+ "_") +~~ s[1]~~) + "_") +~~ toString(((parseIntValue(s[2]) + y) - parseIntValue(u[11])))~~) + "_") +~~ toString((parseIntValue(s[3]) + 1))~~) + "_") +~~ s[4]~~) + "_") +~~ s[5]~~) + "_") +~~ toString((parseIntValue(s[6]) + parseIntValue(u[11])))~~) +~~ "_") ~~+ s[7]) + "_") + s[8])~~), ~~DataEntry~~(a, (~~((((((((((((((((((((~~u[0] ~~+ "_") +~~ u[1]~~) + "_") +~~ toString(n)~~) + "_") +~~ u[3]~~) + "_") +~~ u[4]~~) + "_") +~~ toString((parseIntValue(u[5]) + y))~~) + "_") +~~ toString((parseIntValue(u[6]) + y))~~) + "_") +~~ u[7]~~) + "_") +~~ u[8]~~) + "_") +~~ u[9]~~) + "_") +~~ u[10]) + "_0"))]), ~~TransferSet([~~ScriptTransfer(i.caller, y, unit)]))
	96	+	[StringEntry("statistic", makeString([s[0], s[1], toString(((parseIntValue(s[2]) + y) - parseIntValue(u[11]))), toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + parseIntValue(u[11]))), s[7], s[8]], "_")), StringEntry(a, makeString([u[0], u[1], toString(n), u[3], u[4], toString((parseIntValue(u[5]) + y)), toString((parseIntValue(u[6]) + y)), u[7], u[8], u[9], (u[10] + "_0")], "_")), ScriptTransfer(i.caller, y, unit)]
97	97		}
98	98		}
99	99

Old	New		Differences
1		-	{-# STDLIB_VERSION 3 #-}
	1	+	{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let ar = "3N2hHaqEEXjFHE5G8NTw6v7KNMwcHob2Ena"
5	5
6	6		let f = 100
7	7
8	8		let p = 20
9	9
10	10		let pr1 = 3
11	11
12	12		let pr2 = 2
13	13
14	14		let pr3 = 1
15	15
16	16		func getStatistic () = match getString(this, "statistic") {
17	17		case a: String =>
18	18		a
19	19		case _ =>
20	20		"0_0_0_0_0_0_0_0_0"
21	21		}
22	22
23	23
24	24		func getUser (user) = match getString(this, user) {
25	25		case a: String =>
26	26		a
27	27		case _ =>
28	28		"0_0_0_0_0_0_0_0_0_0_0_0"
29	29		}
30	30
31	31
32	32		@Callable(i)
33	33		func deposit () = {
34		-	let t = ~~extract~~(i.~~payment~~)
	34	+	let t = value(i.payments[0])
35	35		let z = t.amount
36	36		if (isDefined(t.assetId))
37	37		then throw("can hodl waves only at the moment")
38	38		else {
39	39		let a = toBase58String(i.caller.bytes)
40	40		let s = split(getStatistic(), "_")
41	41		if ((a == ar))
42		-	then ~~WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~s[0] ~~+ "_") +~~ s[1]~~) + "_") +~~ s[2]~~) + "_") +~~ s[3]~~) + "_") +~~ s[4]~~) + "_") +~~ s[5]~~) + "_") +~~ s[6]~~) + "_") +~~ toString((parseIntValue(s[7]) + z))~~) +~~ "_") ~~+ s[8])~~)])
	42	+	then [StringEntry("statistic", makeString([s[0], s[1], s[2], s[3], s[4], s[5], s[6], toString((parseIntValue(s[7]) + z)), s[8]], "_"))]
43	43		else {
44	44		let h = lastBlock.height
45	45		let x = ((z / 100) * (100 + p))
46	46		let y = (x - z)
47	47		let u = split(getUser(a), "_")
48	48		let ud2 = parseIntValue(u[2])
49	49		if ((u[7] == "0"))
50		-	then ~~WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~toString((parseIntValue(s[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(s[1]) + 1))~~) + "_") +~~ s[2]~~) + "_") +~~ s[3]~~) + "_") +~~ s[4]~~) + "_") +~~ s[5]~~) + "_") +~~ s[6]~~) + "_") +~~ s[7]~~) + "_") +~~ toString((parseIntValue(s[8]) + y)))), ~~DataEntry~~(a, (~~(((((((((((((((((((((~~toString((parseIntValue(u[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(u[1]) + x))~~) + "_") +~~ toString((ud2 + x))~~) + "_") +~~ toString(((ud2 + x) / f))) + "_") ~~+ toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])~~)])
	50	+	then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], s[4], s[5], s[6], s[7], toString((parseIntValue(s[8]) + y))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_"))]
51	51		else {
52	52		let r1 = split(getUser(u[7]), "_")
53	53		let sr1 = ((z / 100) * pr1)
54	54		if ((r1[7] == "0"))
55		-	then ~~WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~toString((parseIntValue(s[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(s[1]) + 1))~~) + "_") +~~ s[2]~~) + "_") +~~ s[3]~~) + "_") +~~ toString((parseIntValue(s[4]) + sr1))~~) + "_") +~~ toString((parseIntValue(s[5]) + 1))~~) + "_") +~~ s[6]~~) + "_") +~~ s[7]~~) + "_") +~~ toString(((parseIntValue(s[8]) + y) + sr1)))), ~~DataEntry~~(a, (~~(((((((((((((((((((((~~toString((parseIntValue(u[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(u[1]) + x))~~) + "_") +~~ toString((ud2 + x))~~) + "_") +~~ toString(((ud2 + x) / f))) + "_") ~~+ toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])~~), ~~DataEntry~~(u[7], (~~(((((((((((((((((((((~~r1[0] ~~+ "_") +~~ r1[1]~~) + "_") +~~ r1[2]~~) + "_") +~~ r1[3]~~) + "_") +~~ r1[4]~~) + "_") +~~ r1[5]~~) + "_") +~~ r1[6]~~) + "_") +~~ r1[7]~~) + "_") +~~ toString((parseIntValue(r1[8]) + sr1))~~) + "_") +~~ r1[9]~~) + "_") +~~ r1[10]~~) + "_") +~~ toString((parseIntValue(r1[11]) + sr1))))])
	55	+	then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((parseIntValue(s[4]) + sr1)), toString((parseIntValue(s[5]) + 1)), s[6], s[7], toString(((parseIntValue(s[8]) + y) + sr1))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_"))]
56	56		else {
57	57		let r2 = split(getUser(r1[7]), "_")
58	58		let sr2 = ((z / 100) * pr2)
59	59		if ((r2[7] == "0"))
60		-	then ~~WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~toString((parseIntValue(s[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(s[1]) + 1))~~) + "_") +~~ s[2]~~) + "_") +~~ s[3]~~) + "_") +~~ toString(((parseIntValue(s[4]) + sr1) + sr2))~~) + "_") +~~ toString((parseIntValue(s[5]) + 2))~~) + "_") +~~ s[6]~~) + "_") +~~ s[7]~~) + "_") +~~ toString((((parseIntValue(s[8]) + y) + sr1) + sr2)))), ~~DataEntry~~(a, (~~(((((((((((((((((((((~~toString((parseIntValue(u[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(u[1]) + x))~~) + "_") +~~ toString((ud2 + x))~~) + "_") +~~ toString(((ud2 + x) / f))) + "_") ~~+ toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])~~), ~~DataEntry~~(u[7], (~~(((((((((((((((((((((~~r1[0] ~~+ "_") +~~ r1[1]~~) + "_") +~~ r1[2]~~) + "_") +~~ r1[3]~~) + "_") +~~ r1[4]~~) + "_") +~~ r1[5]~~) + "_") +~~ r1[6]~~) + "_") +~~ r1[7]~~) + "_") +~~ toString((parseIntValue(r1[8]) + sr1))~~) + "_") +~~ r1[9]~~) + "_") +~~ r1[10]~~) + "_") +~~ toString((parseIntValue(r1[11]) + sr1)))), ~~DataEntry~~(r1[7], (~~(((((((((((((((((((((~~r2[0] ~~+ "_") +~~ r2[1]~~) + "_") +~~ r2[2]~~) + "_") +~~ r2[3]~~) + "_") +~~ r2[4]~~) + "_") +~~ r2[5]~~) + "_") +~~ r2[6]~~) + "_") +~~ r2[7]~~) + "_") +~~ r2[8]~~) + "_") +~~ toString((parseIntValue(r2[9]) + sr2))~~) + "_") +~~ r2[10]~~) + "_") +~~ toString((parseIntValue(r2[11]) + sr2))))])
	60	+	then [StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString(((parseIntValue(s[4]) + sr1) + sr2)), toString((parseIntValue(s[5]) + 2)), s[6], s[7], toString((((parseIntValue(s[8]) + y) + sr1) + sr2))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_")), StringEntry(r1[7], makeString([r2[0], r2[1], r2[2], r2[3], r2[4], r2[5], r2[6], r2[7], r2[8], toString((parseIntValue(r2[9]) + sr2)), r2[10], toString((parseIntValue(r2[11]) + sr2))], "_"))]
61	61		else {
62	62		let r3 = split(getUser(r2[7]), "_")
63	63		let sr3 = ((z / 100) * pr3)
64		-	~~WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~toString((parseIntValue(s[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(s[1]) + 1))~~) + "_") +~~ s[2]~~) + "_") +~~ s[3]~~) + "_") +~~ toString((((parseIntValue(s[4]) + sr1) + sr2) + sr3))~~) + "_") +~~ toString((parseIntValue(s[5]) + 3))~~) + "_") +~~ s[6]~~) + "_") +~~ s[7]~~) + "_") +~~ toString(((((parseIntValue(s[8]) + y) + sr1) + sr2) + sr3)))), ~~DataEntry~~(a, (~~(((((((((((((((((((((~~toString((parseIntValue(u[0]) + z)) ~~+ "_") +~~ toString((parseIntValue(u[1]) + x))~~) + "_") +~~ toString((ud2 + x))~~) + "_") +~~ toString(((ud2 + x) / f))) + "_") ~~+ toString(h)) + "_") + u[5]) + "_") + u[6]) + "_") + u[7]) + "_") + u[8]) + "_") + u[9]) + "_") + u[10]) + "_") + u[11])~~), ~~DataEntry~~(u[7], (~~(((((((((((((((((((((~~r1[0] ~~+ "_") +~~ r1[1]~~) + "_") +~~ r1[2]~~) + "_") +~~ r1[3]~~) + "_") +~~ r1[4]~~) + "_") +~~ r1[5]~~) + "_") +~~ r1[6]~~) + "_") +~~ r1[7]~~) + "_") +~~ toString((parseIntValue(r1[8]) + sr1))~~) + "_") +~~ r1[9]~~) + "_") +~~ r1[10]~~) + "_") +~~ toString((parseIntValue(r1[11]) + sr1)))), ~~DataEntry~~(r1[7], (~~(((((((((((((((((((((~~r2[0] ~~+ "_") +~~ r2[1]~~) + "_") +~~ r2[2]~~) + "_") +~~ r2[3]~~) + "_") +~~ r2[4]~~) + "_") +~~ r2[5]~~) + "_") +~~ r2[6]~~) + "_") +~~ r2[7]~~) + "_") +~~ r2[8]~~) + "_") +~~ toString((parseIntValue(r2[9]) + sr2))~~) + "_") +~~ r2[10]~~) + "_") +~~ toString((parseIntValue(r2[11]) + sr2)))), ~~DataEntry~~(r2[7], (~~(((((((((((((((((((((~~r3[0] ~~+ "_") +~~ r3[1]~~) + "_") +~~ r3[2]~~) + "_") +~~ r3[3]~~) + "_") +~~ r3[4]~~) + "_") +~~ r3[5]~~) + "_") +~~ r3[6]~~) + "_") +~~ r3[7]~~) + "_") +~~ r3[8]~~) + "_") +~~ r3[9]~~) + "_") +~~ toString((parseIntValue(r3[10]) + sr3))~~) + "_") +~~ toString((parseIntValue(r3[11]) + sr3))))])
	64	+	[StringEntry("statistic", makeString([toString((parseIntValue(s[0]) + z)), toString((parseIntValue(s[1]) + 1)), s[2], s[3], toString((((parseIntValue(s[4]) + sr1) + sr2) + sr3)), toString((parseIntValue(s[5]) + 3)), s[6], s[7], toString(((((parseIntValue(s[8]) + y) + sr1) + sr2) + sr3))], "_")), StringEntry(a, makeString([toString((parseIntValue(u[0]) + z)), toString((parseIntValue(u[1]) + x)), toString((ud2 + x)), toString(((ud2 + x) / f)), toString(h), u[5], u[6], u[7], u[8], u[9], u[10], u[11]], "_")), StringEntry(u[7], makeString([r1[0], r1[1], r1[2], r1[3], r1[4], r1[5], r1[6], r1[7], toString((parseIntValue(r1[8]) + sr1)), r1[9], r1[10], toString((parseIntValue(r1[11]) + sr1))], "_")), StringEntry(r1[7], makeString([r2[0], r2[1], r2[2], r2[3], r2[4], r2[5], r2[6], r2[7], r2[8], toString((parseIntValue(r2[9]) + sr2)), r2[10], toString((parseIntValue(r2[11]) + sr2))], "_")), StringEntry(r2[7], makeString([r3[0], r3[1], r3[2], r3[3], r3[4], r3[5], r3[6], r3[7], r3[8], r3[9], toString((parseIntValue(r3[10]) + sr3)), toString((parseIntValue(r3[11]) + sr3))], "_"))]
65	65		}
66	66		}
67	67		}
68	68		}
69	69		}
70	70		}
71	71
72	72
73	73
74	74		@Callable(i)
75	75		func withdraw (y) = {
76	76		let a = toBase58String(i.caller.bytes)
77	77		let u = split(getUser(a), "_")
78	78		let s = split(getStatistic(), "_")
79	79		let h = lastBlock.height
80	80		let j = parseIntValue(u[1])
81	81		let x = parseIntValue(u[2])
82	82		let d = parseIntValue(u[3])
83	83		let b = parseIntValue(u[11])
84	84		let g = (j + f)
85	85		let m = if ((h >= g))
86	86		then (x + b)
87	87		else ((d * ((f - g) - h)) + b)
88	88		if ((0 > y))
89	89		then throw("Can't withdraw negative amount")
90	90		else if ((b >= y))
91		-	then ~~ScriptResult(WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~s[0] ~~+ "_") +~~ s[1]~~) + "_") +~~ s[2]~~) + "_") +~~ toString((parseIntValue(s[3]) + 1))~~) + "_") +~~ s[4]~~) + "_") +~~ s[5]~~) + "_") +~~ toString((parseIntValue(s[6]) + y))~~) +~~ "_") ~~+ s[7]) + "_") + s[8])~~), ~~DataEntry~~(a, (~~(((((((((((((((((((((~~u[0] ~~+ "_") +~~ u[1]~~) + "_") +~~ u[2]~~) + "_") +~~ u[3]~~) + "_") +~~ u[4]~~) + "_") +~~ toString((parseIntValue(u[5]) + y))~~) + "_") +~~ toString((parseIntValue(u[6]) + y))~~) + "_") +~~ u[7]~~) + "_") +~~ u[8]~~) + "_") +~~ u[9]~~) + "_") +~~ u[10]~~) + "_") +~~ toString((parseIntValue(u[11]) - y))))]), ~~TransferSet([~~ScriptTransfer(i.caller, y, unit)]))
	91	+	then [StringEntry("statistic", makeString([s[0], s[1], s[2], toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + y)), s[7], s[8]], "_")), StringEntry(a, makeString([u[0], u[1], u[2], u[3], u[4], toString((parseIntValue(u[5]) + y)), toString((parseIntValue(u[6]) + y)), u[7], u[8], u[9], u[10], toString((parseIntValue(u[11]) - y))], "_")), ScriptTransfer(i.caller, y, unit)]
92	92		else if ((0 > (m - y)))
93	93		then throw("Not enough balance")
94	94		else {
95	95		let n = ((x + b) - y)
96		-	~~ScriptResult(WriteSet(~~[~~DataEntry~~("statistic", (~~(((((((((((((((~~s[0] ~~+ "_") +~~ s[1]~~) + "_") +~~ toString(((parseIntValue(s[2]) + y) - parseIntValue(u[11])))~~) + "_") +~~ toString((parseIntValue(s[3]) + 1))~~) + "_") +~~ s[4]~~) + "_") +~~ s[5]~~) + "_") +~~ toString((parseIntValue(s[6]) + parseIntValue(u[11])))~~) +~~ "_") ~~+ s[7]) + "_") + s[8])~~), ~~DataEntry~~(a, (~~((((((((((((((((((((~~u[0] ~~+ "_") +~~ u[1]~~) + "_") +~~ toString(n)~~) + "_") +~~ u[3]~~) + "_") +~~ u[4]~~) + "_") +~~ toString((parseIntValue(u[5]) + y))~~) + "_") +~~ toString((parseIntValue(u[6]) + y))~~) + "_") +~~ u[7]~~) + "_") +~~ u[8]~~) + "_") +~~ u[9]~~) + "_") +~~ u[10]) + "_0"))]), ~~TransferSet([~~ScriptTransfer(i.caller, y, unit)]))
	96	+	[StringEntry("statistic", makeString([s[0], s[1], toString(((parseIntValue(s[2]) + y) - parseIntValue(u[11]))), toString((parseIntValue(s[3]) + 1)), s[4], s[5], toString((parseIntValue(s[6]) + parseIntValue(u[11]))), s[7], s[8]], "_")), StringEntry(a, makeString([u[0], u[1], toString(n), u[3], u[4], toString((parseIntValue(u[5]) + y)), toString((parseIntValue(u[6]) + y)), u[7], u[8], u[9], (u[10] + "_0")], "_")), ScriptTransfer(i.caller, y, unit)]
97	97		}
98	98		}
99	99
100	100
101	101		@Verifier(tx)
102	102		func verify () = match tx {
103	103		case d: SetScriptTransaction =>
104	104		sigVerify(tx.bodyBytes, tx.proofs[0], base58'33Gr5uEJMDMKdRs25QUDvTeQ7q5EpGcAdPztrFvQWdv9')
105	105		case _ =>
106	106		true
107	107		}
108	108

github/deemru/w8io/6500d08 
290.05 ms ◑