w8 · tx · GhN···oLq

tx · GhN8QV1Z67tpAc8Ng12Di2WdpUhPLRf5mMCMLNBhioLq

3Mu7bwtYrymjrXt1ttcqaQbFc1PqGhZndhv:  -0.01400000 Waves

2019.10.01 17:50 [700785] smart account 3Mu7bwtYrymjrXt1ttcqaQbFc1PqGhZndhv > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GhN8QV1Z67tpAc8Ng12Di2WdpUhPLRf5mMCMLNBhioLq",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1569941416921,
    "version": 1,
    "sender": "3Mu7bwtYrymjrXt1ttcqaQbFc1PqGhZndhv",
    "senderPublicKey": "BxHnTcjvN9ZtnKfdKYp6aKRdkMB4ZHxHnTDr5dWx5Vz2",
    "proofs": [
        "2Zpa4p5NBs94RxELdvM6fQVH4NS7xzMYx5EJv1mQsECmUyhUVucvMZp8ke5yMyZsicmDoDLCMbjFqNujojvDfvWy"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAADAAAAAAh1VG9rZW5JZAEAAAAgg1ag/CIT1AiojH1skJ2ufidI0Eb3a9g5aB0rTX7UN7gBAAAAC2NoZWNrU3RhdHVzAAAAAQAAAAdhZGRyZXNzBAAAAA9zdGF0dXNVbmxpbWl0ZWQEAAAAByRtYXRjaDAJAAQbAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAdhZGRyZXNzAgAAAApfdW5saW1pdGVkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAdCb29sZWFuBAAAAARib29sBQAAAAckbWF0Y2gwBQAAAARib29sAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0BwkBAAAABXRocm93AAAAAAQAAAAKc3RhdHVzVGltZQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAAB2FkZHJlc3MCAAAABV90aW1lAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA2ludAUAAAAHJG1hdGNoMAUAAAADaW50AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0AAAAAAAAAAAACQEAAAAFdGhyb3cAAAAAAwUAAAAPc3RhdHVzVW5saW1pdGVkBgkAAGYAAAACBQAAAApzdGF0dXNUaW1lCAUAAAAJbGFzdEJsb2NrAAAACXRpbWVzdGFtcAEAAAANY2hlY2tEZWNpbWFscwAAAAIAAAALYW1vdW50QXNzZXQAAAAKcHJpY2VBc3NldAQAAAATYW1vdW50QXNzZXREZWNpbWFscwMJAAAAAAAAAgUAAAALYW1vdW50QXNzZXQCAAAABVdBVkVTAAAAAAAAAAAICAkBAAAABXZhbHVlAAAAAQkAA+wAAAABCQACWQAAAAEFAAAAC2Ftb3VudEFzc2V0AAAACGRlY2ltYWxzBAAAABJwcmljZUFzc2V0RGVjaW1hbHMDCQAAAAAAAAIFAAAACnByaWNlQXNzZXQCAAAABVdBVkVTAAAAAAAAAAAICAkBAAAABXZhbHVlAAAAAQkAA+wAAAABCQACWQAAAAEFAAAACnByaWNlQXNzZXQAAAAIZGVjaW1hbHMJAABnAAAAAgUAAAAScHJpY2VBc3NldERlY2ltYWxzBQAAABNhbW91bnRBc3NldERlY2ltYWxzAAAACAAAAAFpAQAAAAhhZGRBc3NldAAAAAEAAAAHYXNzZXRJZAQAAAALYWRkaW5nUHJpY2UJAABoAAAAAgAAAAAAAAAAZAAAAAAABfXhAAQAAAAOYWRkaW5nUHJpY2VTdHICAAAAAzEwMAQAAAAHcGF5bWVudAkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCAUAAAABaQAAAAdwYXltZW50AgAAABFXaGVyZSBpcyBwYXltZW50PwMDCQEAAAAJaXNEZWZpbmVkAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAkBAAAAAiE9AAAAAggFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAUAAAAIdVRva2VuSWQHCQAAAgAAAAECAAAAEk9UQ3Ugb3IgV0FWRVMgb25seQMJAQAAAAIhPQAAAAIIBQAAAAdwYXltZW50AAAABmFtb3VudAUAAAALYWRkaW5nUHJpY2UJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAAEFlvdSBoYXZlIHRvIHBheSAFAAAADmFkZGluZ1ByaWNlU3RyAgAAAA4gT1RDdSBvciBXQVZFUwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAAPsAAAAAQkAAlkAAAABBQAAAAdhc3NldElkCQAAAgAAAAECAAAAI1RoZXJlIGlzIG5vIGFzc2V0IHdpdGggc3BlY2lmaWVkIGlkBAAAAAZhc3NldHMEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwIAAAAGYXNzZXRzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAA3N0cgUAAAAHJG1hdGNoMAUAAAADc3RyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0AgAAAAAJAQAAAAV0aHJvdwAAAAADCQEAAAAJaXNEZWZpbmVkAAAAAQkABLMAAAACBQAAAAZhc3NldHMFAAAAB2Fzc2V0SWQJAAACAAAAAQIAAAAaQXNzZXQgaXMgYWxyZWFkeSBhdmFpbGFibGUJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABmFzc2V0cwkAASwAAAACBQAAAAZhc3NldHMFAAAAB2Fzc2V0SWQFAAAAA25pbAAAAAFpAQAAAANwcm8AAAABAAAACXVubGltaXRlZAQAAAAHYWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAA51bmxpbWl0ZWRQcmljZQkAAGgAAAACAAAAAAAAAAAyAAAAAAAF9eEABAAAABF1bmxpbWl0ZWRQcmljZVN0cgIAAAACNTAEAAAACm1vbnRoUHJpY2UJAABoAAAAAgAAAAAAAAAACgAAAAAABfXhAAQAAAANbW9udGhQcmljZVN0cgIAAAACMTAEAAAAB3BheW1lbnQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAggFAAAAAWkAAAAHcGF5bWVudAIAAAARV2hlcmUgaXMgcGF5bWVudD8DAwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQJAQAAAAIhPQAAAAIIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAACHVUb2tlbklkBwkAAAIAAAABAgAAABJPVEN1IG9yIFdBVkVTIG9ubHkDAwUAAAAJdW5saW1pdGVkCQEAAAACIT0AAAACCAUAAAAHcGF5bWVudAAAAAZhbW91bnQFAAAADnVubGltaXRlZFByaWNlBwkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAQWW91IGhhdmUgdG8gcGF5IAUAAAARdW5saW1pdGVkUHJpY2VTdHICAAAADiBPVEN1IG9yIFdBVkVTAwMJAQAAAAEhAAAAAQUAAAAJdW5saW1pdGVkCQEAAAACIT0AAAACCAUAAAAHcGF5bWVudAAAAAZhbW91bnQFAAAACm1vbnRoUHJpY2UHCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAABBZb3UgaGF2ZSB0byBwYXkgBQAAAA1tb250aFByaWNlU3RyAgAAAA4gT1RDdSBvciBXQVZFUwQAAAAQY3VycmVudFVubGltaXRlZAQAAAAHJG1hdGNoMAkABBsAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAAB2FkZHJlc3MCAAAACl91bmxpbWl0ZWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAB0Jvb2xlYW4EAAAABGJvb2wFAAAAByRtYXRjaDAFAAAABGJvb2wDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQHCQEAAAAFdGhyb3cAAAAABAAAAAtjdXJyZW50VGltZQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAAB2FkZHJlc3MCAAAABV90aW1lAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAA2ludAUAAAAHJG1hdGNoMAUAAAADaW50AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0AAAAAAAAAAAACQEAAAAFdGhyb3cAAAAAAwUAAAAQY3VycmVudFVubGltaXRlZAkAAAIAAAABAgAAADhZb3UgaGF2ZSB1bmxpbWl0ZWQgUFJPIHN0YXR1cyBhbHJlYWR5LiBXaGF0IGRvIHlvdSB3YW50PwQAAAAFbW9udGgAAAAAAJy+sZgJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAHYWRkcmVzcwIAAAAKX3VubGltaXRlZAUAAAAJdW5saW1pdGVkCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAAB2FkZHJlc3MCAAAABV90aW1lAwUAAAAJdW5saW1pdGVkAAAAAAAAAAAACQAAZAAAAAIFAAAAC2N1cnJlbnRUaW1lBQAAAAVtb250aAUAAAADbmlsAAAAAWkBAAAACG1ha2VTZWxsAAAABAAAAApwcmljZUFzc2V0AAAAEHByaWNlQXNzZXRBbW91bnQAAAADYWxsAAAACHBhc3N3b3JkAwMJAQAAAAIhPQAAAAIFAAAACnByaWNlQXNzZXQCAAAABVdBVkVTCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCQAD7AAAAAEJAAJZAAAAAQUAAAAKcHJpY2VBc3NldAcJAAACAAAAAQIAAAAjVGhlcmUgaXMgbm8gYXNzZXQgd2l0aCBzcGVjaWZpZWQgaWQDCQAAZwAAAAIAAAAAAAAAAAAFAAAAEHByaWNlQXNzZXRBbW91bnQJAAACAAAAAQIAAAAmQW1vdW50IG9mIHByaWNlIGFzc2V0IG11c3QgYmUgcG9zaXRpdmUEAAAAB3BheW1lbnQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAggFAAAAAWkAAAAHcGF5bWVudAIAAAARV2hlcmUgaXMgcGF5bWVudD8DCQAAZwAAAAIAAAAAAAAAAAAIBQAAAAdwYXltZW50AAAABmFtb3VudAkAAAIAAAABAgAAABdBbW91bnQgbXVzdCBiZSBwb3NpdGl2ZQQAAAALYW1vdW50QXNzZXQEAAAAByRtYXRjaDAIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAXAFAAAAByRtYXRjaDAJAAJYAAAAAQUAAAABcAIAAAAFV0FWRVMEAAAABmFzc2V0cwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABHRoaXMCAAAABmFzc2V0cwIAAAAeVGhlcmUgYXJlIG5vdCBhdmFpbGFibGUgYXNzZXRzAwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAASzAAAAAgUAAAAGYXNzZXRzBQAAAApwcmljZUFzc2V0BgkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQkABLMAAAACBQAAAAZhc3NldHMFAAAAC2Ftb3VudEFzc2V0CQAAAgAAAAECAAAAI0Fzc2V0IGFyZSBub3QgYXZhaWxhYmxlIGZvciB0cmFkaW5nBAAAAAdhZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDAwkBAAAAASEAAAABCQEAAAALY2hlY2tTdGF0dXMAAAABBQAAAAdhZGRyZXNzAwUAAAADYWxsBgkBAAAAAiE9AAAAAgUAAAAIcGFzc3dvcmQCAAAAAAcJAAACAAAAAQIAAAAuWW91IG11c3QgaGF2ZSBwcm8gc3RhdHVzIHRvIHVzZSB0aGVzZSBmZWF0dXJlcwQAAAAHb3JkZXJJZAkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBAAAAAZvcmRlcnMEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwIAAAAGb3JkZXJzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXMFAAAAByRtYXRjaDAFAAAAAXMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQCAAAAAAkBAAAABXRocm93AAAAAAQAAAANcGFzc3dvcmRWYWxpZAkAAlkAAAABBQAAAAhwYXNzd29yZAQAAAAEZGF0YQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAARzZWxsAgAAAAFfCQABpAAAAAEIBQAAAAdwYXltZW50AAAABmFtb3VudAIAAAABXwUAAAALYW1vdW50QXNzZXQCAAAAAV8JAAGkAAAAAQUAAAAQcHJpY2VBc3NldEFtb3VudAIAAAABXwUAAAAKcHJpY2VBc3NldAIAAAABXwUAAAAHYWRkcmVzcwIAAAABXwkAAaUAAAABBQAAAANhbGwCAAAAAV8FAAAACHBhc3N3b3JkAgAAAAFfCQABpAAAAAEAAAAAAAAAAAAJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABm9yZGVycwkAASwAAAACBQAAAAZvcmRlcnMFAAAAB29yZGVySWQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAAB29yZGVySWQFAAAABGRhdGEFAAAAA25pbAAAAAFpAQAAAAdtYWtlQnV5AAAABAAAAAthbW91bnRBc3NldAAAAAZhbW91bnQAAAADYWxsAAAACHBhc3N3b3JkAwMJAQAAAAIhPQAAAAIFAAAAC2Ftb3VudEFzc2V0AgAAAAVXQVZFUwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQkAA+wAAAABCQACWQAAAAEFAAAAC2Ftb3VudEFzc2V0BwkAAAIAAAABAgAAACNUaGVyZSBpcyBubyBhc3NldCB3aXRoIHNwZWNpZmllZCBpZAMJAABnAAAAAgAAAAAAAAAAAAUAAAAGYW1vdW50CQAAAgAAAAECAAAAF0Ftb3VudCBtdXN0IGJlIHBvc2l0aXZlBAAAAAdwYXltZW50CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIIBQAAAAFpAAAAB3BheW1lbnQCAAAAEXdoZXJlIGlzIHBheW1lbnQ/BAAAABBwcmljZUFzc2V0QW1vdW50CAUAAAAHcGF5bWVudAAAAAZhbW91bnQDCQAAZwAAAAIAAAAAAAAAAAAFAAAAEHByaWNlQXNzZXRBbW91bnQJAAACAAAAAQIAAAAXYW1vdW50IG11c3QgYmUgcG9zaXRpdmUEAAAACnByaWNlQXNzZXQEAAAAByRtYXRjaDAIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAXAFAAAAByRtYXRjaDAJAAJYAAAAAQUAAAABcAIAAAAFV0FWRVMEAAAABmFzc2V0cwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABHRoaXMCAAAABmFzc2V0cwIAAAAeVGhlcmUgYXJlIG5vdCBhdmFpbGFibGUgYXNzZXRzAwMJAQAAAAEhAAAAAQkBAAAACWlzRGVmaW5lZAAAAAEJAASzAAAAAgUAAAAGYXNzZXRzBQAAAApwcmljZUFzc2V0BgkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQkABLMAAAACBQAAAAZhc3NldHMFAAAAC2Ftb3VudEFzc2V0CQAAAgAAAAECAAAAI0Fzc2V0IGFyZSBub3QgYXZhaWxhYmxlIGZvciB0cmFkaW5nBAAAAAdhZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDAwkBAAAAASEAAAABCQEAAAALY2hlY2tTdGF0dXMAAAABBQAAAAdhZGRyZXNzAwUAAAADYWxsBgkBAAAAAiE9AAAAAgUAAAAIcGFzc3dvcmQCAAAAAAcJAAACAAAAAQIAAAAuWW91IG11c3QgaGF2ZSBwcm8gc3RhdHVzIHRvIHVzZSB0aGVzZSBmZWF0dXJlcwQAAAAHb3JkZXJJZAkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBAAAAAZvcmRlcnMEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwIAAAAGb3JkZXJzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXMFAAAAByRtYXRjaDAFAAAAAXMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQCAAAAAAkBAAAABXRocm93AAAAAAMJAAAAAAAAAgUAAAAGYW1vdW50AAAAAAAAAAAACQAAAgAAAAECAAAAEmludmFsaWQgYnV5IGFtb3VudAQAAAAEZGF0YQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAANidXkCAAAAAV8JAAGkAAAAAQUAAAAGYW1vdW50AgAAAAFfBQAAAAthbW91bnRBc3NldAIAAAABXwkAAaQAAAABBQAAABBwcmljZUFzc2V0QW1vdW50AgAAAAFfBQAAAApwcmljZUFzc2V0AgAAAAFfBQAAAAdhZGRyZXNzAgAAAAFfCQABpQAAAAEFAAAAA2FsbAIAAAABXwUAAAAIcGFzc3dvcmQCAAAAAV8JAAGkAAAAAQAAAAAAAAAAAAkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAGb3JkZXJzCQABLAAAAAIFAAAABm9yZGVycwUAAAAHb3JkZXJJZAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACAgAAAARidXlfBQAAAAdvcmRlcklkBQAAAARkYXRhBQAAAANuaWwAAAABaQEAAAAIdGFrZVNlbGwAAAACAAAAB29yZGVySWQAAAADc2lnBAAAAAdwYXltZW50CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIIBQAAAAFpAAAAB3BheW1lbnQCAAAAEVdoZXJlIGlzIHBheW1lbnQ/BAAAABBwcmljZUFzc2V0QW1vdW50CAUAAAAHcGF5bWVudAAAAAZhbW91bnQDCQAAZwAAAAIAAAAAAAAAAAAFAAAAEHByaWNlQXNzZXRBbW91bnQJAAACAAAAAQIAAAAXQW1vdW50IG11c3QgYmUgcG9zaXRpdmUEAAAACnByaWNlQXNzZXQEAAAAByRtYXRjaDAIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAXAFAAAAByRtYXRjaDAJAAJYAAAAAQUAAAABcAIAAAAFV0FWRVMEAAAABGRhdGEJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAR0aGlzBQAAAAdvcmRlcklkAgAAABBJbnZhbGlkIG9yZGVyIGlkBAAAAAlvcmRlclR5cGUJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAAABAAAAAtvcmRlckFtb3VudAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAAAQQAAAAQb3JkZXJBbW91bnRBc3NldAkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAIEAAAAFW9yZGVyUHJpY2VBc3NldEFtb3VudAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAAAwQAAAAPb3JkZXJQcmljZUFzc2V0CQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAABAQAAAAKb3JkZXJPd25lcgkBAAAABXZhbHVlAAAAAQkBAAAAEWFkZHJlc3NGcm9tU3RyaW5nAAAAAQkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAUEAAAACG9yZGVyQWxsAwkAAAAAAAACCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAABgIAAAAEdHJ1ZQYHBAAAAA1vcmRlclBhc3N3b3JkCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAABwQAAAAKb3JkZXJTcGVudAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAACAMJAQAAAAIhPQAAAAIFAAAACW9yZGVyVHlwZQIAAAAEc2VsbAkAAAIAAAABAgAAABJJbnZhbGlkIG9yZGVyIHR5cGUDCQEAAAACIT0AAAACBQAAAA9vcmRlclByaWNlQXNzZXQFAAAACnByaWNlQXNzZXQJAAACAAAAAQkAASwAAAACAgAAABZQYXltZW50IGFzc2V0IG11c3QgYmUgBQAAAA9vcmRlclByaWNlQXNzZXQEAAAABXZhbGlkAwkBAAAAAiE9AAAAAgUAAAANb3JkZXJQYXNzd29yZAIAAAAACQAB9AAAAAMIBQAAAAFpAAAAD2NhbGxlclB1YmxpY0tleQkAAlkAAAABBQAAAANzaWcJAAJZAAAAAQUAAAANb3JkZXJQYXNzd29yZAYDCQEAAAABIQAAAAEFAAAABXZhbGlkCQAAAgAAAAECAAAAFFRoZSBvcmRlciBpcyBwcml2YXRlBAAAAAZhbW91bnQJAABpAAAAAgkAAGgAAAACBQAAABBwcmljZUFzc2V0QW1vdW50BQAAAAtvcmRlckFtb3VudAUAAAAVb3JkZXJQcmljZUFzc2V0QW1vdW50AwkAAAAAAAACBQAAAAZhbW91bnQAAAAAAAAAAAAJAAACAAAAAQIAAAAOSW52YWxpZCBhbW91bnQDAwUAAAAIb3JkZXJBbGwJAABmAAAAAgUAAAALb3JkZXJBbW91bnQFAAAABmFtb3VudAcJAAACAAAAAQIAAAAZWW91IG11c3QgdGFrZSBhbGwgb3Igbm9uZQMJAABmAAAAAgUAAAAGYW1vdW50CQAAZQAAAAIFAAAAC29yZGVyQW1vdW50BQAAAApvcmRlclNwZW50CQAAAgAAAAECAAAAGk5vdCBlbm91Z3RoIGFzc2V0IGluIG9yZGVyBAAAAAZvcmRlcnMEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwIAAAAGb3JkZXJzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXMFAAAAByRtYXRjaDAFAAAAAXMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQCAAAAAAkBAAAABXRocm93AAAAAAQAAAAHbmV3RGF0YQkAASwAAAACCQEAAAAJZHJvcFJpZ2h0AAAAAgUAAAAEZGF0YQkAATEAAAABCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAABwkAAaQAAAABCQAAZAAAAAIFAAAACm9yZGVyU3BlbnQFAAAABmFtb3VudAQAAAAFaW5kZXgJAQAAAAV2YWx1ZQAAAAEJAASzAAAAAgUAAAAGb3JkZXJzBQAAAAdvcmRlcklkBAAAAAluZXdPcmRlcnMDCQAAAAAAAAIFAAAAC29yZGVyQW1vdW50CQAAZAAAAAIFAAAABmFtb3VudAUAAAAKb3JkZXJTcGVudAkAASwAAAACCQABLwAAAAIFAAAABm9yZGVycwUAAAAFaW5kZXgJAAEwAAAAAgUAAAAGb3JkZXJzCQAAZAAAAAIFAAAABWluZGV4CQABMQAAAAEFAAAAB29yZGVySWQFAAAABm9yZGVycwkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABm9yZGVycwUAAAAJbmV3T3JkZXJzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAAdvcmRlcklkBQAAAAduZXdEYXRhBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAAAZhbW91bnQDCQAAAAAAAAIFAAAAEG9yZGVyQW1vdW50QXNzZXQCAAAABVdBVkVTBQAAAAR1bml0CQACWQAAAAEFAAAAEG9yZGVyQW1vdW50QXNzZXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAKb3JkZXJPd25lcgUAAAAQcHJpY2VBc3NldEFtb3VudAMJAAAAAAAAAgUAAAAPb3JkZXJQcmljZUFzc2V0AgAAAAVXQVZFUwUAAAAEdW5pdAkAAlkAAAABBQAAAA9vcmRlclByaWNlQXNzZXQFAAAAA25pbAAAAAFpAQAAAAd0YWtlQnV5AAAAAgAAAAdvcmRlcklkAAAAA3NpZwQAAAAHcGF5bWVudAkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCAUAAAABaQAAAAdwYXltZW50AgAAABF3aGVyZSBpcyBwYXltZW50PwQAAAAGYW1vdW50CAUAAAAHcGF5bWVudAAAAAZhbW91bnQDCQAAZwAAAAIAAAAAAAAAAAAFAAAABmFtb3VudAkAAAIAAAABAgAAABdhbW91bnQgbXVzdCBiZSBwb3NpdGl2ZQQAAAALYW1vdW50QXNzZXQEAAAAByRtYXRjaDAIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAXAFAAAAByRtYXRjaDAJAAJYAAAAAQUAAAABcAIAAAAFV0FWRVMEAAAABGRhdGEJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAR0aGlzBQAAAAdvcmRlcklkAgAAABBJbnZhbGlkIG9yZGVyIGlkBAAAAAlvcmRlclR5cGUJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAAABAAAAAtvcmRlckFtb3VudAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAAAQQAAAAQb3JkZXJBbW91bnRBc3NldAkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAIEAAAAFW9yZGVyUHJpY2VBc3NldEFtb3VudAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAAAwQAAAAPb3JkZXJQcmljZUFzc2V0CQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAABAQAAAAKb3JkZXJPd25lcgkBAAAABXZhbHVlAAAAAQkBAAAAEWFkZHJlc3NGcm9tU3RyaW5nAAAAAQkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAUEAAAACG9yZGVyQWxsAwkAAAAAAAACCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAABgIAAAAEdHJ1ZQYHBAAAAA1vcmRlclBhc3N3b3JkCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAABwQAAAAKb3JkZXJTcGVudAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAACAMJAQAAAAIhPQAAAAIFAAAACW9yZGVyVHlwZQIAAAADYnV5CQAAAgAAAAECAAAAEkludmFsaWQgb3JkZXIgdHlwZQMJAQAAAAIhPQAAAAIFAAAAEG9yZGVyQW1vdW50QXNzZXQFAAAAC2Ftb3VudEFzc2V0CQAAAgAAAAEJAAEsAAAAAgIAAAAWcGF5bWVudCBhc3NldCBtdXN0IGJlIAUAAAAQb3JkZXJBbW91bnRBc3NldAQAAAAFdmFsaWQDCQEAAAACIT0AAAACBQAAAA1vcmRlclBhc3N3b3JkAgAAAAAJAAH0AAAAAwgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5CQACWQAAAAEFAAAAA3NpZwkAAlkAAAABBQAAAA1vcmRlclBhc3N3b3JkBgMJAQAAAAEhAAAAAQUAAAAFdmFsaWQJAAACAAAAAQIAAAAUVGhlIG9yZGVyIGlzIHByaXZhdGUEAAAAEHByaWNlQXNzZXRBbW91bnQJAABpAAAAAgkAAGgAAAACBQAAAAZhbW91bnQFAAAAFW9yZGVyUHJpY2VBc3NldEFtb3VudAUAAAALb3JkZXJBbW91bnQDCQAAAAAAAAIFAAAAEHByaWNlQXNzZXRBbW91bnQAAAAAAAAAAAAJAAACAAAAAQIAAAAOSW52YWxpZCBhbW91bnQDAwUAAAAIb3JkZXJBbGwJAABmAAAAAgUAAAAVb3JkZXJQcmljZUFzc2V0QW1vdW50BQAAABBwcmljZUFzc2V0QW1vdW50BwkAAAIAAAABAgAAABlZb3UgbXVzdCB0YWtlIGFsbCBvciBub25lAwkAAGYAAAACBQAAABBwcmljZUFzc2V0QW1vdW50CQAAZQAAAAIFAAAAFW9yZGVyUHJpY2VBc3NldEFtb3VudAUAAAAKb3JkZXJTcGVudAkAAAIAAAABAgAAABpub3QgZW5vdWd0aCBhc3NldCBpbiBvcmRlcgQAAAAGb3JkZXJzBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMCAAAABm9yZGVycwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFzBQAAAAckbWF0Y2gwBQAAAAFzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0AgAAAAAJAQAAAAV0aHJvdwAAAAAEAAAAB25ld0RhdGEJAAEsAAAAAgkBAAAACWRyb3BSaWdodAAAAAIFAAAABGRhdGEJAAExAAAAAQkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAcJAAGkAAAAAQkAAGQAAAACBQAAAApvcmRlclNwZW50BQAAABBwcmljZUFzc2V0QW1vdW50BAAAAAVpbmRleAkBAAAABXZhbHVlAAAAAQkABLMAAAACBQAAAAZvcmRlcnMFAAAAB29yZGVySWQEAAAACW5ld09yZGVycwMJAAAAAAAAAgUAAAAVb3JkZXJQcmljZUFzc2V0QW1vdW50CQAAZAAAAAIFAAAAEHByaWNlQXNzZXRBbW91bnQFAAAACm9yZGVyU3BlbnQJAAEsAAAAAgkAAS8AAAACBQAAAAZvcmRlcnMFAAAABWluZGV4CQABMAAAAAIFAAAABm9yZGVycwkAAGQAAAACBQAAAAVpbmRleAkAATEAAAABBQAAAAdvcmRlcklkBQAAAAZvcmRlcnMJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZvcmRlcnMFAAAACW5ld09yZGVycwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAHb3JkZXJJZAUAAAAHbmV3RGF0YQUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAQcHJpY2VBc3NldEFtb3VudAMJAAAAAAAAAgUAAAAPb3JkZXJQcmljZUFzc2V0AgAAAAVXQVZFUwUAAAAEdW5pdAkAAlkAAAABBQAAAA9vcmRlclByaWNlQXNzZXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAKb3JkZXJPd25lcgUAAAAGYW1vdW50AwkAAAAAAAACBQAAABBvcmRlckFtb3VudEFzc2V0AgAAAAVXQVZFUwUAAAAEdW5pdAkAAlkAAAABBQAAABBvcmRlckFtb3VudEFzc2V0BQAAAANuaWwAAAABaQEAAAAKcmV0dXJuU2VsbAAAAAEAAAAHb3JkZXJJZAQAAAAEZGF0YQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAAFc2VsbF8FAAAAB29yZGVySWQCAAAAEEludmFsaWQgb3JkZXIgaWQEAAAACW9yZGVyVHlwZQkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAAEAAAAC29yZGVyQW1vdW50CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAABBAAAABBvcmRlckFtb3VudEFzc2V0CQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAAAgQAAAAVb3JkZXJQcmljZUFzc2V0QW1vdW50CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAADBAAAAA9vcmRlclByaWNlQXNzZXQJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAAEBAAAAApvcmRlck93bmVyCQEAAAAFdmFsdWUAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAABQQAAAAIb3JkZXJBbGwDCQAAAAAAAAIJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAAGAgAAAAR0cnVlBgcEAAAADW9yZGVyUGFzc3dvcmQJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAAHBAAAAApvcmRlclNwZW50CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAAIAwkBAAAAAiE9AAAAAgUAAAAJb3JkZXJUeXBlAgAAAARzZWxsCQAAAgAAAAECAAAAEkludmFsaWQgb3JkZXIgdHlwZQMJAQAAAAIhPQAAAAIFAAAACm9yZGVyT3duZXIIBQAAAAFpAAAABmNhbGxlcgkAAAIAAAABAgAAACZyZXR1cm4gc2hvdWxkIGJlIGNhbGxlZCBieSBvcmRlciBvd25lcgQAAAAMcmV0dXJuQW1vdW50CQAAZQAAAAIFAAAAC29yZGVyQW1vdW50BQAAAApvcmRlclNwZW50AwkAAGcAAAACAAAAAAAAAAAABQAAAAxyZXR1cm5BbW91bnQJAAACAAAAAQIAAAARbm90aGluZyB0byByZXR1cm4EAAAABm9yZGVycwQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzAgAAAAZvcmRlcnMDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABcwUAAAAHJG1hdGNoMAUAAAABcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAIAAAAACQEAAAAFdGhyb3cAAAAABAAAAAduZXdEYXRhCQABLAAAAAIJAQAAAAlkcm9wUmlnaHQAAAACBQAAAARkYXRhCQABMQAAAAEJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAAHCQABpAAAAAEFAAAAC29yZGVyQW1vdW50BAAAAAVpbmRleAkBAAAABXZhbHVlAAAAAQkABLMAAAACBQAAAAZvcmRlcnMFAAAAB29yZGVySWQEAAAACW5ld09yZGVycwkAASwAAAACCQABLwAAAAIFAAAABm9yZGVycwUAAAAFaW5kZXgJAAEwAAAAAgUAAAAGb3JkZXJzCQAAZAAAAAIFAAAABWluZGV4CQABMQAAAAEFAAAAB29yZGVySWQJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZvcmRlcnMFAAAACW5ld09yZGVycwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAHb3JkZXJJZAUAAAAHbmV3RGF0YQUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAMcmV0dXJuQW1vdW50AwkAAAAAAAACBQAAABBvcmRlckFtb3VudEFzc2V0AgAAAAVXQVZFUwUAAAAEdW5pdAkAAlkAAAABBQAAABBvcmRlckFtb3VudEFzc2V0BQAAAANuaWwAAAABaQEAAAAJcmV0dXJuQnV5AAAAAQAAAAdvcmRlcklkBAAAAARkYXRhCQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAAQdAAAAAgUAAAAEdGhpcwUAAAAHb3JkZXJJZAIAAAAQSW52YWxpZCBvcmRlciBpZAQAAAAJb3JkZXJUeXBlCQABkQAAAAIJAAS1AAAAAgUAAAAEZGF0YQIAAAABXwAAAAAAAAAAAAQAAAALb3JkZXJBbW91bnQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAEEAAAAEG9yZGVyQW1vdW50QXNzZXQJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAACBAAAABVvcmRlclByaWNlQXNzZXRBbW91bnQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAMEAAAAD29yZGVyUHJpY2VBc3NldAkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAQEAAAACm9yZGVyT3duZXIJAQAAAAV2YWx1ZQAAAAEJAQAAABFhZGRyZXNzRnJvbVN0cmluZwAAAAEJAAGRAAAAAgkABLUAAAACBQAAAARkYXRhAgAAAAFfAAAAAAAAAAAFBAAAAAhvcmRlckFsbAMJAAAAAAAAAgkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAYCAAAABHRydWUGBwQAAAANb3JkZXJQYXNzd29yZAkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAcEAAAACm9yZGVyU3BlbnQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAgDCQEAAAACIT0AAAACBQAAAAlvcmRlclR5cGUCAAAAA2J1eQkAAAIAAAABAgAAABJJbnZhbGlkIG9yZGVyIHR5cGUDCQEAAAACIT0AAAACBQAAAApvcmRlck93bmVyCAUAAAABaQAAAAZjYWxsZXIJAAACAAAAAQIAAAAmUmV0dXJuIHNob3VsZCBiZSBjYWxsZWQgYnkgb3JkZXIgb3duZXIEAAAADHJldHVybkFtb3VudAkAAGUAAAACBQAAABVvcmRlclByaWNlQXNzZXRBbW91bnQFAAAACm9yZGVyU3BlbnQDCQAAZwAAAAIAAAAAAAAAAAAFAAAADHJldHVybkFtb3VudAkAAAIAAAABAgAAABFub3RoaW5nIHRvIHJldHVybgQAAAAGb3JkZXJzBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMCAAAABm9yZGVycwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFzBQAAAAckbWF0Y2gwBQAAAAFzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0AgAAAAAJAQAAAAV0aHJvdwAAAAAEAAAAB25ld0RhdGEJAAEsAAAAAgkBAAAACWRyb3BSaWdodAAAAAIFAAAABGRhdGEJAAExAAAAAQkAAZEAAAACCQAEtQAAAAIFAAAABGRhdGECAAAAAV8AAAAAAAAAAAcJAAGkAAAAAQUAAAAVb3JkZXJQcmljZUFzc2V0QW1vdW50BAAAAAVpbmRleAkBAAAABXZhbHVlAAAAAQkABLMAAAACBQAAAAZvcmRlcnMFAAAAB29yZGVySWQEAAAACW5ld09yZGVycwkAASwAAAACCQABLwAAAAIFAAAABm9yZGVycwUAAAAFaW5kZXgJAAEwAAAAAgUAAAAGb3JkZXJzCQAAZAAAAAIFAAAABWluZGV4CQABMQAAAAEFAAAAB29yZGVySWQJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAZvcmRlcnMFAAAACW5ld09yZGVycwkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgUAAAAHb3JkZXJJZAUAAAAHbmV3RGF0YQUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAMcmV0dXJuQW1vdW50AwkAAAAAAAACBQAAAA9vcmRlclByaWNlQXNzZXQCAAAABVdBVkVTBQAAAAR1bml0CQACWQAAAAEFAAAAD29yZGVyUHJpY2VBc3NldAUAAAADbmlsAAAAALnx/8c=",
    "chainId": 84,
    "height": 700785,
    "spentComplexity": 0
}

View: original | compacted
Prev: Do9boHeu51KxmWGzdqvKSVHdSNrJ6c1EKyFaKrHexBmN
Next: none

Diff: 
Old New Differences
32 32      }
33 33  
34 34  
35 - @Callable(i)
36 - func addAsset (j) = {
37 -     let k = (100 * 100000000)
38 -     let l = "100"
39 -     let m = valueOrErrorMessage(i.payment, "Where is payment?")
40 -     if (if (isDefined(m.assetId))
41 -         then (m.assetId != a)
35 + func i (j,k) = {
36 +     let l = if ((j == "WAVES"))
37 +         then 8
38 +         else value(assetInfo(fromBase58String(j))).decimals
39 +     let m = if ((k == "WAVES"))
40 +         then 8
41 +         else value(assetInfo(fromBase58String(k))).decimals
42 +     (m >= l)
43 +     }
44 + 
45 + 
46 + @Callable(n)
47 + func addAsset (o) = {
48 +     let p = (100 * 100000000)
49 +     let q = "100"
50 +     let r = valueOrErrorMessage(n.payment, "Where is payment?")
51 +     if (if (isDefined(r.assetId))
52 +         then (r.assetId != a)
42 53          else false)
43 54          then throw("OTCu or WAVES only")
44 -         else if ((m.amount != k))
45 -             then throw((("You have to pay " + l) + " OTCu or WAVES"))
46 -             else if (!(isDefined(assetInfo(fromBase58String(j)))))
55 +         else if ((r.amount != p))
56 +             then throw((("You have to pay " + q) + " OTCu or WAVES"))
57 +             else if (!(isDefined(assetInfo(fromBase58String(o)))))
47 58                  then throw("There is no asset with specified id")
48 59                  else {
49 -                     let n = {
60 +                     let s = {
50 61                          let e = getString(this, "assets")
51 62                          if ($isInstanceOf(e, "String"))
52 63                              then {
53 -                                 let o = e
54 -                                 o
64 +                                 let t = e
65 +                                 t
55 66                                  }
56 67                              else if ($isInstanceOf(e, "Unit"))
57 68                                  then ""
58 69                                  else throw()
59 70                          }
60 -                     if (isDefined(indexOf(n, j)))
71 +                     if (isDefined(indexOf(s, o)))
61 72                          then throw("Asset is already available")
62 -                         else WriteSet([DataEntry("assets", (n + j))])
73 +                         else WriteSet([DataEntry("assets", (s + o))])
63 74                      }
64 75      }
65 76  
66 77  
67 78  
68 - @Callable(i)
69 - func pro (p) = {
70 -     let c = toBase58String(i.caller.bytes)
71 -     let q = (50 * 100000000)
72 -     let r = "50"
73 -     let s = (10 * 100000000)
74 -     let t = "10"
75 -     let m = valueOrErrorMessage(i.payment, "Where is payment?")
76 -     if (if (isDefined(m.assetId))
77 -         then (m.assetId != a)
79 + @Callable(n)
80 + func pro (u) = {
81 +     let c = toBase58String(n.caller.bytes)
82 +     let v = (50 * 100000000)
83 +     let w = "50"
84 +     let x = (10 * 100000000)
85 +     let y = "10"
86 +     let r = valueOrErrorMessage(n.payment, "Where is payment?")
87 +     if (if (isDefined(r.assetId))
88 +         then (r.assetId != a)
78 89          else false)
79 90          then throw("OTCu or WAVES only")
80 -         else if (if (p)
81 -             then (m.amount != q)
91 +         else if (if (u)
92 +             then (r.amount != v)
82 93              else false)
83 -             then throw((("You have to pay " + r) + " OTCu or WAVES"))
84 -             else if (if (!(p))
85 -                 then (m.amount != s)
94 +             then throw((("You have to pay " + w) + " OTCu or WAVES"))
95 +             else if (if (!(u))
96 +                 then (r.amount != x)
86 97                  else false)
87 -                 then throw((("You have to pay " + t) + " OTCu or WAVES"))
98 +                 then throw((("You have to pay " + y) + " OTCu or WAVES"))
88 99                  else {
89 -                     let u = {
100 +                     let z = {
90 101                          let e = getBoolean(this, (c + "_unlimited"))
91 102                          if ($isInstanceOf(e, "Boolean"))
92 103                              then {
97 108                                  then false
98 109                                  else throw()
99 110                          }
100 -                     let v = {
111 +                     let A = {
101 112                          let e = getInteger(this, (c + "_time"))
102 113                          if ($isInstanceOf(e, "Int"))
103 114                              then {
108 119                                  then 0
109 120                                  else throw()
110 121                          }
111 -                     if (u)
122 +                     if (z)
112 123                          then throw("You have unlimited PRO status already. What do you want?")
113 124                          else {
114 -                             let w = 2629743000
115 -                             WriteSet([DataEntry((c + "_unlimited"), p), DataEntry((c + "_time"), if (p)
125 +                             let B = 2629743000
126 +                             WriteSet([DataEntry((c + "_unlimited"), u), DataEntry((c + "_time"), if (u)
116 127                                  then 0
117 -                                 else (v + w))])
128 +                                 else (A + B))])
118 129                              }
119 130                      }
120 131      }
121 132  
122 133  
123 134  
124 - @Callable(i)
125 - func makeSell (x,y,z,A) = if (if ((x != "WAVES"))
126 -     then !(isDefined(assetInfo(fromBase58String(x))))
135 + @Callable(n)
136 + func makeSell (k,C,D,E) = if (if ((k != "WAVES"))
137 +     then !(isDefined(assetInfo(fromBase58String(k))))
127 138      else false)
128 139      then throw("There is no asset with specified id")
129 -     else if ((0 >= y))
130 -         then throw("price must be positive")
140 +     else if ((0 >= C))
141 +         then throw("Amount of price asset must be positive")
131 142          else {
132 -             let m = valueOrErrorMessage(i.payment, "where is payment?")
133 -             if ((0 >= m.amount))
134 -                 then throw("amount must be positive")
143 +             let r = valueOrErrorMessage(n.payment, "Where is payment?")
144 +             if ((0 >= r.amount))
145 +                 then throw("Amount must be positive")
135 146                  else {
136 -                     let B = {
137 -                         let e = m.assetId
147 +                     let j = {
148 +                         let e = r.assetId
138 149                          if ($isInstanceOf(e, "ByteVector"))
139 150                              then {
140 -                                 let C = e
141 -                                 toBase58String(C)
151 +                                 let F = e
152 +                                 toBase58String(F)
142 153                                  }
143 154                              else "WAVES"
144 155                          }
145 -                     let n = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
146 -                     if (if (!(isDefined(indexOf(n, x))))
156 +                     let s = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
157 +                     if (if (!(isDefined(indexOf(s, k))))
147 158                          then true
148 -                         else !(isDefined(indexOf(n, B))))
159 +                         else !(isDefined(indexOf(s, j))))
149 160                          then throw("Asset are not available for trading")
150 161                          else {
151 -                             let c = toBase58String(i.caller.bytes)
162 +                             let c = toBase58String(n.caller.bytes)
152 163                              if (if (!(b(c)))
153 -                                 then if (z)
164 +                                 then if (D)
154 165                                      then true
155 -                                     else (A != "")
166 +                                     else (E != "")
156 167                                  else false)
157 168                                  then throw("You must have pro status to use these features")
158 169                                  else {
159 -                                     let D = toBase58String(i.transactionId)
160 -                                     let E = {
170 +                                     let G = toBase58String(n.transactionId)
171 +                                     let H = {
161 172                                          let e = getString(this, "orders")
162 173                                          if ($isInstanceOf(e, "String"))
163 174                                              then {
164 -                                                 let F = e
165 -                                                 F
175 +                                                 let I = e
176 +                                                 I
166 177                                                  }
167 178                                              else if ($isInstanceOf(e, "Unit"))
168 179                                                  then ""
169 180                                                  else throw()
170 181                                          }
171 -                                     let G = fromBase58String(A)
172 -                                     let H = ((((((((((((((toString(m.amount) + "_") + B) + "_") + toString(y)) + "_") + x) + "_") + c) + "_") + toString(z)) + "_") + A) + "_") + toString(0))
173 -                                     WriteSet([DataEntry("orders", (E + D)), DataEntry(D, H)])
182 +                                     let J = fromBase58String(E)
183 +                                     let K = (((((((((((((((("sell" + "_") + toString(r.amount)) + "_") + j) + "_") + toString(C)) + "_") + k) + "_") + c) + "_") + toString(D)) + "_") + E) + "_") + toString(0))
184 +                                     WriteSet([DataEntry("orders", (H + G)), DataEntry(G, K)])
174 185                                      }
175 186                              }
176 187                      }
178 189  
179 190  
180 191  
181 - @Callable(i)
182 - func makeBuy (B,y,z,A) = if (if ((B != "WAVES"))
183 -     then !(isDefined(assetInfo(fromBase58String(B))))
192 + @Callable(n)
193 + func makeBuy (j,L,D,E) = if (if ((j != "WAVES"))
194 +     then !(isDefined(assetInfo(fromBase58String(j))))
184 195      else false)
185 196      then throw("There is no asset with specified id")
186 -     else if ((0 >= y))
187 -         then throw("price must be positive")
197 +     else if ((0 >= L))
198 +         then throw("Amount must be positive")
188 199          else {
189 -             let m = valueOrErrorMessage(i.payment, "where is payment?")
190 -             if ((0 >= m.amount))
200 +             let r = valueOrErrorMessage(n.payment, "where is payment?")
201 +             let C = r.amount
202 +             if ((0 >= C))
191 203                  then throw("amount must be positive")
192 204                  else {
193 -                     let x = {
194 -                         let e = m.assetId
205 +                     let k = {
206 +                         let e = r.assetId
195 207                          if ($isInstanceOf(e, "ByteVector"))
196 208                              then {
197 -                                 let C = e
198 -                                 toBase58String(C)
209 +                                 let F = e
210 +                                 toBase58String(F)
199 211                                  }
200 212                              else "WAVES"
201 213                          }
202 -                     let n = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
203 -                     if (if (!(isDefined(indexOf(n, x))))
214 +                     let s = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
215 +                     if (if (!(isDefined(indexOf(s, k))))
204 216                          then true
205 -                         else !(isDefined(indexOf(n, B))))
217 +                         else !(isDefined(indexOf(s, j))))
206 218                          then throw("Asset are not available for trading")
207 219                          else {
208 -                             let c = toBase58String(i.caller.bytes)
220 +                             let c = toBase58String(n.caller.bytes)
209 221                              if (if (!(b(c)))
210 -                                 then if (z)
222 +                                 then if (D)
211 223                                      then true
212 -                                     else (A != "")
224 +                                     else (E != "")
213 225                                  else false)
214 226                                  then throw("You must have pro status to use these features")
215 227                                  else {
216 -                                     let D = toBase58String(i.transactionId)
217 -                                     let E = {
228 +                                     let G = toBase58String(n.transactionId)
229 +                                     let H = {
218 230                                          let e = getString(this, "orders")
219 231                                          if ($isInstanceOf(e, "String"))
220 232                                              then {
221 -                                                 let F = e
222 -                                                 F
233 +                                                 let I = e
234 +                                                 I
223 235                                                  }
224 236                                              else if ($isInstanceOf(e, "Unit"))
225 237                                                  then ""
226 238                                                  else throw()
227 239                                          }
228 -                                     let I = if ((B == "WAVES"))
229 -                                         then 8
230 -                                         else value(assetInfo(fromBase58String(B))).decimals
231 -                                     let J = ((m.amount * pow(10, 0, I, 0, 0, CEILING)) / y)
232 -                                     if ((J == 0))
240 +                                     if ((L == 0))
233 241                                          then throw("invalid buy amount")
234 242                                          else {
235 -                                             let H = ((((((((((((((toString(J) + "_") + B) + "_") + toString(y)) + "_") + x) + "_") + c) + "_") + toString(z)) + "_") + A) + "_") + toString(0))
236 -                                             WriteSet([DataEntry("orders", (E + D)), DataEntry(D, H)])
243 +                                             let K = (((((((((((((((("buy" + "_") + toString(L)) + "_") + j) + "_") + toString(C)) + "_") + k) + "_") + c) + "_") + toString(D)) + "_") + E) + "_") + toString(0))
244 +                                             WriteSet([DataEntry("orders", (H + G)), DataEntry(("buy_" + G), K)])
237 245                                              }
238 246                                      }
239 247                              }
242 250  
243 251  
244 252  
245 - @Callable(i)
246 - func takeSell (D,K) = {
247 -     let m = valueOrErrorMessage(i.payment, "where is payment?")
248 -     if ((0 >= m.amount))
249 -         then throw("amount must be positive")
253 + @Callable(n)
254 + func takeSell (G,M) = {
255 +     let r = valueOrErrorMessage(n.payment, "Where is payment?")
256 +     let C = r.amount
257 +     if ((0 >= C))
258 +         then throw("Amount must be positive")
250 259          else {
251 -             let L = {
252 -                 let e = m.assetId
260 +             let k = {
261 +                 let e = r.assetId
253 262                  if ($isInstanceOf(e, "ByteVector"))
254 263                      then {
255 -                         let C = e
256 -                         toBase58String(C)
264 +                         let F = e
265 +                         toBase58String(F)
257 266                          }
258 267                      else "WAVES"
259 268                  }
260 -             let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
261 -             let M = parseIntValue(split(H, "_")[0])
262 -             let B = split(H, "_")[1]
263 -             let y = parseIntValue(split(H, "_")[2])
264 -             let x = split(H, "_")[3]
265 -             let N = value(addressFromString(split(H, "_")[4]))
266 -             let z = if ((split(H, "_")[5] == "true"))
269 +             let K = valueOrErrorMessage(getString(this, G), "Invalid order id")
270 +             let N = split(K, "_")[0]
271 +             let O = parseIntValue(split(K, "_")[1])
272 +             let P = split(K, "_")[2]
273 +             let Q = parseIntValue(split(K, "_")[3])
274 +             let R = split(K, "_")[4]
275 +             let S = value(addressFromString(split(K, "_")[5]))
276 +             let T = if ((split(K, "_")[6] == "true"))
267 277                  then true
268 278                  else false
269 -             let A = split(H, "_")[6]
270 -             let O = parseIntValue(split(H, "_")[7])
271 -             if ((x != L))
272 -                 then throw(("Payment asset must be " + x))
273 -                 else {
274 -                     let P = if ((A != ""))
275 -                         then sigVerify(i.callerPublicKey, fromBase58String(K), fromBase58String(A))
276 -                         else true
277 -                     if (!(P))
278 -                         then throw("The order is private")
279 -                         else {
280 -                             let I = if ((B == "WAVES"))
281 -                                 then 8
282 -                                 else value(assetInfo(fromBase58String(B))).decimals
283 -                             let J = ((m.amount * pow(10, 0, I, 0, 0, CEILING)) / y)
284 -                             if ((J == 0))
285 -                                 then throw("Invalid amount")
286 -                                 else if (if (z)
287 -                                     then (M > J)
288 -                                     else false)
289 -                                     then throw("You must take all or none")
290 -                                     else if ((J > (M - O)))
291 -                                         then throw("Not enougth asset in order")
292 -                                         else {
293 -                                             let E = {
294 -                                                 let e = getString(this, "orders")
295 -                                                 if ($isInstanceOf(e, "String"))
296 -                                                     then {
297 -                                                         let F = e
298 -                                                         F
299 -                                                         }
300 -                                                     else if ($isInstanceOf(e, "Unit"))
301 -                                                         then ""
302 -                                                         else throw()
279 +             let U = split(K, "_")[7]
280 +             let V = parseIntValue(split(K, "_")[8])
281 +             if ((N != "sell"))
282 +                 then throw("Invalid order type")
283 +                 else if ((R != k))
284 +                     then throw(("Payment asset must be " + R))
285 +                     else {
286 +                         let W = if ((U != ""))
287 +                             then sigVerify(n.callerPublicKey, fromBase58String(M), fromBase58String(U))
288 +                             else true
289 +                         if (!(W))
290 +                             then throw("The order is private")
291 +                             else {
292 +                                 let L = ((C * O) / Q)
293 +                                 if ((L == 0))
294 +                                     then throw("Invalid amount")
295 +                                     else if (if (T)
296 +                                         then (O > L)
297 +                                         else false)
298 +                                         then throw("You must take all or none")
299 +                                         else if ((L > (O - V)))
300 +                                             then throw("Not enougth asset in order")
301 +                                             else {
302 +                                                 let H = {
303 +                                                     let e = getString(this, "orders")
304 +                                                     if ($isInstanceOf(e, "String"))
305 +                                                         then {
306 +                                                             let I = e
307 +                                                             I
308 +                                                             }
309 +                                                         else if ($isInstanceOf(e, "Unit"))
310 +                                                             then ""
311 +                                                             else throw()
312 +                                                     }
313 +                                                 let X = (dropRight(K, size(split(K, "_")[7])) + toString((V + L)))
314 +                                                 let Y = value(indexOf(H, G))
315 +                                                 let Z = if ((O == (L + V)))
316 +                                                     then (take(H, Y) + drop(H, (Y + size(G))))
317 +                                                     else H
318 +                                                 ScriptResult(WriteSet([DataEntry("orders", Z), DataEntry(G, X)]), TransferSet([ScriptTransfer(n.caller, L, if ((P == "WAVES"))
319 +                                                     then unit
320 +                                                     else fromBase58String(P)), ScriptTransfer(S, C, if ((R == "WAVES"))
321 +                                                     then unit
322 +                                                     else fromBase58String(R))]))
303 323                                                  }
304 -                                             let Q = (dropRight(H, size(split(H, "_")[7])) + toString((O + J)))
305 -                                             let R = value(indexOf(E, D))
306 -                                             let S = if ((M == (J + O)))
307 -                                                 then (take(E, R) + drop(E, (R + size(D))))
308 -                                                 else E
309 -                                             ScriptResult(WriteSet([DataEntry("orders", S), DataEntry(D, Q)]), TransferSet([ScriptTransfer(i.caller, J, if ((B == "WAVES"))
310 -                                                 then unit
311 -                                                 else fromBase58String(B)), ScriptTransfer(N, m.amount, if ((x == "WAVES"))
312 -                                                 then unit
313 -                                                 else fromBase58String(x))]))
314 -                                             }
315 -                             }
316 -                     }
324 +                                 }
325 +                         }
317 326              }
318 327      }
319 328  
320 329  
321 330  
322 - @Callable(i)
323 - func takeBuy (D,K) = {
324 -     let m = valueOrErrorMessage(i.payment, "where is payment?")
325 -     if ((0 >= m.amount))
331 + @Callable(n)
332 + func takeBuy (G,M) = {
333 +     let r = valueOrErrorMessage(n.payment, "where is payment?")
334 +     let L = r.amount
335 +     if ((0 >= L))
326 336          then throw("amount must be positive")
327 337          else {
328 -             let L = {
329 -                 let e = m.assetId
338 +             let j = {
339 +                 let e = r.assetId
330 340                  if ($isInstanceOf(e, "ByteVector"))
331 341                      then {
332 -                         let C = e
333 -                         toBase58String(C)
342 +                         let F = e
343 +                         toBase58String(F)
334 344                          }
335 345                      else "WAVES"
336 346                  }
337 -             let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
338 -             let M = parseIntValue(split(H, "_")[0])
339 -             let B = split(H, "_")[1]
340 -             let y = parseIntValue(split(H, "_")[2])
341 -             let x = split(H, "_")[3]
342 -             let N = value(addressFromString(split(H, "_")[4]))
343 -             let z = if ((split(H, "_")[5] == "true"))
347 +             let K = valueOrErrorMessage(getString(this, G), "Invalid order id")
348 +             let N = split(K, "_")[0]
349 +             let O = parseIntValue(split(K, "_")[1])
350 +             let P = split(K, "_")[2]
351 +             let Q = parseIntValue(split(K, "_")[3])
352 +             let R = split(K, "_")[4]
353 +             let S = value(addressFromString(split(K, "_")[5]))
354 +             let T = if ((split(K, "_")[6] == "true"))
344 355                  then true
345 356                  else false
346 -             let A = split(H, "_")[6]
347 -             let O = parseIntValue(split(H, "_")[7])
348 -             if ((B != L))
349 -                 then throw(("payment asset must be " + B))
350 -                 else {
351 -                     let P = if ((A != ""))
352 -                         then sigVerify(i.callerPublicKey, fromBase58String(K), fromBase58String(A))
353 -                         else true
354 -                     if (!(P))
355 -                         then throw("The order is private")
356 -                         else {
357 -                             let I = if ((B == "WAVES"))
358 -                                 then 8
359 -                                 else value(assetInfo(fromBase58String(B))).decimals
360 -                             let T = ((m.amount * y) / pow(10, 0, I, 0, 0, CEILING))
361 -                             if ((T == 0))
362 -                                 then throw("invalid amount")
363 -                                 else if (if (z)
364 -                                     then (M > T)
365 -                                     else false)
366 -                                     then throw("You must take all or none")
367 -                                     else if ((m.amount > (M - O)))
368 -                                         then throw("not enougth asset in order")
369 -                                         else {
370 -                                             let E = {
371 -                                                 let e = getString(this, "orders")
372 -                                                 if ($isInstanceOf(e, "String"))
373 -                                                     then {
374 -                                                         let F = e
375 -                                                         F
376 -                                                         }
377 -                                                     else if ($isInstanceOf(e, "Unit"))
378 -                                                         then ""
379 -                                                         else throw()
357 +             let U = split(K, "_")[7]
358 +             let V = parseIntValue(split(K, "_")[8])
359 +             if ((N != "buy"))
360 +                 then throw("Invalid order type")
361 +                 else if ((P != j))
362 +                     then throw(("payment asset must be " + P))
363 +                     else {
364 +                         let W = if ((U != ""))
365 +                             then sigVerify(n.callerPublicKey, fromBase58String(M), fromBase58String(U))
366 +                             else true
367 +                         if (!(W))
368 +                             then throw("The order is private")
369 +                             else {
370 +                                 let C = ((L * Q) / O)
371 +                                 if ((C == 0))
372 +                                     then throw("Invalid amount")
373 +                                     else if (if (T)
374 +                                         then (Q > C)
375 +                                         else false)
376 +                                         then throw("You must take all or none")
377 +                                         else if ((C > (Q - V)))
378 +                                             then throw("not enougth asset in order")
379 +                                             else {
380 +                                                 let H = {
381 +                                                     let e = getString(this, "orders")
382 +                                                     if ($isInstanceOf(e, "String"))
383 +                                                         then {
384 +                                                             let I = e
385 +                                                             I
386 +                                                             }
387 +                                                         else if ($isInstanceOf(e, "Unit"))
388 +                                                             then ""
389 +                                                             else throw()
390 +                                                     }
391 +                                                 let X = (dropRight(K, size(split(K, "_")[7])) + toString((V + C)))
392 +                                                 let Y = value(indexOf(H, G))
393 +                                                 let Z = if ((Q == (C + V)))
394 +                                                     then (take(H, Y) + drop(H, (Y + size(G))))
395 +                                                     else H
396 +                                                 ScriptResult(WriteSet([DataEntry("orders", Z), DataEntry(G, X)]), TransferSet([ScriptTransfer(n.caller, C, if ((R == "WAVES"))
397 +                                                     then unit
398 +                                                     else fromBase58String(R)), ScriptTransfer(S, L, if ((P == "WAVES"))
399 +                                                     then unit
400 +                                                     else fromBase58String(P))]))
380 401                                                  }
381 -                                             let Q = (dropRight(H, size(split(H, "_")[7])) + toString((O + m.amount)))
382 -                                             let R = value(indexOf(E, D))
383 -                                             let S = if ((M == (m.amount + O)))
384 -                                                 then (take(E, R) + drop(E, (R + size(D))))
385 -                                                 else E
386 -                                             ScriptResult(WriteSet([DataEntry("orders", S), DataEntry(D, Q)]), TransferSet([ScriptTransfer(i.caller, T, if ((x == "WAVES"))
387 -                                                 then unit
388 -                                                 else fromBase58String(x)), ScriptTransfer(N, m.amount, if ((B == "WAVES"))
389 -                                                 then unit
390 -                                                 else fromBase58String(B))]))
391 -                                             }
392 -                             }
393 -                     }
402 +                                 }
403 +                         }
394 404              }
395 405      }
396 406  
397 407  
398 408  
399 - @Callable(i)
400 - func returnBuy (D) = {
401 -     let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
402 -     let M = parseIntValue(split(H, "_")[0])
403 -     let B = split(H, "_")[1]
404 -     let y = parseIntValue(split(H, "_")[2])
405 -     let x = split(H, "_")[3]
406 -     let N = value(addressFromString(split(H, "_")[4]))
407 -     let z = if ((split(H, "_")[5] == "true"))
409 + @Callable(n)
410 + func returnSell (G) = {
411 +     let K = valueOrErrorMessage(getString(this, ("sell_" + G)), "Invalid order id")
412 +     let N = split(K, "_")[0]
413 +     let O = parseIntValue(split(K, "_")[1])
414 +     let P = split(K, "_")[2]
415 +     let Q = parseIntValue(split(K, "_")[3])
416 +     let R = split(K, "_")[4]
417 +     let S = value(addressFromString(split(K, "_")[5]))
418 +     let T = if ((split(K, "_")[6] == "true"))
408 419          then true
409 420          else false
410 -     let A = split(H, "_")[6]
411 -     let O = parseIntValue(split(H, "_")[7])
412 -     if ((N != i.caller))
413 -         then throw("Return should be called by order owner")
414 -         else {
415 -             let I = if ((B == "WAVES"))
416 -                 then 8
417 -                 else value(assetInfo(fromBase58String(B))).decimals
418 -             let U = (((M - O) * y) / pow(10, 0, I, 0, 0, CEILING))
419 -             if ((0 >= U))
420 -                 then throw("nothing to return")
421 -                 else {
422 -                     let E = {
423 -                         let e = getString(this, "orders")
424 -                         if ($isInstanceOf(e, "String"))
425 -                             then {
426 -                                 let F = e
427 -                                 F
428 -                                 }
429 -                             else if ($isInstanceOf(e, "Unit"))
430 -                                 then ""
431 -                                 else throw()
421 +     let U = split(K, "_")[7]
422 +     let V = parseIntValue(split(K, "_")[8])
423 +     if ((N != "sell"))
424 +         then throw("Invalid order type")
425 +         else if ((S != n.caller))
426 +             then throw("return should be called by order owner")
427 +             else {
428 +                 let aa = (O - V)
429 +                 if ((0 >= aa))
430 +                     then throw("nothing to return")
431 +                     else {
432 +                         let H = {
433 +                             let e = getString(this, "orders")
434 +                             if ($isInstanceOf(e, "String"))
435 +                                 then {
436 +                                     let I = e
437 +                                     I
438 +                                     }
439 +                                 else if ($isInstanceOf(e, "Unit"))
440 +                                     then ""
441 +                                     else throw()
442 +                             }
443 +                         let X = (dropRight(K, size(split(K, "_")[7])) + toString(O))
444 +                         let Y = value(indexOf(H, G))
445 +                         let Z = (take(H, Y) + drop(H, (Y + size(G))))
446 +                         ScriptResult(WriteSet([DataEntry("orders", Z), DataEntry(G, X)]), TransferSet([ScriptTransfer(n.caller, aa, if ((P == "WAVES"))
447 +                             then unit
448 +                             else fromBase58String(P))]))
432 449                          }
433 -                     let Q = (dropRight(H, size(split(H, "_")[7])) + toString(M))
434 -                     let R = value(indexOf(E, D))
435 -                     let S = (take(E, R) + drop(E, (R + size(D))))
436 -                     ScriptResult(WriteSet([DataEntry("orders", S), DataEntry(D, Q)]), TransferSet([ScriptTransfer(i.caller, U, if ((x == "WAVES"))
437 -                         then unit
438 -                         else fromBase58String(x))]))
439 -                     }
440 -             }
450 +                 }
441 451      }
442 452  
443 453  
444 454  
445 - @Callable(i)
446 - func returnSell (D) = {
447 -     let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
448 -     let M = parseIntValue(split(H, "_")[0])
449 -     let B = split(H, "_")[1]
450 -     let y = parseIntValue(split(H, "_")[2])
451 -     let x = split(H, "_")[3]
452 -     let N = value(addressFromString(split(H, "_")[4]))
453 -     let z = if ((split(H, "_")[5] == "true"))
455 + @Callable(n)
456 + func returnBuy (G) = {
457 +     let K = valueOrErrorMessage(getString(this, G), "Invalid order id")
458 +     let N = split(K, "_")[0]
459 +     let O = parseIntValue(split(K, "_")[1])
460 +     let P = split(K, "_")[2]
461 +     let Q = parseIntValue(split(K, "_")[3])
462 +     let R = split(K, "_")[4]
463 +     let S = value(addressFromString(split(K, "_")[5]))
464 +     let T = if ((split(K, "_")[6] == "true"))
454 465          then true
455 466          else false
456 -     let A = split(H, "_")[6]
457 -     let O = parseIntValue(split(H, "_")[7])
458 -     if ((N != i.caller))
459 -         then throw("return should be called by order owner")
460 -         else {
461 -             let U = (M - O)
462 -             if ((0 >= U))
463 -                 then throw("nothing to return")
464 -                 else {
465 -                     let E = {
466 -                         let e = getString(this, "orders")
467 -                         if ($isInstanceOf(e, "String"))
468 -                             then {
469 -                                 let F = e
470 -                                 F
471 -                                 }
472 -                             else if ($isInstanceOf(e, "Unit"))
473 -                                 then ""
474 -                                 else throw()
467 +     let U = split(K, "_")[7]
468 +     let V = parseIntValue(split(K, "_")[8])
469 +     if ((N != "buy"))
470 +         then throw("Invalid order type")
471 +         else if ((S != n.caller))
472 +             then throw("Return should be called by order owner")
473 +             else {
474 +                 let aa = (Q - V)
475 +                 if ((0 >= aa))
476 +                     then throw("nothing to return")
477 +                     else {
478 +                         let H = {
479 +                             let e = getString(this, "orders")
480 +                             if ($isInstanceOf(e, "String"))
481 +                                 then {
482 +                                     let I = e
483 +                                     I
484 +                                     }
485 +                                 else if ($isInstanceOf(e, "Unit"))
486 +                                     then ""
487 +                                     else throw()
488 +                             }
489 +                         let X = (dropRight(K, size(split(K, "_")[7])) + toString(Q))
490 +                         let Y = value(indexOf(H, G))
491 +                         let Z = (take(H, Y) + drop(H, (Y + size(G))))
492 +                         ScriptResult(WriteSet([DataEntry("orders", Z), DataEntry(G, X)]), TransferSet([ScriptTransfer(n.caller, aa, if ((R == "WAVES"))
493 +                             then unit
494 +                             else fromBase58String(R))]))
475 495                          }
476 -                     let Q = (dropRight(H, size(split(H, "_")[7])) + toString(M))
477 -                     let R = value(indexOf(E, D))
478 -                     let S = (take(E, R) + drop(E, (R + size(D))))
479 -                     ScriptResult(WriteSet([DataEntry("orders", S), DataEntry(D, Q)]), TransferSet([ScriptTransfer(i.caller, U, if ((B == "WAVES"))
480 -                         then unit
481 -                         else fromBase58String(B))]))
482 -                     }
483 -             }
496 +                 }
484 497      }
485 498  
486 499  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = base58'9qh2MiJhfqNS1o3R5wcUrAAWpeqZs9R8SLwQvCx88Vaf'
5 5  
6 6  func b (c) = {
7 7      let d = {
8 8          let e = getBoolean(this, (c + "_unlimited"))
9 9          if ($isInstanceOf(e, "Boolean"))
10 10              then {
11 11                  let f = e
12 12                  f
13 13                  }
14 14              else if ($isInstanceOf(e, "Unit"))
15 15                  then false
16 16                  else throw()
17 17          }
18 18      let g = {
19 19          let e = getInteger(this, (c + "_time"))
20 20          if ($isInstanceOf(e, "Int"))
21 21              then {
22 22                  let h = e
23 23                  h
24 24                  }
25 25              else if ($isInstanceOf(e, "Unit"))
26 26                  then 0
27 27                  else throw()
28 28          }
29 29      if (d)
30 30          then true
31 31          else (g > lastBlock.timestamp)
32 32      }
33 33  
34 34  
35 - @Callable(i)
36 - func addAsset (j) = {
37 -     let k = (100 * 100000000)
38 -     let l = "100"
39 -     let m = valueOrErrorMessage(i.payment, "Where is payment?")
40 -     if (if (isDefined(m.assetId))
41 -         then (m.assetId != a)
35 + func i (j,k) = {
36 +     let l = if ((j == "WAVES"))
37 +         then 8
38 +         else value(assetInfo(fromBase58String(j))).decimals
39 +     let m = if ((k == "WAVES"))
40 +         then 8
41 +         else value(assetInfo(fromBase58String(k))).decimals
42 +     (m >= l)
43 +     }
44 + 
45 + 
46 + @Callable(n)
47 + func addAsset (o) = {
48 +     let p = (100 * 100000000)
49 +     let q = "100"
50 +     let r = valueOrErrorMessage(n.payment, "Where is payment?")
51 +     if (if (isDefined(r.assetId))
52 +         then (r.assetId != a)
42 53          else false)
43 54          then throw("OTCu or WAVES only")
44 -         else if ((m.amount != k))
45 -             then throw((("You have to pay " + l) + " OTCu or WAVES"))
46 -             else if (!(isDefined(assetInfo(fromBase58String(j)))))
55 +         else if ((r.amount != p))
56 +             then throw((("You have to pay " + q) + " OTCu or WAVES"))
57 +             else if (!(isDefined(assetInfo(fromBase58String(o)))))
47 58                  then throw("There is no asset with specified id")
48 59                  else {
49 -                     let n = {
60 +                     let s = {
50 61                          let e = getString(this, "assets")
51 62                          if ($isInstanceOf(e, "String"))
52 63                              then {
53 -                                 let o = e
54 -                                 o
64 +                                 let t = e
65 +                                 t
55 66                                  }
56 67                              else if ($isInstanceOf(e, "Unit"))
57 68                                  then ""
58 69                                  else throw()
59 70                          }
60 -                     if (isDefined(indexOf(n, j)))
71 +                     if (isDefined(indexOf(s, o)))
61 72                          then throw("Asset is already available")
62 -                         else WriteSet([DataEntry("assets", (n + j))])
73 +                         else WriteSet([DataEntry("assets", (s + o))])
63 74                      }
64 75      }
65 76  
66 77  
67 78  
68 - @Callable(i)
69 - func pro (p) = {
70 -     let c = toBase58String(i.caller.bytes)
71 -     let q = (50 * 100000000)
72 -     let r = "50"
73 -     let s = (10 * 100000000)
74 -     let t = "10"
75 -     let m = valueOrErrorMessage(i.payment, "Where is payment?")
76 -     if (if (isDefined(m.assetId))
77 -         then (m.assetId != a)
79 + @Callable(n)
80 + func pro (u) = {
81 +     let c = toBase58String(n.caller.bytes)
82 +     let v = (50 * 100000000)
83 +     let w = "50"
84 +     let x = (10 * 100000000)
85 +     let y = "10"
86 +     let r = valueOrErrorMessage(n.payment, "Where is payment?")
87 +     if (if (isDefined(r.assetId))
88 +         then (r.assetId != a)
78 89          else false)
79 90          then throw("OTCu or WAVES only")
80 -         else if (if (p)
81 -             then (m.amount != q)
91 +         else if (if (u)
92 +             then (r.amount != v)
82 93              else false)
83 -             then throw((("You have to pay " + r) + " OTCu or WAVES"))
84 -             else if (if (!(p))
85 -                 then (m.amount != s)
94 +             then throw((("You have to pay " + w) + " OTCu or WAVES"))
95 +             else if (if (!(u))
96 +                 then (r.amount != x)
86 97                  else false)
87 -                 then throw((("You have to pay " + t) + " OTCu or WAVES"))
98 +                 then throw((("You have to pay " + y) + " OTCu or WAVES"))
88 99                  else {
89 -                     let u = {
100 +                     let z = {
90 101                          let e = getBoolean(this, (c + "_unlimited"))
91 102                          if ($isInstanceOf(e, "Boolean"))
92 103                              then {
93 104                                  let f = e
94 105                                  f
95 106                                  }
96 107                              else if ($isInstanceOf(e, "Unit"))
97 108                                  then false
98 109                                  else throw()
99 110                          }
100 -                     let v = {
111 +                     let A = {
101 112                          let e = getInteger(this, (c + "_time"))
102 113                          if ($isInstanceOf(e, "Int"))
103 114                              then {
104 115                                  let h = e
105 116                                  h
106 117                                  }
107 118                              else if ($isInstanceOf(e, "Unit"))
108 119                                  then 0
109 120                                  else throw()
110 121                          }
111 -                     if (u)
122 +                     if (z)
112 123                          then throw("You have unlimited PRO status already. What do you want?")
113 124                          else {
114 -                             let w = 2629743000
115 -                             WriteSet([DataEntry((c + "_unlimited"), p), DataEntry((c + "_time"), if (p)
125 +                             let B = 2629743000
126 +                             WriteSet([DataEntry((c + "_unlimited"), u), DataEntry((c + "_time"), if (u)
116 127                                  then 0
117 -                                 else (v + w))])
128 +                                 else (A + B))])
118 129                              }
119 130                      }
120 131      }
121 132  
122 133  
123 134  
124 - @Callable(i)
125 - func makeSell (x,y,z,A) = if (if ((x != "WAVES"))
126 -     then !(isDefined(assetInfo(fromBase58String(x))))
135 + @Callable(n)
136 + func makeSell (k,C,D,E) = if (if ((k != "WAVES"))
137 +     then !(isDefined(assetInfo(fromBase58String(k))))
127 138      else false)
128 139      then throw("There is no asset with specified id")
129 -     else if ((0 >= y))
130 -         then throw("price must be positive")
140 +     else if ((0 >= C))
141 +         then throw("Amount of price asset must be positive")
131 142          else {
132 -             let m = valueOrErrorMessage(i.payment, "where is payment?")
133 -             if ((0 >= m.amount))
134 -                 then throw("amount must be positive")
143 +             let r = valueOrErrorMessage(n.payment, "Where is payment?")
144 +             if ((0 >= r.amount))
145 +                 then throw("Amount must be positive")
135 146                  else {
136 -                     let B = {
137 -                         let e = m.assetId
147 +                     let j = {
148 +                         let e = r.assetId
138 149                          if ($isInstanceOf(e, "ByteVector"))
139 150                              then {
140 -                                 let C = e
141 -                                 toBase58String(C)
151 +                                 let F = e
152 +                                 toBase58String(F)
142 153                                  }
143 154                              else "WAVES"
144 155                          }
145 -                     let n = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
146 -                     if (if (!(isDefined(indexOf(n, x))))
156 +                     let s = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
157 +                     if (if (!(isDefined(indexOf(s, k))))
147 158                          then true
148 -                         else !(isDefined(indexOf(n, B))))
159 +                         else !(isDefined(indexOf(s, j))))
149 160                          then throw("Asset are not available for trading")
150 161                          else {
151 -                             let c = toBase58String(i.caller.bytes)
162 +                             let c = toBase58String(n.caller.bytes)
152 163                              if (if (!(b(c)))
153 -                                 then if (z)
164 +                                 then if (D)
154 165                                      then true
155 -                                     else (A != "")
166 +                                     else (E != "")
156 167                                  else false)
157 168                                  then throw("You must have pro status to use these features")
158 169                                  else {
159 -                                     let D = toBase58String(i.transactionId)
160 -                                     let E = {
170 +                                     let G = toBase58String(n.transactionId)
171 +                                     let H = {
161 172                                          let e = getString(this, "orders")
162 173                                          if ($isInstanceOf(e, "String"))
163 174                                              then {
164 -                                                 let F = e
165 -                                                 F
175 +                                                 let I = e
176 +                                                 I
166 177                                                  }
167 178                                              else if ($isInstanceOf(e, "Unit"))
168 179                                                  then ""
169 180                                                  else throw()
170 181                                          }
171 -                                     let G = fromBase58String(A)
172 -                                     let H = ((((((((((((((toString(m.amount) + "_") + B) + "_") + toString(y)) + "_") + x) + "_") + c) + "_") + toString(z)) + "_") + A) + "_") + toString(0))
173 -                                     WriteSet([DataEntry("orders", (E + D)), DataEntry(D, H)])
182 +                                     let J = fromBase58String(E)
183 +                                     let K = (((((((((((((((("sell" + "_") + toString(r.amount)) + "_") + j) + "_") + toString(C)) + "_") + k) + "_") + c) + "_") + toString(D)) + "_") + E) + "_") + toString(0))
184 +                                     WriteSet([DataEntry("orders", (H + G)), DataEntry(G, K)])
174 185                                      }
175 186                              }
176 187                      }
177 188              }
178 189  
179 190  
180 191  
181 - @Callable(i)
182 - func makeBuy (B,y,z,A) = if (if ((B != "WAVES"))
183 -     then !(isDefined(assetInfo(fromBase58String(B))))
192 + @Callable(n)
193 + func makeBuy (j,L,D,E) = if (if ((j != "WAVES"))
194 +     then !(isDefined(assetInfo(fromBase58String(j))))
184 195      else false)
185 196      then throw("There is no asset with specified id")
186 -     else if ((0 >= y))
187 -         then throw("price must be positive")
197 +     else if ((0 >= L))
198 +         then throw("Amount must be positive")
188 199          else {
189 -             let m = valueOrErrorMessage(i.payment, "where is payment?")
190 -             if ((0 >= m.amount))
200 +             let r = valueOrErrorMessage(n.payment, "where is payment?")
201 +             let C = r.amount
202 +             if ((0 >= C))
191 203                  then throw("amount must be positive")
192 204                  else {
193 -                     let x = {
194 -                         let e = m.assetId
205 +                     let k = {
206 +                         let e = r.assetId
195 207                          if ($isInstanceOf(e, "ByteVector"))
196 208                              then {
197 -                                 let C = e
198 -                                 toBase58String(C)
209 +                                 let F = e
210 +                                 toBase58String(F)
199 211                                  }
200 212                              else "WAVES"
201 213                          }
202 -                     let n = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
203 -                     if (if (!(isDefined(indexOf(n, x))))
214 +                     let s = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
215 +                     if (if (!(isDefined(indexOf(s, k))))
204 216                          then true
205 -                         else !(isDefined(indexOf(n, B))))
217 +                         else !(isDefined(indexOf(s, j))))
206 218                          then throw("Asset are not available for trading")
207 219                          else {
208 -                             let c = toBase58String(i.caller.bytes)
220 +                             let c = toBase58String(n.caller.bytes)
209 221                              if (if (!(b(c)))
210 -                                 then if (z)
222 +                                 then if (D)
211 223                                      then true
212 -                                     else (A != "")
224 +                                     else (E != "")
213 225                                  else false)
214 226                                  then throw("You must have pro status to use these features")
215 227                                  else {
216 -                                     let D = toBase58String(i.transactionId)
217 -                                     let E = {
228 +                                     let G = toBase58String(n.transactionId)
229 +                                     let H = {
218 230                                          let e = getString(this, "orders")
219 231                                          if ($isInstanceOf(e, "String"))
220 232                                              then {
221 -                                                 let F = e
222 -                                                 F
233 +                                                 let I = e
234 +                                                 I
223 235                                                  }
224 236                                              else if ($isInstanceOf(e, "Unit"))
225 237                                                  then ""
226 238                                                  else throw()
227 239                                          }
228 -                                     let I = if ((B == "WAVES"))
229 -                                         then 8
230 -                                         else value(assetInfo(fromBase58String(B))).decimals
231 -                                     let J = ((m.amount * pow(10, 0, I, 0, 0, CEILING)) / y)
232 -                                     if ((J == 0))
240 +                                     if ((L == 0))
233 241                                          then throw("invalid buy amount")
234 242                                          else {
235 -                                             let H = ((((((((((((((toString(J) + "_") + B) + "_") + toString(y)) + "_") + x) + "_") + c) + "_") + toString(z)) + "_") + A) + "_") + toString(0))
236 -                                             WriteSet([DataEntry("orders", (E + D)), DataEntry(D, H)])
243 +                                             let K = (((((((((((((((("buy" + "_") + toString(L)) + "_") + j) + "_") + toString(C)) + "_") + k) + "_") + c) + "_") + toString(D)) + "_") + E) + "_") + toString(0))
244 +                                             WriteSet([DataEntry("orders", (H + G)), DataEntry(("buy_" + G), K)])
237 245                                              }
238 246                                      }
239 247                              }
240 248                      }
241 249              }
242 250  
243 251  
244 252  
245 - @Callable(i)
246 - func takeSell (D,K) = {
247 -     let m = valueOrErrorMessage(i.payment, "where is payment?")
248 -     if ((0 >= m.amount))
249 -         then throw("amount must be positive")
253 + @Callable(n)
254 + func takeSell (G,M) = {
255 +     let r = valueOrErrorMessage(n.payment, "Where is payment?")
256 +     let C = r.amount
257 +     if ((0 >= C))
258 +         then throw("Amount must be positive")
250 259          else {
251 -             let L = {
252 -                 let e = m.assetId
260 +             let k = {
261 +                 let e = r.assetId
253 262                  if ($isInstanceOf(e, "ByteVector"))
254 263                      then {
255 -                         let C = e
256 -                         toBase58String(C)
264 +                         let F = e
265 +                         toBase58String(F)
257 266                          }
258 267                      else "WAVES"
259 268                  }
260 -             let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
261 -             let M = parseIntValue(split(H, "_")[0])
262 -             let B = split(H, "_")[1]
263 -             let y = parseIntValue(split(H, "_")[2])
264 -             let x = split(H, "_")[3]
265 -             let N = value(addressFromString(split(H, "_")[4]))
266 -             let z = if ((split(H, "_")[5] == "true"))
269 +             let K = valueOrErrorMessage(getString(this, G), "Invalid order id")
270 +             let N = split(K, "_")[0]
271 +             let O = parseIntValue(split(K, "_")[1])
272 +             let P = split(K, "_")[2]
273 +             let Q = parseIntValue(split(K, "_")[3])
274 +             let R = split(K, "_")[4]
275 +             let S = value(addressFromString(split(K, "_")[5]))
276 +             let T = if ((split(K, "_")[6] == "true"))
267 277                  then true
268 278                  else false
269 -             let A = split(H, "_")[6]
270 -             let O = parseIntValue(split(H, "_")[7])
271 -             if ((x != L))
272 -                 then throw(("Payment asset must be " + x))
273 -                 else {
274 -                     let P = if ((A != ""))
275 -                         then sigVerify(i.callerPublicKey, fromBase58String(K), fromBase58String(A))
276 -                         else true
277 -                     if (!(P))
278 -                         then throw("The order is private")
279 -                         else {
280 -                             let I = if ((B == "WAVES"))
281 -                                 then 8
282 -                                 else value(assetInfo(fromBase58String(B))).decimals
283 -                             let J = ((m.amount * pow(10, 0, I, 0, 0, CEILING)) / y)
284 -                             if ((J == 0))
285 -                                 then throw("Invalid amount")
286 -                                 else if (if (z)
287 -                                     then (M > J)
288 -                                     else false)
289 -                                     then throw("You must take all or none")
290 -                                     else if ((J > (M - O)))
291 -                                         then throw("Not enougth asset in order")
292 -                                         else {
293 -                                             let E = {
294 -                                                 let e = getString(this, "orders")
295 -                                                 if ($isInstanceOf(e, "String"))
296 -                                                     then {
297 -                                                         let F = e
298 -                                                         F
299 -                                                         }
300 -                                                     else if ($isInstanceOf(e, "Unit"))
301 -                                                         then ""
302 -                                                         else throw()
279 +             let U = split(K, "_")[7]
280 +             let V = parseIntValue(split(K, "_")[8])
281 +             if ((N != "sell"))
282 +                 then throw("Invalid order type")
283 +                 else if ((R != k))
284 +                     then throw(("Payment asset must be " + R))
285 +                     else {
286 +                         let W = if ((U != ""))
287 +                             then sigVerify(n.callerPublicKey, fromBase58String(M), fromBase58String(U))
288 +                             else true
289 +                         if (!(W))
290 +                             then throw("The order is private")
291 +                             else {
292 +                                 let L = ((C * O) / Q)
293 +                                 if ((L == 0))
294 +                                     then throw("Invalid amount")
295 +                                     else if (if (T)
296 +                                         then (O > L)
297 +                                         else false)
298 +                                         then throw("You must take all or none")
299 +                                         else if ((L > (O - V)))
300 +                                             then throw("Not enougth asset in order")
301 +                                             else {
302 +                                                 let H = {
303 +                                                     let e = getString(this, "orders")
304 +                                                     if ($isInstanceOf(e, "String"))
305 +                                                         then {
306 +                                                             let I = e
307 +                                                             I
308 +                                                             }
309 +                                                         else if ($isInstanceOf(e, "Unit"))
310 +                                                             then ""
311 +                                                             else throw()
312 +                                                     }
313 +                                                 let X = (dropRight(K, size(split(K, "_")[7])) + toString((V + L)))
314 +                                                 let Y = value(indexOf(H, G))
315 +                                                 let Z = if ((O == (L + V)))
316 +                                                     then (take(H, Y) + drop(H, (Y + size(G))))
317 +                                                     else H
318 +                                                 ScriptResult(WriteSet([DataEntry("orders", Z), DataEntry(G, X)]), TransferSet([ScriptTransfer(n.caller, L, if ((P == "WAVES"))
319 +                                                     then unit
320 +                                                     else fromBase58String(P)), ScriptTransfer(S, C, if ((R == "WAVES"))
321 +                                                     then unit
322 +                                                     else fromBase58String(R))]))
303 323                                                  }
304 -                                             let Q = (dropRight(H, size(split(H, "_")[7])) + toString((O + J)))
305 -                                             let R = value(indexOf(E, D))
306 -                                             let S = if ((M == (J + O)))
307 -                                                 then (take(E, R) + drop(E, (R + size(D))))
308 -                                                 else E
309 -                                             ScriptResult(WriteSet([DataEntry("orders", S), DataEntry(D, Q)]), TransferSet([ScriptTransfer(i.caller, J, if ((B == "WAVES"))
310 -                                                 then unit
311 -                                                 else fromBase58String(B)), ScriptTransfer(N, m.amount, if ((x == "WAVES"))
312 -                                                 then unit
313 -                                                 else fromBase58String(x))]))
314 -                                             }
315 -                             }
316 -                     }
324 +                                 }
325 +                         }
317 326              }
318 327      }
319 328  
320 329  
321 330  
322 - @Callable(i)
323 - func takeBuy (D,K) = {
324 -     let m = valueOrErrorMessage(i.payment, "where is payment?")
325 -     if ((0 >= m.amount))
331 + @Callable(n)
332 + func takeBuy (G,M) = {
333 +     let r = valueOrErrorMessage(n.payment, "where is payment?")
334 +     let L = r.amount
335 +     if ((0 >= L))
326 336          then throw("amount must be positive")
327 337          else {
328 -             let L = {
329 -                 let e = m.assetId
338 +             let j = {
339 +                 let e = r.assetId
330 340                  if ($isInstanceOf(e, "ByteVector"))
331 341                      then {
332 -                         let C = e
333 -                         toBase58String(C)
342 +                         let F = e
343 +                         toBase58String(F)
334 344                          }
335 345                      else "WAVES"
336 346                  }
337 -             let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
338 -             let M = parseIntValue(split(H, "_")[0])
339 -             let B = split(H, "_")[1]
340 -             let y = parseIntValue(split(H, "_")[2])
341 -             let x = split(H, "_")[3]
342 -             let N = value(addressFromString(split(H, "_")[4]))
343 -             let z = if ((split(H, "_")[5] == "true"))
347 +             let K = valueOrErrorMessage(getString(this, G), "Invalid order id")
348 +             let N = split(K, "_")[0]
349 +             let O = parseIntValue(split(K, "_")[1])
350 +             let P = split(K, "_")[2]
351 +             let Q = parseIntValue(split(K, "_")[3])
352 +             let R = split(K, "_")[4]
353 +             let S = value(addressFromString(split(K, "_")[5]))
354 +             let T = if ((split(K, "_")[6] == "true"))
344 355                  then true
345 356                  else false
346 -             let A = split(H, "_")[6]
347 -             let O = parseIntValue(split(H, "_")[7])
348 -             if ((B != L))
349 -                 then throw(("payment asset must be " + B))
350 -                 else {
351 -                     let P = if ((A != ""))
352 -                         then sigVerify(i.callerPublicKey, fromBase58String(K), fromBase58String(A))
353 -                         else true
354 -                     if (!(P))
355 -                         then throw("The order is private")
356 -                         else {
357 -                             let I = if ((B == "WAVES"))
358 -                                 then 8
359 -                                 else value(assetInfo(fromBase58String(B))).decimals
360 -                             let T = ((m.amount * y) / pow(10, 0, I, 0, 0, CEILING))
361 -                             if ((T == 0))
362 -                                 then throw("invalid amount")
363 -                                 else if (if (z)
364 -                                     then (M > T)
365 -                                     else false)
366 -                                     then throw("You must take all or none")
367 -                                     else if ((m.amount > (M - O)))
368 -                                         then throw("not enougth asset in order")
369 -                                         else {
370 -                                             let E = {
371 -                                                 let e = getString(this, "orders")
372 -                                                 if ($isInstanceOf(e, "String"))
373 -                                                     then {
374 -                                                         let F = e
375 -                                                         F
376 -                                                         }
377 -                                                     else if ($isInstanceOf(e, "Unit"))
378 -                                                         then ""
379 -                                                         else throw()
357 +             let U = split(K, "_")[7]
358 +             let V = parseIntValue(split(K, "_")[8])
359 +             if ((N != "buy"))
360 +                 then throw("Invalid order type")
361 +                 else if ((P != j))
362 +                     then throw(("payment asset must be " + P))
363 +                     else {
364 +                         let W = if ((U != ""))
365 +                             then sigVerify(n.callerPublicKey, fromBase58String(M), fromBase58String(U))
366 +                             else true
367 +                         if (!(W))
368 +                             then throw("The order is private")
369 +                             else {
370 +                                 let C = ((L * Q) / O)
371 +                                 if ((C == 0))
372 +                                     then throw("Invalid amount")
373 +                                     else if (if (T)
374 +                                         then (Q > C)
375 +                                         else false)
376 +                                         then throw("You must take all or none")
377 +                                         else if ((C > (Q - V)))
378 +                                             then throw("not enougth asset in order")
379 +                                             else {
380 +                                                 let H = {
381 +                                                     let e = getString(this, "orders")
382 +                                                     if ($isInstanceOf(e, "String"))
383 +                                                         then {
384 +                                                             let I = e
385 +                                                             I
386 +                                                             }
387 +                                                         else if ($isInstanceOf(e, "Unit"))
388 +                                                             then ""
389 +                                                             else throw()
390 +                                                     }
391 +                                                 let X = (dropRight(K, size(split(K, "_")[7])) + toString((V + C)))
392 +                                                 let Y = value(indexOf(H, G))
393 +                                                 let Z = if ((Q == (C + V)))
394 +                                                     then (take(H, Y) + drop(H, (Y + size(G))))
395 +                                                     else H
396 +                                                 ScriptResult(WriteSet([DataEntry("orders", Z), DataEntry(G, X)]), TransferSet([ScriptTransfer(n.caller, C, if ((R == "WAVES"))
397 +                                                     then unit
398 +                                                     else fromBase58String(R)), ScriptTransfer(S, L, if ((P == "WAVES"))
399 +                                                     then unit
400 +                                                     else fromBase58String(P))]))
380 401                                                  }
381 -                                             let Q = (dropRight(H, size(split(H, "_")[7])) + toString((O + m.amount)))
382 -                                             let R = value(indexOf(E, D))
383 -                                             let S = if ((M == (m.amount + O)))
384 -                                                 then (take(E, R) + drop(E, (R + size(D))))
385 -                                                 else E
386 -                                             ScriptResult(WriteSet([DataEntry("orders", S), DataEntry(D, Q)]), TransferSet([ScriptTransfer(i.caller, T, if ((x == "WAVES"))
387 -                                                 then unit
388 -                                                 else fromBase58String(x)), ScriptTransfer(N, m.amount, if ((B == "WAVES"))
389 -                                                 then unit
390 -                                                 else fromBase58String(B))]))
391 -                                             }
392 -                             }
393 -                     }
402 +                                 }
403 +                         }
394 404              }
395 405      }
396 406  
397 407  
398 408  
399 - @Callable(i)
400 - func returnBuy (D) = {
401 -     let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
402 -     let M = parseIntValue(split(H, "_")[0])
403 -     let B = split(H, "_")[1]
404 -     let y = parseIntValue(split(H, "_")[2])
405 -     let x = split(H, "_")[3]
406 -     let N = value(addressFromString(split(H, "_")[4]))
407 -     let z = if ((split(H, "_")[5] == "true"))
409 + @Callable(n)
410 + func returnSell (G) = {
411 +     let K = valueOrErrorMessage(getString(this, ("sell_" + G)), "Invalid order id")
412 +     let N = split(K, "_")[0]
413 +     let O = parseIntValue(split(K, "_")[1])
414 +     let P = split(K, "_")[2]
415 +     let Q = parseIntValue(split(K, "_")[3])
416 +     let R = split(K, "_")[4]
417 +     let S = value(addressFromString(split(K, "_")[5]))
418 +     let T = if ((split(K, "_")[6] == "true"))
408 419          then true
409 420          else false
410 -     let A = split(H, "_")[6]
411 -     let O = parseIntValue(split(H, "_")[7])
412 -     if ((N != i.caller))
413 -         then throw("Return should be called by order owner")
414 -         else {
415 -             let I = if ((B == "WAVES"))
416 -                 then 8
417 -                 else value(assetInfo(fromBase58String(B))).decimals
418 -             let U = (((M - O) * y) / pow(10, 0, I, 0, 0, CEILING))
419 -             if ((0 >= U))
420 -                 then throw("nothing to return")
421 -                 else {
422 -                     let E = {
423 -                         let e = getString(this, "orders")
424 -                         if ($isInstanceOf(e, "String"))
425 -                             then {
426 -                                 let F = e
427 -                                 F
428 -                                 }
429 -                             else if ($isInstanceOf(e, "Unit"))
430 -                                 then ""
431 -                                 else throw()
421 +     let U = split(K, "_")[7]
422 +     let V = parseIntValue(split(K, "_")[8])
423 +     if ((N != "sell"))
424 +         then throw("Invalid order type")
425 +         else if ((S != n.caller))
426 +             then throw("return should be called by order owner")
427 +             else {
428 +                 let aa = (O - V)
429 +                 if ((0 >= aa))
430 +                     then throw("nothing to return")
431 +                     else {
432 +                         let H = {
433 +                             let e = getString(this, "orders")
434 +                             if ($isInstanceOf(e, "String"))
435 +                                 then {
436 +                                     let I = e
437 +                                     I
438 +                                     }
439 +                                 else if ($isInstanceOf(e, "Unit"))
440 +                                     then ""
441 +                                     else throw()
442 +                             }
443 +                         let X = (dropRight(K, size(split(K, "_")[7])) + toString(O))
444 +                         let Y = value(indexOf(H, G))
445 +                         let Z = (take(H, Y) + drop(H, (Y + size(G))))
446 +                         ScriptResult(WriteSet([DataEntry("orders", Z), DataEntry(G, X)]), TransferSet([ScriptTransfer(n.caller, aa, if ((P == "WAVES"))
447 +                             then unit
448 +                             else fromBase58String(P))]))
432 449                          }
433 -                     let Q = (dropRight(H, size(split(H, "_")[7])) + toString(M))
434 -                     let R = value(indexOf(E, D))
435 -                     let S = (take(E, R) + drop(E, (R + size(D))))
436 -                     ScriptResult(WriteSet([DataEntry("orders", S), DataEntry(D, Q)]), TransferSet([ScriptTransfer(i.caller, U, if ((x == "WAVES"))
437 -                         then unit
438 -                         else fromBase58String(x))]))
439 -                     }
440 -             }
450 +                 }
441 451      }
442 452  
443 453  
444 454  
445 - @Callable(i)
446 - func returnSell (D) = {
447 -     let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
448 -     let M = parseIntValue(split(H, "_")[0])
449 -     let B = split(H, "_")[1]
450 -     let y = parseIntValue(split(H, "_")[2])
451 -     let x = split(H, "_")[3]
452 -     let N = value(addressFromString(split(H, "_")[4]))
453 -     let z = if ((split(H, "_")[5] == "true"))
455 + @Callable(n)
456 + func returnBuy (G) = {
457 +     let K = valueOrErrorMessage(getString(this, G), "Invalid order id")
458 +     let N = split(K, "_")[0]
459 +     let O = parseIntValue(split(K, "_")[1])
460 +     let P = split(K, "_")[2]
461 +     let Q = parseIntValue(split(K, "_")[3])
462 +     let R = split(K, "_")[4]
463 +     let S = value(addressFromString(split(K, "_")[5]))
464 +     let T = if ((split(K, "_")[6] == "true"))
454 465          then true
455 466          else false
456 -     let A = split(H, "_")[6]
457 -     let O = parseIntValue(split(H, "_")[7])
458 -     if ((N != i.caller))
459 -         then throw("return should be called by order owner")
460 -         else {
461 -             let U = (M - O)
462 -             if ((0 >= U))
463 -                 then throw("nothing to return")
464 -                 else {
465 -                     let E = {
466 -                         let e = getString(this, "orders")
467 -                         if ($isInstanceOf(e, "String"))
468 -                             then {
469 -                                 let F = e
470 -                                 F
471 -                                 }
472 -                             else if ($isInstanceOf(e, "Unit"))
473 -                                 then ""
474 -                                 else throw()
467 +     let U = split(K, "_")[7]
468 +     let V = parseIntValue(split(K, "_")[8])
469 +     if ((N != "buy"))
470 +         then throw("Invalid order type")
471 +         else if ((S != n.caller))
472 +             then throw("Return should be called by order owner")
473 +             else {
474 +                 let aa = (Q - V)
475 +                 if ((0 >= aa))
476 +                     then throw("nothing to return")
477 +                     else {
478 +                         let H = {
479 +                             let e = getString(this, "orders")
480 +                             if ($isInstanceOf(e, "String"))
481 +                                 then {
482 +                                     let I = e
483 +                                     I
484 +                                     }
485 +                                 else if ($isInstanceOf(e, "Unit"))
486 +                                     then ""
487 +                                     else throw()
488 +                             }
489 +                         let X = (dropRight(K, size(split(K, "_")[7])) + toString(Q))
490 +                         let Y = value(indexOf(H, G))
491 +                         let Z = (take(H, Y) + drop(H, (Y + size(G))))
492 +                         ScriptResult(WriteSet([DataEntry("orders", Z), DataEntry(G, X)]), TransferSet([ScriptTransfer(n.caller, aa, if ((R == "WAVES"))
493 +                             then unit
494 +                             else fromBase58String(R))]))
475 495                          }
476 -                     let Q = (dropRight(H, size(split(H, "_")[7])) + toString(M))
477 -                     let R = value(indexOf(E, D))
478 -                     let S = (take(E, R) + drop(E, (R + size(D))))
479 -                     ScriptResult(WriteSet([DataEntry("orders", S), DataEntry(D, Q)]), TransferSet([ScriptTransfer(i.caller, U, if ((B == "WAVES"))
480 -                         then unit
481 -                         else fromBase58String(B))]))
482 -                     }
483 -             }
496 +                 }
484 497      }
485 498  
486 499

Old	New		Differences
32	32		}
33	33
34	34
35		-	@Callable(i)
36		-	func addAsset (j) = {
37		-	let k = (100 * 100000000)
38		-	let l = "100"
39		-	let m = valueOrErrorMessage(i.payment, "Where is payment?")
40		-	if (if (isDefined(m.assetId))
41		-	then (m.assetId != a)
	35	+	func i (j,k) = {
	36	+	let l = if ((j == "WAVES"))
	37	+	then 8
	38	+	else value(assetInfo(fromBase58String(j))).decimals
	39	+	let m = if ((k == "WAVES"))
	40	+	then 8
	41	+	else value(assetInfo(fromBase58String(k))).decimals
	42	+	(m >= l)
	43	+	}
	44	+
	45	+
	46	+	@Callable(n)
	47	+	func addAsset (o) = {
	48	+	let p = (100 * 100000000)
	49	+	let q = "100"
	50	+	let r = valueOrErrorMessage(n.payment, "Where is payment?")
	51	+	if (if (isDefined(r.assetId))
	52	+	then (r.assetId != a)
42	53		else false)
43	54		then throw("OTCu or WAVES only")
44		-	else if ((m.amount != k))
45		-	then throw((("You have to pay " + l) + " OTCu or WAVES"))
46		-	else if (!(isDefined(assetInfo(fromBase58String(j)))))
	55	+	else if ((r.amount != p))
	56	+	then throw((("You have to pay " + q) + " OTCu or WAVES"))
	57	+	else if (!(isDefined(assetInfo(fromBase58String(o)))))
47	58		then throw("There is no asset with specified id")
48	59		else {
49		-	let n = {
	60	+	let s = {
50	61		let e = getString(this, "assets")
51	62		if ($isInstanceOf(e, "String"))
52	63		then {
53		-	let o = e
54		-	o
	64	+	let t = e
	65	+	t
55	66		}
56	67		else if ($isInstanceOf(e, "Unit"))
57	68		then ""
58	69		else throw()
59	70		}
60		-	if (isDefined(indexOf(n, j)))
	71	+	if (isDefined(indexOf(s, o)))
61	72		then throw("Asset is already available")
62		-	else WriteSet([DataEntry("assets", (n + j))])
	73	+	else WriteSet([DataEntry("assets", (s + o))])
63	74		}
64	75		}
65	76
66	77
67	78
68		-	@Callable(i)
69		-	func pro (p) = {
70		-	let c = toBase58String(i.caller.bytes)
71		-	let q = (50 * 100000000)
72		-	let r = "50"
73		-	let s = (10 * 100000000)
74		-	let t = "10"
75		-	let m = valueOrErrorMessage(i.payment, "Where is payment?")
76		-	if (if (isDefined(m.assetId))
77		-	then (m.assetId != a)
	79	+	@Callable(n)
	80	+	func pro (u) = {
	81	+	let c = toBase58String(n.caller.bytes)
	82	+	let v = (50 * 100000000)
	83	+	let w = "50"
	84	+	let x = (10 * 100000000)
	85	+	let y = "10"
	86	+	let r = valueOrErrorMessage(n.payment, "Where is payment?")
	87	+	if (if (isDefined(r.assetId))
	88	+	then (r.assetId != a)
78	89		else false)
79	90		then throw("OTCu or WAVES only")
80		-	else if (if (p)
81		-	then (m.amount != q)
	91	+	else if (if (u)
	92	+	then (r.amount != v)
82	93		else false)
83		-	then throw((("You have to pay " + r) + " OTCu or WAVES"))
84		-	else if (if (!(p))
85		-	then (m.amount != s)
	94	+	then throw((("You have to pay " + w) + " OTCu or WAVES"))
	95	+	else if (if (!(u))
	96	+	then (r.amount != x)
86	97		else false)
87		-	then throw((("You have to pay " + t) + " OTCu or WAVES"))
	98	+	then throw((("You have to pay " + y) + " OTCu or WAVES"))
88	99		else {
89		-	let u = {
	100	+	let z = {
90	101		let e = getBoolean(this, (c + "_unlimited"))
91	102		if ($isInstanceOf(e, "Boolean"))
92	103		then {

97	108		then false
98	109		else throw()
99	110		}
100		-	let v = {
	111	+	let A = {
101	112		let e = getInteger(this, (c + "_time"))
102	113		if ($isInstanceOf(e, "Int"))
103	114		then {

108	119		then 0
109	120		else throw()
110	121		}
111		-	if (u)
	122	+	if (z)
112	123		then throw("You have unlimited PRO status already. What do you want?")
113	124		else {
114		-	let w = 2629743000
115		-	WriteSet([DataEntry((c + "_unlimited"), p), DataEntry((c + "_time"), if (p)
	125	+	let B = 2629743000
	126	+	WriteSet([DataEntry((c + "_unlimited"), u), DataEntry((c + "_time"), if (u)
116	127		then 0
117		-	else (v + w))])
	128	+	else (A + B))])
118	129		}
119	130		}
120	131		}
121	132
122	133
123	134
124		-	@Callable(i)
125		-	func makeSell (x,y,z,A) = if (if ((x != "WAVES"))
126		-	then !(isDefined(assetInfo(fromBase58String(x))))
	135	+	@Callable(n)
	136	+	func makeSell (k,C,D,E) = if (if ((k != "WAVES"))
	137	+	then !(isDefined(assetInfo(fromBase58String(k))))
127	138		else false)
128	139		then throw("There is no asset with specified id")
129		-	else if ((0 >= y))
130		-	then throw("price must be positive")
	140	+	else if ((0 >= C))
	141	+	then throw("Amount of price asset must be positive")
131	142		else {
132		-	let m = valueOrErrorMessage(i.payment, "~~where~~ is payment?")
133		-	if ((0 >= m.amount))
134		-	then throw("~~amount~~ must be positive")
	143	+	let r = valueOrErrorMessage(n.payment, "Where is payment?")
	144	+	if ((0 >= r.amount))
	145	+	then throw("Amount must be positive")
135	146		else {
136		-	let B = {
137		-	let e = m.assetId
	147	+	let j = {
	148	+	let e = r.assetId
138	149		if ($isInstanceOf(e, "ByteVector"))
139	150		then {
140		-	let C = e
141		-	toBase58String(C)
	151	+	let F = e
	152	+	toBase58String(F)
142	153		}
143	154		else "WAVES"
144	155		}
145		-	let n = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
146		-	if (if (!(isDefined(indexOf(n, x))))
	156	+	let s = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
	157	+	if (if (!(isDefined(indexOf(s, k))))
147	158		then true
148		-	else !(isDefined(indexOf(n, B))))
	159	+	else !(isDefined(indexOf(s, j))))
149	160		then throw("Asset are not available for trading")
150	161		else {
151		-	let c = toBase58String(i.caller.bytes)
	162	+	let c = toBase58String(n.caller.bytes)
152	163		if (if (!(b(c)))
153		-	then if (z)
	164	+	then if (D)
154	165		then true
155		-	else (A != "")
	166	+	else (E != "")
156	167		else false)
157	168		then throw("You must have pro status to use these features")
158	169		else {
159		-	let D = toBase58String(i.transactionId)
160		-	let E = {
	170	+	let G = toBase58String(n.transactionId)
	171	+	let H = {
161	172		let e = getString(this, "orders")
162	173		if ($isInstanceOf(e, "String"))
163	174		then {
164		-	let F = e
165		-	F
	175	+	let I = e
	176	+	I
166	177		}
167	178		else if ($isInstanceOf(e, "Unit"))
168	179		then ""
169	180		else throw()
170	181		}
171		-	let G = fromBase58String(A)
172		-	let H = ((((((((((((((toString(m.amount) + "_") + B) + "_") + toString(y)) + "_") + x) + "_") + c) + "_") + toString(z)) + "_") + A) + "_") + toString(0))
173		-	WriteSet([DataEntry("orders", (E + D)), DataEntry(D, H)])
	182	+	let J = fromBase58String(E)
	183	+	let K = (((((((((((((((("sell" + "_") + toString(r.amount)) + "_") + j) + "_") + toString(C)) + "_") + k) + "_") + c) + "_") + toString(D)) + "_") + E) + "_") + toString(0))
	184	+	WriteSet([DataEntry("orders", (H + G)), DataEntry(G, K)])
174	185		}
175	186		}
176	187		}

178	189
179	190
180	191
181		-	@Callable(i)
182		-	func makeBuy (B,y,z,A) = if (if ((B != "WAVES"))
183		-	then !(isDefined(assetInfo(fromBase58String(B))))
	192	+	@Callable(n)
	193	+	func makeBuy (j,L,D,E) = if (if ((j != "WAVES"))
	194	+	then !(isDefined(assetInfo(fromBase58String(j))))
184	195		else false)
185	196		then throw("There is no asset with specified id")
186		-	else if ((0 >= y))
187		-	then throw("~~price~~ must be positive")
	197	+	else if ((0 >= L))
	198	+	then throw("Amount must be positive")
188	199		else {
189		-	let m = valueOrErrorMessage(i.payment, "where is payment?")
190		-	if ((0 >= m.amount))
	200	+	let r = valueOrErrorMessage(n.payment, "where is payment?")
	201	+	let C = r.amount
	202	+	if ((0 >= C))
191	203		then throw("amount must be positive")
192	204		else {
193		-	let x = {
194		-	let e = m.assetId
	205	+	let k = {
	206	+	let e = r.assetId
195	207		if ($isInstanceOf(e, "ByteVector"))
196	208		then {
197		-	let C = e
198		-	toBase58String(C)
	209	+	let F = e
	210	+	toBase58String(F)
199	211		}
200	212		else "WAVES"
201	213		}
202		-	let n = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
203		-	if (if (!(isDefined(indexOf(n, x))))
	214	+	let s = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
	215	+	if (if (!(isDefined(indexOf(s, k))))
204	216		then true
205		-	else !(isDefined(indexOf(n, B))))
	217	+	else !(isDefined(indexOf(s, j))))
206	218		then throw("Asset are not available for trading")
207	219		else {
208		-	let c = toBase58String(i.caller.bytes)
	220	+	let c = toBase58String(n.caller.bytes)
209	221		if (if (!(b(c)))
210		-	then if (z)
	222	+	then if (D)
211	223		then true
212		-	else (A != "")
	224	+	else (E != "")
213	225		else false)
214	226		then throw("You must have pro status to use these features")
215	227		else {
216		-	let D = toBase58String(i.transactionId)
217		-	let E = {
	228	+	let G = toBase58String(n.transactionId)
	229	+	let H = {
218	230		let e = getString(this, "orders")
219	231		if ($isInstanceOf(e, "String"))
220	232		then {
221		-	let F = e
222		-	F
	233	+	let I = e
	234	+	I
223	235		}
224	236		else if ($isInstanceOf(e, "Unit"))
225	237		then ""
226	238		else throw()
227	239		}
228		-	let I = if ((B == "WAVES"))
229		-	then 8
230		-	else value(assetInfo(fromBase58String(B))).decimals
231		-	let J = ((m.amount * pow(10, 0, I, 0, 0, CEILING)) / y)
232		-	if ((J == 0))
	240	+	if ((L == 0))
233	241		then throw("invalid buy amount")
234	242		else {
235		-	let H = ((((((((((((((toString(J) + "_") + B) + "_") + toString(y)) + "_") + x) + "_") + c) + "_") + toString(z)) + "_") + A) + "_") + toString(0))
236		-	WriteSet([DataEntry("orders", (E + D)), DataEntry(D, H)])
	243	+	let K = (((((((((((((((("buy" + "_") + toString(L)) + "_") + j) + "_") + toString(C)) + "_") + k) + "_") + c) + "_") + toString(D)) + "_") + E) + "_") + toString(0))
	244	+	WriteSet([DataEntry("orders", (H + G)), DataEntry(("buy_" + G), K)])
237	245		}
238	246		}
239	247		}

242	250
243	251
244	252
245		-	@Callable(i)
246		-	func takeSell (D,K) = {
247		-	let m = valueOrErrorMessage(i.payment, "where is payment?")
248		-	if ((0 >= m.amount))
249		-	then throw("amount must be positive")
	253	+	@Callable(n)
	254	+	func takeSell (G,M) = {
	255	+	let r = valueOrErrorMessage(n.payment, "Where is payment?")
	256	+	let C = r.amount
	257	+	if ((0 >= C))
	258	+	then throw("Amount must be positive")
250	259		else {
251		-	let L = {
252		-	let e = m.assetId
	260	+	let k = {
	261	+	let e = r.assetId
253	262		if ($isInstanceOf(e, "ByteVector"))
254	263		then {
255		-	let C = e
256		-	toBase58String(C)
	264	+	let F = e
	265	+	toBase58String(F)
257	266		}
258	267		else "WAVES"
259	268		}
260		-	let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
261		-	let M = parseIntValue(split(H, "_")[0])
262		-	let B = split(H, "_")[1]
263		-	let y = parseIntValue(split(H, "_")[2])
264		-	let x = split(H, "_")[3]
265		-	let N = value(addressFromString(split(H, "_")[4]))
266		-	let z = if ((split(H, "_")[5] == "true"))
	269	+	let K = valueOrErrorMessage(getString(this, G), "Invalid order id")
	270	+	let N = split(K, "_")[0]
	271	+	let O = parseIntValue(split(K, "_")[1])
	272	+	let P = split(K, "_")[2]
	273	+	let Q = parseIntValue(split(K, "_")[3])
	274	+	let R = split(K, "_")[4]
	275	+	let S = value(addressFromString(split(K, "_")[5]))
	276	+	let T = if ((split(K, "_")[6] == "true"))
267	277		then true
268	278		else false
269		-	let A = split(H, "_")[6]
270		-	let O = parseIntValue(split(H, "_")[7])
271		-	if ((x != L))
272		-	then throw(("Payment asset must be " + x))
273		-	else {
274		-	let P = if ((A != ""))
275		-	then sigVerify(i.callerPublicKey, fromBase58String(K), fromBase58String(A))
276		-	else true
277		-	if (!(P))
278		-	then throw("The order is private")
279		-	else {
280		-	let I = if ((B == "WAVES"))
281		-	then 8
282		-	else value(assetInfo(fromBase58String(B))).decimals
283		-	let J = ((m.amount * pow(10, 0, I, 0, 0, CEILING)) / y)
284		-	if ((J == 0))
285		-	then throw("Invalid amount")
286		-	else if (if (z)
287		-	then (M > J)
288		-	else false)
289		-	then throw("You must take all or none")
290		-	else if ((J > (M - O)))
291		-	then throw("Not enougth asset in order")
292		-	else {
293		-	let E = {
294		-	let e = getString(this, "orders")
295		-	if ($isInstanceOf(e, "String"))
296		-	then {
297		-	let F = e
298		-	F
299		-	}
300		-	else if ($isInstanceOf(e, "Unit"))
301		-	then ""
302		-	else throw()
	279	+	let U = split(K, "_")[7]
	280	+	let V = parseIntValue(split(K, "_")[8])
	281	+	if ((N != "sell"))
	282	+	then throw("Invalid order type")
	283	+	else if ((R != k))
	284	+	then throw(("Payment asset must be " + R))
	285	+	else {
	286	+	let W = if ((U != ""))
	287	+	then sigVerify(n.callerPublicKey, fromBase58String(M), fromBase58String(U))
	288	+	else true
	289	+	if (!(W))
	290	+	then throw("The order is private")
	291	+	else {
	292	+	let L = ((C * O) / Q)
	293	+	if ((L == 0))
	294	+	then throw("Invalid amount")
	295	+	else if (if (T)
	296	+	then (O > L)
	297	+	else false)
	298	+	then throw("You must take all or none")
	299	+	else if ((L > (O - V)))
	300	+	then throw("Not enougth asset in order")
	301	+	else {
	302	+	let H = {
	303	+	let e = getString(this, "orders")
	304	+	if ($isInstanceOf(e, "String"))
	305	+	then {
	306	+	let I = e
	307	+	I
	308	+	}
	309	+	else if ($isInstanceOf(e, "Unit"))
	310	+	then ""
	311	+	else throw()
	312	+	}
	313	+	let X = (dropRight(K, size(split(K, "_")[7])) + toString((V + L)))
	314	+	let Y = value(indexOf(H, G))
	315	+	let Z = if ((O == (L + V)))
	316	+	then (take(H, Y) + drop(H, (Y + size(G))))
	317	+	else H
	318	+	ScriptResult(WriteSet([DataEntry("orders", Z), DataEntry(G, X)]), TransferSet([ScriptTransfer(n.caller, L, if ((P == "WAVES"))
	319	+	then unit
	320	+	else fromBase58String(P)), ScriptTransfer(S, C, if ((R == "WAVES"))
	321	+	then unit
	322	+	else fromBase58String(R))]))
303	323		}
304		-	let Q = (dropRight(H, size(split(H, "_")[7])) + toString((O + J)))
305		-	let R = value(indexOf(E, D))
306		-	let S = if ((M == (J + O)))
307		-	then (take(E, R) + drop(E, (R + size(D))))
308		-	else E
309		-	ScriptResult(WriteSet([DataEntry("orders", S), DataEntry(D, Q)]), TransferSet([ScriptTransfer(i.caller, J, if ((B == "WAVES"))
310		-	then unit
311		-	else fromBase58String(B)), ScriptTransfer(N, m.amount, if ((x == "WAVES"))
312		-	then unit
313		-	else fromBase58String(x))]))
314		-	}
315		-	}
316		-	}
	324	+	}
	325	+	}
317	326		}
318	327		}
319	328
320	329
321	330
322		-	@Callable(i)
323		-	func takeBuy (D,K) = {
324		-	let m = valueOrErrorMessage(i.payment, "where is payment?")
325		-	if ((0 >= m.amount))
	331	+	@Callable(n)
	332	+	func takeBuy (G,M) = {
	333	+	let r = valueOrErrorMessage(n.payment, "where is payment?")
	334	+	let L = r.amount
	335	+	if ((0 >= L))
326	336		then throw("amount must be positive")
327	337		else {
328		-	let L = {
329		-	let e = m.assetId
	338	+	let j = {
	339	+	let e = r.assetId
330	340		if ($isInstanceOf(e, "ByteVector"))
331	341		then {
332		-	let C = e
333		-	toBase58String(C)
	342	+	let F = e
	343	+	toBase58String(F)
334	344		}
335	345		else "WAVES"
336	346		}
337		-	let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
338		-	let M = parseIntValue(split(H, "_")[0])
339		-	let B = split(H, "_")[1]
340		-	let y = parseIntValue(split(H, "_")[2])
341		-	let x = split(H, "_")[3]
342		-	let N = value(addressFromString(split(H, "_")[4]))
343		-	let z = if ((split(H, "_")[5] == "true"))
	347	+	let K = valueOrErrorMessage(getString(this, G), "Invalid order id")
	348	+	let N = split(K, "_")[0]
	349	+	let O = parseIntValue(split(K, "_")[1])
	350	+	let P = split(K, "_")[2]
	351	+	let Q = parseIntValue(split(K, "_")[3])
	352	+	let R = split(K, "_")[4]
	353	+	let S = value(addressFromString(split(K, "_")[5]))
	354	+	let T = if ((split(K, "_")[6] == "true"))
344	355		then true
345	356		else false
346		-	let A = split(H, "_")[6]
347		-	let O = parseIntValue(split(H, "_")[7])
348		-	if ((B != L))
349		-	then throw(("payment asset must be " + B))
350		-	else {
351		-	let P = if ((A != ""))
352		-	then sigVerify(i.callerPublicKey, fromBase58String(K), fromBase58String(A))
353		-	else true
354		-	if (!(P))
355		-	then throw("The order is private")
356		-	else {
357		-	let I = if ((B == "WAVES"))
358		-	then 8
359		-	else value(assetInfo(fromBase58String(B))).decimals

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = base58'9qh2MiJhfqNS1o3R5wcUrAAWpeqZs9R8SLwQvCx88Vaf'
5	5
6	6		func b (c) = {
7	7		let d = {
8	8		let e = getBoolean(this, (c + "_unlimited"))
9	9		if ($isInstanceOf(e, "Boolean"))
10	10		then {
11	11		let f = e
12	12		f
13	13		}
14	14		else if ($isInstanceOf(e, "Unit"))
15	15		then false
16	16		else throw()
17	17		}
18	18		let g = {
19	19		let e = getInteger(this, (c + "_time"))
20	20		if ($isInstanceOf(e, "Int"))
21	21		then {
22	22		let h = e
23	23		h
24	24		}
25	25		else if ($isInstanceOf(e, "Unit"))
26	26		then 0
27	27		else throw()
28	28		}
29	29		if (d)
30	30		then true
31	31		else (g > lastBlock.timestamp)
32	32		}
33	33
34	34
35		-	@Callable(i)
36		-	func addAsset (j) = {
37		-	let k = (100 * 100000000)
38		-	let l = "100"
39		-	let m = valueOrErrorMessage(i.payment, "Where is payment?")
40		-	if (if (isDefined(m.assetId))
41		-	then (m.assetId != a)
	35	+	func i (j,k) = {
	36	+	let l = if ((j == "WAVES"))
	37	+	then 8
	38	+	else value(assetInfo(fromBase58String(j))).decimals
	39	+	let m = if ((k == "WAVES"))
	40	+	then 8
	41	+	else value(assetInfo(fromBase58String(k))).decimals
	42	+	(m >= l)
	43	+	}
	44	+
	45	+
	46	+	@Callable(n)
	47	+	func addAsset (o) = {
	48	+	let p = (100 * 100000000)
	49	+	let q = "100"
	50	+	let r = valueOrErrorMessage(n.payment, "Where is payment?")
	51	+	if (if (isDefined(r.assetId))
	52	+	then (r.assetId != a)
42	53		else false)
43	54		then throw("OTCu or WAVES only")
44		-	else if ((m.amount != k))
45		-	then throw((("You have to pay " + l) + " OTCu or WAVES"))
46		-	else if (!(isDefined(assetInfo(fromBase58String(j)))))
	55	+	else if ((r.amount != p))
	56	+	then throw((("You have to pay " + q) + " OTCu or WAVES"))
	57	+	else if (!(isDefined(assetInfo(fromBase58String(o)))))
47	58		then throw("There is no asset with specified id")
48	59		else {
49		-	let n = {
	60	+	let s = {
50	61		let e = getString(this, "assets")
51	62		if ($isInstanceOf(e, "String"))
52	63		then {
53		-	let o = e
54		-	o
	64	+	let t = e
	65	+	t
55	66		}
56	67		else if ($isInstanceOf(e, "Unit"))
57	68		then ""
58	69		else throw()
59	70		}
60		-	if (isDefined(indexOf(n, j)))
	71	+	if (isDefined(indexOf(s, o)))
61	72		then throw("Asset is already available")
62		-	else WriteSet([DataEntry("assets", (n + j))])
	73	+	else WriteSet([DataEntry("assets", (s + o))])
63	74		}
64	75		}
65	76
66	77
67	78
68		-	@Callable(i)
69		-	func pro (p) = {
70		-	let c = toBase58String(i.caller.bytes)
71		-	let q = (50 * 100000000)
72		-	let r = "50"
73		-	let s = (10 * 100000000)
74		-	let t = "10"
75		-	let m = valueOrErrorMessage(i.payment, "Where is payment?")
76		-	if (if (isDefined(m.assetId))
77		-	then (m.assetId != a)
	79	+	@Callable(n)
	80	+	func pro (u) = {
	81	+	let c = toBase58String(n.caller.bytes)
	82	+	let v = (50 * 100000000)
	83	+	let w = "50"
	84	+	let x = (10 * 100000000)
	85	+	let y = "10"
	86	+	let r = valueOrErrorMessage(n.payment, "Where is payment?")
	87	+	if (if (isDefined(r.assetId))
	88	+	then (r.assetId != a)
78	89		else false)
79	90		then throw("OTCu or WAVES only")
80		-	else if (if (p)
81		-	then (m.amount != q)
	91	+	else if (if (u)
	92	+	then (r.amount != v)
82	93		else false)
83		-	then throw((("You have to pay " + r) + " OTCu or WAVES"))
84		-	else if (if (!(p))
85		-	then (m.amount != s)
	94	+	then throw((("You have to pay " + w) + " OTCu or WAVES"))
	95	+	else if (if (!(u))
	96	+	then (r.amount != x)
86	97		else false)
87		-	then throw((("You have to pay " + t) + " OTCu or WAVES"))
	98	+	then throw((("You have to pay " + y) + " OTCu or WAVES"))
88	99		else {
89		-	let u = {
	100	+	let z = {
90	101		let e = getBoolean(this, (c + "_unlimited"))
91	102		if ($isInstanceOf(e, "Boolean"))
92	103		then {
93	104		let f = e
94	105		f
95	106		}
96	107		else if ($isInstanceOf(e, "Unit"))
97	108		then false
98	109		else throw()
99	110		}
100		-	let v = {
	111	+	let A = {
101	112		let e = getInteger(this, (c + "_time"))
102	113		if ($isInstanceOf(e, "Int"))
103	114		then {
104	115		let h = e
105	116		h
106	117		}
107	118		else if ($isInstanceOf(e, "Unit"))
108	119		then 0
109	120		else throw()
110	121		}
111		-	if (u)
	122	+	if (z)
112	123		then throw("You have unlimited PRO status already. What do you want?")
113	124		else {
114		-	let w = 2629743000
115		-	WriteSet([DataEntry((c + "_unlimited"), p), DataEntry((c + "_time"), if (p)
	125	+	let B = 2629743000
	126	+	WriteSet([DataEntry((c + "_unlimited"), u), DataEntry((c + "_time"), if (u)
116	127		then 0
117		-	else (v + w))])
	128	+	else (A + B))])
118	129		}
119	130		}
120	131		}
121	132
122	133
123	134
124		-	@Callable(i)
125		-	func makeSell (x,y,z,A) = if (if ((x != "WAVES"))
126		-	then !(isDefined(assetInfo(fromBase58String(x))))
	135	+	@Callable(n)
	136	+	func makeSell (k,C,D,E) = if (if ((k != "WAVES"))
	137	+	then !(isDefined(assetInfo(fromBase58String(k))))
127	138		else false)
128	139		then throw("There is no asset with specified id")
129		-	else if ((0 >= y))
130		-	then throw("price must be positive")
	140	+	else if ((0 >= C))
	141	+	then throw("Amount of price asset must be positive")
131	142		else {
132		-	let m = valueOrErrorMessage(i.payment, "~~where~~ is payment?")
133		-	if ((0 >= m.amount))
134		-	then throw("~~amount~~ must be positive")
	143	+	let r = valueOrErrorMessage(n.payment, "Where is payment?")
	144	+	if ((0 >= r.amount))
	145	+	then throw("Amount must be positive")
135	146		else {
136		-	let B = {
137		-	let e = m.assetId
	147	+	let j = {
	148	+	let e = r.assetId
138	149		if ($isInstanceOf(e, "ByteVector"))
139	150		then {
140		-	let C = e
141		-	toBase58String(C)
	151	+	let F = e
	152	+	toBase58String(F)
142	153		}
143	154		else "WAVES"
144	155		}
145		-	let n = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
146		-	if (if (!(isDefined(indexOf(n, x))))
	156	+	let s = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
	157	+	if (if (!(isDefined(indexOf(s, k))))
147	158		then true
148		-	else !(isDefined(indexOf(n, B))))
	159	+	else !(isDefined(indexOf(s, j))))
149	160		then throw("Asset are not available for trading")
150	161		else {
151		-	let c = toBase58String(i.caller.bytes)
	162	+	let c = toBase58String(n.caller.bytes)
152	163		if (if (!(b(c)))
153		-	then if (z)
	164	+	then if (D)
154	165		then true
155		-	else (A != "")
	166	+	else (E != "")
156	167		else false)
157	168		then throw("You must have pro status to use these features")
158	169		else {
159		-	let D = toBase58String(i.transactionId)
160		-	let E = {
	170	+	let G = toBase58String(n.transactionId)
	171	+	let H = {
161	172		let e = getString(this, "orders")
162	173		if ($isInstanceOf(e, "String"))
163	174		then {
164		-	let F = e
165		-	F
	175	+	let I = e
	176	+	I
166	177		}
167	178		else if ($isInstanceOf(e, "Unit"))
168	179		then ""
169	180		else throw()
170	181		}
171		-	let G = fromBase58String(A)
172		-	let H = ((((((((((((((toString(m.amount) + "_") + B) + "_") + toString(y)) + "_") + x) + "_") + c) + "_") + toString(z)) + "_") + A) + "_") + toString(0))
173		-	WriteSet([DataEntry("orders", (E + D)), DataEntry(D, H)])
	182	+	let J = fromBase58String(E)
	183	+	let K = (((((((((((((((("sell" + "_") + toString(r.amount)) + "_") + j) + "_") + toString(C)) + "_") + k) + "_") + c) + "_") + toString(D)) + "_") + E) + "_") + toString(0))
	184	+	WriteSet([DataEntry("orders", (H + G)), DataEntry(G, K)])
174	185		}
175	186		}
176	187		}
177	188		}
178	189
179	190
180	191
181		-	@Callable(i)
182		-	func makeBuy (B,y,z,A) = if (if ((B != "WAVES"))
183		-	then !(isDefined(assetInfo(fromBase58String(B))))
	192	+	@Callable(n)
	193	+	func makeBuy (j,L,D,E) = if (if ((j != "WAVES"))
	194	+	then !(isDefined(assetInfo(fromBase58String(j))))
184	195		else false)
185	196		then throw("There is no asset with specified id")
186		-	else if ((0 >= y))
187		-	then throw("~~price~~ must be positive")
	197	+	else if ((0 >= L))
	198	+	then throw("Amount must be positive")
188	199		else {
189		-	let m = valueOrErrorMessage(i.payment, "where is payment?")
190		-	if ((0 >= m.amount))
	200	+	let r = valueOrErrorMessage(n.payment, "where is payment?")
	201	+	let C = r.amount
	202	+	if ((0 >= C))
191	203		then throw("amount must be positive")
192	204		else {
193		-	let x = {
194		-	let e = m.assetId
	205	+	let k = {
	206	+	let e = r.assetId
195	207		if ($isInstanceOf(e, "ByteVector"))
196	208		then {
197		-	let C = e
198		-	toBase58String(C)
	209	+	let F = e
	210	+	toBase58String(F)
199	211		}
200	212		else "WAVES"
201	213		}
202		-	let n = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
203		-	if (if (!(isDefined(indexOf(n, x))))
	214	+	let s = valueOrErrorMessage(getString(this, "assets"), "There are not available assets")
	215	+	if (if (!(isDefined(indexOf(s, k))))
204	216		then true
205		-	else !(isDefined(indexOf(n, B))))
	217	+	else !(isDefined(indexOf(s, j))))
206	218		then throw("Asset are not available for trading")
207	219		else {
208		-	let c = toBase58String(i.caller.bytes)
	220	+	let c = toBase58String(n.caller.bytes)
209	221		if (if (!(b(c)))
210		-	then if (z)
	222	+	then if (D)
211	223		then true
212		-	else (A != "")
	224	+	else (E != "")
213	225		else false)
214	226		then throw("You must have pro status to use these features")
215	227		else {
216		-	let D = toBase58String(i.transactionId)
217		-	let E = {
	228	+	let G = toBase58String(n.transactionId)
	229	+	let H = {
218	230		let e = getString(this, "orders")
219	231		if ($isInstanceOf(e, "String"))
220	232		then {
221		-	let F = e
222		-	F
	233	+	let I = e
	234	+	I
223	235		}
224	236		else if ($isInstanceOf(e, "Unit"))
225	237		then ""
226	238		else throw()
227	239		}
228		-	let I = if ((B == "WAVES"))
229		-	then 8
230		-	else value(assetInfo(fromBase58String(B))).decimals
231		-	let J = ((m.amount * pow(10, 0, I, 0, 0, CEILING)) / y)
232		-	if ((J == 0))
	240	+	if ((L == 0))
233	241		then throw("invalid buy amount")
234	242		else {
235		-	let H = ((((((((((((((toString(J) + "_") + B) + "_") + toString(y)) + "_") + x) + "_") + c) + "_") + toString(z)) + "_") + A) + "_") + toString(0))
236		-	WriteSet([DataEntry("orders", (E + D)), DataEntry(D, H)])
	243	+	let K = (((((((((((((((("buy" + "_") + toString(L)) + "_") + j) + "_") + toString(C)) + "_") + k) + "_") + c) + "_") + toString(D)) + "_") + E) + "_") + toString(0))
	244	+	WriteSet([DataEntry("orders", (H + G)), DataEntry(("buy_" + G), K)])
237	245		}
238	246		}
239	247		}
240	248		}
241	249		}
242	250
243	251
244	252
245		-	@Callable(i)
246		-	func takeSell (D,K) = {
247		-	let m = valueOrErrorMessage(i.payment, "where is payment?")
248		-	if ((0 >= m.amount))
249		-	then throw("amount must be positive")
	253	+	@Callable(n)
	254	+	func takeSell (G,M) = {
	255	+	let r = valueOrErrorMessage(n.payment, "Where is payment?")
	256	+	let C = r.amount
	257	+	if ((0 >= C))
	258	+	then throw("Amount must be positive")
250	259		else {
251		-	let L = {
252		-	let e = m.assetId
	260	+	let k = {
	261	+	let e = r.assetId
253	262		if ($isInstanceOf(e, "ByteVector"))
254	263		then {
255		-	let C = e
256		-	toBase58String(C)
	264	+	let F = e
	265	+	toBase58String(F)
257	266		}
258	267		else "WAVES"
259	268		}
260		-	let H = valueOrErrorMessage(getString(this, D), "Invalid order id")
261		-	let M = parseIntValue(split(H, "_")[0])
262		-	let B = split(H, "_")[1]
263		-	let y = parseIntValue(split(H, "_")[2])
264		-	let x = split(H, "_")[3]
265		-	let N = value(addressFromString(split(H, "_")[4]))
266		-	let z = if ((split(H, "_")[5] == "true"))
	269	+	let K = valueOrErrorMessage(getString(this, G), "Invalid order id")
	270	+	let N = split(K, "_")[0]
	271	+	let O = parseIntValue(split(K, "_")[1])
	272	+	let P = split(K, "_")[2]
	273	+	let Q = parseIntValue(split(K, "_")[3])
	274	+	let R = split(K, "_")[4]
	275	+	let S = value(addressFromString(split(K, "_")[5]))
	276	+	let T = if ((split(K, "_")[6] == "true"))
267	277		then true
268	278		else false
269		-	let A = split(H, "_")[6]
270		-	let O = parseIntValue(split(H, "_")[7])
271		-	if ((x != L))
272		-	then throw(("Payment asset must be " + x))
273		-	else {
274		-	let P = if ((A != ""))
275		-	then sigVerify(i.callerPublicKey, fromBase58String(K), fromBase58String(A))
276		-	else true
277		-	if (!(P))
278		-	then throw("The order is private")
279		-	else {
280		-	let I = if ((B == "WAVES"))
281		-	then 8
282		-	else value(assetInfo(fromBase58String(B))).decimals
283		-	let J = ((m.amount * pow(10, 0, I, 0, 0, CEILING)) / y)
284		-	if ((J == 0))
285		-	then throw("Invalid amount")
286		-	else if (if (z)
287		-	then (M > J)
288		-	else false)
289		-	then throw("You must take all or none")
290		-	else if ((J > (M - O)))
291		-	then throw("Not enougth asset in order")
292		-	else {
293		-	let E = {
294		-	let e = getString(this, "orders")
295		-	if ($isInstanceOf(e, "String"))
296		-	then {
297		-	let F = e
298		-	F
299		-	}
300		-	else if ($isInstanceOf(e, "Unit"))
301		-	then ""
302		-	else throw()
	279	+	let U = split(K, "_")[7]
	280	+	let V = parseIntValue(split(K, "_")[8])
	281	+	if ((N != "sell"))
	282	+	then throw("Invalid order type")
	283	+	else if ((R != k))
	284	+	then throw(("Payment asset must be " + R))
	285	+	else {
	286	+	let W = if ((U != ""))
	287	+	then sigVerify(n.callerPublicKey, fromBase58String(M), fromBase58String(U))
	288	+	else true
	289	+	if (!(W))
	290	+	then throw("The order is private")
	291	+	else {
	292	+	let L = ((C * O) / Q)
	293	+	if ((L == 0))
	294	+	then throw("Invalid amount")
	295	+	else if (if (T)
	296	+	then (O > L)
	297	+	else false)
	298	+	then throw("You must take all or none")
	299	+	else if ((L > (O - V)))
	300	+	then throw("Not enougth asset in order")
	301	+	else {
	302	+	let H = {
	303	+	let e = getString(this, "orders")
	304	+	if ($isInstanceOf(e, "String"))
	305	+	then {
	306	+	let I = e
	307	+	I
	308	+	}
	309	+	else if ($isInstanceOf(e, "Unit"))
	310	+	then ""
	311	+	else throw()
	312	+	}
	313	+	let X = (dropRight(K, size(split(K, "_")[7])) + toString((V + L)))
	314	+	let Y = value(indexOf(H, G))
	315	+	let Z = if ((O == (L + V)))
	316	+	then (take(H, Y) + drop(H, (Y + size(G))))
	317	+	else H
	318	+	ScriptResult(WriteSet([DataEntry("orders", Z), DataEntry(G, X)]), TransferSet([ScriptTransfer(n.caller, L, if ((P == "WAVES"))
	319	+	then unit
	320	+	else fromBase58String(P)), ScriptTransfer(S, C, if ((R == "WAVES"))
	321	+	then unit
	322	+	else fromBase58String(R))]))
303	323		}
304		-	let Q = (dropRight(H, size(split(H, "_")[7])) + toString((O + J)))
305		-	let R = value(indexOf(E, D))
306		-	let S = if ((M == (J + O)))
307		-	then (take(E, R) + drop(E, (R + size(D))))
308		-	else E
309		-	ScriptResult(WriteSet([DataEntry("orders", S), DataEntry(D, Q)]), TransferSet([ScriptTransfer(i.caller, J, if ((B == "WAVES"))
310		-	then unit
311		-	else fromBase58String(B)), ScriptTransfer(N, m.amount, if ((x == "WAVES"))
312		-	then unit
313		-	else fromBase58String(x))]))
314		-	}
315		-	}
316		-	}
	324	+	}
	325	+	}
317	326		}
318	327		}
319	328
320	329
321	330
322		-	@Callable(i)
323		-	func takeBuy (D,K) = {
324		-	let m = valueOrErrorMessage(i.payment, "where is payment?")
325		-	if ((0 >= m.amount))
	331	+	@Callable(n)
	332	+	func takeBuy (G,M) = {
	333	+	let r = valueOrErrorMessage(n.payment, "where is payment?")
	334	+	let L = r.amount
	335	+	if ((0 >= L))
326	336		then throw("amount must be positive")
327	337		else {
328		-	let L = {
329		-	let e = m.assetId
	338	+	let j = {
	339	+	let e = r.assetId
330	340		if ($isInstanceOf(e, "ByteVector"))
331	341		then {

github/deemru/w8io/169f3d6 
121.57 ms ◑