w8 · tx · Ffy···miW

tx · FfyAK5oJ4T7L8KFXMAK4MrU3gJ6NykijhpygHAE7dmiW

3Mu7bwtYrymjrXt1ttcqaQbFc1PqGhZndhv:  -0.01400000 Waves

2019.09.13 00:54 [673507] smart account 3Mu7bwtYrymjrXt1ttcqaQbFc1PqGhZndhv > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FfyAK5oJ4T7L8KFXMAK4MrU3gJ6NykijhpygHAE7dmiW",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1568325297689,
    "version": 1,
    "sender": "3Mu7bwtYrymjrXt1ttcqaQbFc1PqGhZndhv",
    "senderPublicKey": "BxHnTcjvN9ZtnKfdKYp6aKRdkMB4ZHxHnTDr5dWx5Vz2",
    "proofs": [
        "2wqr7ygQhfkyVxBW811657pt6hmzzGgXic2LMiYttavQyC5Jscm12Y5Qkyd5E9kEgSxyheKnDYtGWDXUpAFNed4w"
    ],
    "script": "base64:AAIDAAAAAAAAAAAAAAAAAAAAAwAAAAFpAQAAAAhtYWtlU2VsbAAAAAIAAAAKcHJpY2VBc3NldAAAAAVwcmljZQMDCQEAAAACIT0AAAACBQAAAApwcmljZUFzc2V0AgAAAAVXQVZFUwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQkAA+wAAAABCQACWQAAAAEFAAAACnByaWNlQXNzZXQHCQAAAgAAAAECAAAAI1RoZXJlIGlzIG5vIGFzc2V0IHdpdGggc3BlY2lmaWVkIGlkAwkAAGcAAAACAAAAAAAAAAAABQAAAAVwcmljZQkAAAIAAAABAgAAABZwcmljZSBtdXN0IGJlIHBvc2l0aXZlBAAAAAdwYXltZW50CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIIBQAAAAFpAAAAB3BheW1lbnQCAAAAEXdoZXJlIGlzIHBheW1lbnQ/AwkAAGcAAAACAAAAAAAAAAAACAUAAAAHcGF5bWVudAAAAAZhbW91bnQJAAACAAAAAQIAAAAXYW1vdW50IG11c3QgYmUgcG9zaXRpdmUEAAAAB29yZGVySWQJAAEsAAAAAgIAAAAFc2VsbF8JAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAALYW1vdW50QXNzZXQEAAAAByRtYXRjaDAIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAXAFAAAAByRtYXRjaDAJAAJYAAAAAQUAAAABcAIAAAAFV0FWRVMJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAHb3JkZXJJZAIAAAAHX2Ftb3VudAgFAAAAB3BheW1lbnQAAAAGYW1vdW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAAB29yZGVySWQCAAAADV9hbW91bnRfYXNzZXQFAAAAC2Ftb3VudEFzc2V0CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAAB29yZGVySWQCAAAABl9wcmljZQUAAAAFcHJpY2UJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAHb3JkZXJJZAIAAAAMX3ByaWNlX2Fzc2V0BQAAAApwcmljZUFzc2V0CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAAB29yZGVySWQCAAAABl9vd25lcgkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAIFAAAAB29yZGVySWQCAAAABl9zcGVudAAAAAAAAAAAAAUAAAADbmlsAAAAAWkBAAAAB21ha2VCdXkAAAACAAAAC2Ftb3VudEFzc2V0AAAABXByaWNlAwMJAQAAAAIhPQAAAAIFAAAAC2Ftb3VudEFzc2V0AgAAAAVXQVZFUwkBAAAAASEAAAABCQEAAAAJaXNEZWZpbmVkAAAAAQkAA+wAAAABCQACWQAAAAEFAAAAC2Ftb3VudEFzc2V0BwkAAAIAAAABAgAAACNUaGVyZSBpcyBubyBhc3NldCB3aXRoIHNwZWNpZmllZCBpZAMJAABnAAAAAgAAAAAAAAAAAAUAAAAFcHJpY2UJAAACAAAAAQIAAAAWcHJpY2UgbXVzdCBiZSBwb3NpdGl2ZQQAAAAHcGF5bWVudAkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCAUAAAABaQAAAAdwYXltZW50AgAAABF3aGVyZSBpcyBwYXltZW50PwMJAABnAAAAAgAAAAAAAAAAAAgFAAAAB3BheW1lbnQAAAAGYW1vdW50CQAAAgAAAAECAAAAF2Ftb3VudCBtdXN0IGJlIHBvc2l0aXZlBAAAAAdvcmRlcklkCQABLAAAAAICAAAABGJ1eV8JAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAAKcHJpY2VBc3NldAQAAAAHJG1hdGNoMAgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAKQnl0ZVZlY3RvcgQAAAABcAUAAAAHJG1hdGNoMAkAAlgAAAABBQAAAAFwAgAAAAVXQVZFUwkBAAAACFdyaXRlU2V0AAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAdvcmRlcklkAgAAAAdfYW1vdW50CQAAaQAAAAIIBQAAAAdwYXltZW50AAAABmFtb3VudAUAAAAFcHJpY2UJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAHb3JkZXJJZAIAAAANX2Ftb3VudF9hc3NldAUAAAALYW1vdW50QXNzZXQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAHb3JkZXJJZAIAAAAGX3ByaWNlBQAAAAVwcmljZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkAASwAAAACBQAAAAdvcmRlcklkAgAAAAxfcHJpY2VfYXNzZXQFAAAACnByaWNlQXNzZXQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAHb3JkZXJJZAIAAAAGX293bmVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAHb3JkZXJJZAIAAAAGX3NwZW50AAAAAAAAAAAABQAAAANuaWwAAAABaQEAAAAIdGFrZVNlbGwAAAABAAAAAmlkBAAAAAdwYXltZW50CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIIBQAAAAFpAAAAB3BheW1lbnQCAAAAEXdoZXJlIGlzIHBheW1lbnQ/AwkAAGcAAAACAAAAAAAAAAAACAUAAAAHcGF5bWVudAAAAAZhbW91bnQJAAACAAAAAQIAAAAXYW1vdW50IG11c3QgYmUgcG9zaXRpdmUEAAAAB29yZGVySWQJAAEsAAAAAgIAAAAFc2VsbF8FAAAAAmlkBAAAAAxwYXltZW50QXNzZXQEAAAAByRtYXRjaDAIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAXAFAAAAByRtYXRjaDAJAAJYAAAAAQUAAAABcAIAAAAFV0FWRVMEAAAACnByaWNlQXNzZXQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAAB29yZGVySWQCAAAADF9wcmljZV9hc3NldAIAAAAjdGhlcmUgaXMgbm8gb3JkZXIgd2l0aCBzcGVjaWZpZWQgaWQDCQEAAAACIT0AAAACBQAAAApwcmljZUFzc2V0BQAAAAxwYXltZW50QXNzZXQJAAACAAAAAQkAASwAAAACAgAAABZwYXltZW50IGFzc2V0IG11c3QgYmUgBQAAAApwcmljZUFzc2V0BAAAAAVwcmljZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAdvcmRlcklkAgAAAAZfcHJpY2UEAAAABmFtb3VudAkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAdvcmRlcklkAgAAAAdfYW1vdW50BAAAABRwYXltZW50QXNzZXREZWNpbWFscwMJAAAAAAAAAgUAAAAMcGF5bWVudEFzc2V0AgAAAAVXQVZFUwAAAAAAAAAACAgJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQkAAlkAAAABBQAAAAxwYXltZW50QXNzZXQAAAAIZGVjaW1hbHMEAAAACWJ1eUFtb3VudAkAAGkAAAACCQAAaAAAAAIIBQAAAAdwYXltZW50AAAABmFtb3VudAkAAGwAAAAGAAAAAAAAAAAKAAAAAAAAAAAABQAAABRwYXltZW50QXNzZXREZWNpbWFscwAAAAAAAAAAAAAAAAAAAAAAAAUAAAAHQ0VJTElORwUAAAAFcHJpY2UEAAAABW93bmVyCQEAAAAFdmFsdWUAAAABCQEAAAARYWRkcmVzc0Zyb21TdHJpbmcAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQABLAAAAAIFAAAAB29yZGVySWQCAAAABl9vd25lcgQAAAALYW1vdW50QXNzZXQJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAHb3JkZXJJZAIAAAANX2Ftb3VudF9hc3NldAQAAAAFc3BlbnQJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAHb3JkZXJJZAIAAAAGX3NwZW50AwkAAGYAAAACBQAAAAlidXlBbW91bnQJAABlAAAAAgUAAAAGYW1vdW50BQAAAAVzcGVudAkAAAIAAAABAgAAABpub3QgZW5vdWd0aCBhc3NldCBpbiBvcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAAEsAAAAAgUAAAAHb3JkZXJJZAIAAAAGX3NwZW50CQAAZAAAAAIFAAAABXNwZW50BQAAAAlidXlBbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAACWJ1eUFtb3VudAMJAAAAAAAAAgUAAAALYW1vdW50QXNzZXQCAAAABVdBVkVTBQAAAAR1bml0CQACWQAAAAEFAAAAC2Ftb3VudEFzc2V0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABW93bmVyCAUAAAAHcGF5bWVudAAAAAZhbW91bnQDCQAAAAAAAAIFAAAACnByaWNlQXNzZXQCAAAABVdBVkVTBQAAAAR1bml0CQACWQAAAAEFAAAACnByaWNlQXNzZXQFAAAAA25pbAAAAACi/5Q6",
    "chainId": 84,
    "height": 673507,
    "spentComplexity": 0
}

View: original | compacted
Prev: 1Mh8dJKr6Hedyb3EnSz3RA5LaLFGZjK8NcsfJyA4Pb2
Next: 2o3byrNsvjNQE8iZ2QJxWZ3ZYTwiAyezBtfjabg81wx8

Diff: 
Old New Differences
81 81                  else {
82 82                      let c = getIntegerValue(this, (e + "_price"))
83 83                      let k = getIntegerValue(this, (e + "_amount"))
84 -                     let l = (d.amount / c)
85 -                     let m = value(addressFromString(getStringValue(this, (e + "_owner"))))
84 +                     let l = if ((j == "WAVES"))
85 +                         then 8
86 +                         else value(assetInfo(fromBase58String(j))).decimals
87 +                     let m = ((d.amount * pow(10, 0, l, 0, 0, CEILING)) / c)
88 +                     let n = value(addressFromString(getStringValue(this, (e + "_owner"))))
86 89                      let f = getStringValue(this, (e + "_amount_asset"))
87 -                     let n = getIntegerValue(this, (e + "_spent"))
88 -                     if ((l > (k - n)))
90 +                     let o = getIntegerValue(this, (e + "_spent"))
91 +                     if ((m > (k - o)))
89 92                          then throw("not enougth asset in order")
90 -                         else ScriptResult(WriteSet([DataEntry((e + "_spent"), (n + l))]), TransferSet([ScriptTransfer(a.caller, l, if ((f == "WAVES"))
93 +                         else ScriptResult(WriteSet([DataEntry((e + "_spent"), (o + m))]), TransferSet([ScriptTransfer(a.caller, m, if ((f == "WAVES"))
91 94                              then unit
92 -                             else fromBase58String(f)), ScriptTransfer(m, d.amount, if ((b == "WAVES"))
95 +                             else fromBase58String(f)), ScriptTransfer(n, d.amount, if ((b == "WAVES"))
93 96                              then unit
94 97                              else fromBase58String(b))]))
95 98                      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  
5 5  
6 6  @Callable(a)
7 7  func makeSell (b,c) = if (if ((b != "WAVES"))
8 8      then !(isDefined(assetInfo(fromBase58String(b))))
9 9      else false)
10 10      then throw("There is no asset with specified id")
11 11      else if ((0 >= c))
12 12          then throw("price must be positive")
13 13          else {
14 14              let d = valueOrErrorMessage(a.payment, "where is payment?")
15 15              if ((0 >= d.amount))
16 16                  then throw("amount must be positive")
17 17                  else {
18 18                      let e = ("sell_" + toBase58String(a.transactionId))
19 19                      let f = {
20 20                          let g = d.assetId
21 21                          if ($isInstanceOf(g, "ByteVector"))
22 22                              then {
23 23                                  let h = g
24 24                                  toBase58String(h)
25 25                                  }
26 26                              else "WAVES"
27 27                          }
28 28                      WriteSet([DataEntry((e + "_amount"), d.amount), DataEntry((e + "_amount_asset"), f), DataEntry((e + "_price"), c), DataEntry((e + "_price_asset"), b), DataEntry((e + "_owner"), toBase58String(a.caller.bytes)), DataEntry((e + "_spent"), 0)])
29 29                      }
30 30              }
31 31  
32 32  
33 33  
34 34  @Callable(a)
35 35  func makeBuy (f,c) = if (if ((f != "WAVES"))
36 36      then !(isDefined(assetInfo(fromBase58String(f))))
37 37      else false)
38 38      then throw("There is no asset with specified id")
39 39      else if ((0 >= c))
40 40          then throw("price must be positive")
41 41          else {
42 42              let d = valueOrErrorMessage(a.payment, "where is payment?")
43 43              if ((0 >= d.amount))
44 44                  then throw("amount must be positive")
45 45                  else {
46 46                      let e = ("buy_" + toBase58String(a.transactionId))
47 47                      let b = {
48 48                          let g = d.assetId
49 49                          if ($isInstanceOf(g, "ByteVector"))
50 50                              then {
51 51                                  let h = g
52 52                                  toBase58String(h)
53 53                                  }
54 54                              else "WAVES"
55 55                          }
56 56                      WriteSet([DataEntry((e + "_amount"), (d.amount / c)), DataEntry((e + "_amount_asset"), f), DataEntry((e + "_price"), c), DataEntry((e + "_price_asset"), b), DataEntry((e + "_owner"), toBase58String(a.caller.bytes)), DataEntry((e + "_spent"), 0)])
57 57                      }
58 58              }
59 59  
60 60  
61 61  
62 62  @Callable(a)
63 63  func takeSell (i) = {
64 64      let d = valueOrErrorMessage(a.payment, "where is payment?")
65 65      if ((0 >= d.amount))
66 66          then throw("amount must be positive")
67 67          else {
68 68              let e = ("sell_" + i)
69 69              let j = {
70 70                  let g = d.assetId
71 71                  if ($isInstanceOf(g, "ByteVector"))
72 72                      then {
73 73                          let h = g
74 74                          toBase58String(h)
75 75                          }
76 76                      else "WAVES"
77 77                  }
78 78              let b = valueOrErrorMessage(getString(this, (e + "_price_asset")), "there is no order with specified id")
79 79              if ((b != j))
80 80                  then throw(("payment asset must be " + b))
81 81                  else {
82 82                      let c = getIntegerValue(this, (e + "_price"))
83 83                      let k = getIntegerValue(this, (e + "_amount"))
84 -                     let l = (d.amount / c)
85 -                     let m = value(addressFromString(getStringValue(this, (e + "_owner"))))
84 +                     let l = if ((j == "WAVES"))
85 +                         then 8
86 +                         else value(assetInfo(fromBase58String(j))).decimals
87 +                     let m = ((d.amount * pow(10, 0, l, 0, 0, CEILING)) / c)
88 +                     let n = value(addressFromString(getStringValue(this, (e + "_owner"))))
86 89                      let f = getStringValue(this, (e + "_amount_asset"))
87 -                     let n = getIntegerValue(this, (e + "_spent"))
88 -                     if ((l > (k - n)))
90 +                     let o = getIntegerValue(this, (e + "_spent"))
91 +                     if ((m > (k - o)))
89 92                          then throw("not enougth asset in order")
90 -                         else ScriptResult(WriteSet([DataEntry((e + "_spent"), (n + l))]), TransferSet([ScriptTransfer(a.caller, l, if ((f == "WAVES"))
93 +                         else ScriptResult(WriteSet([DataEntry((e + "_spent"), (o + m))]), TransferSet([ScriptTransfer(a.caller, m, if ((f == "WAVES"))
91 94                              then unit
92 -                             else fromBase58String(f)), ScriptTransfer(m, d.amount, if ((b == "WAVES"))
95 +                             else fromBase58String(f)), ScriptTransfer(n, d.amount, if ((b == "WAVES"))
93 96                              then unit
94 97                              else fromBase58String(b))]))
95 98                      }
96 99              }
97 100      }
98 101  
99 102

Old	New		Differences
81	81		else {
82	82		let c = getIntegerValue(this, (e + "_price"))
83	83		let k = getIntegerValue(this, (e + "_amount"))
84		-	let l = (d.amount / c)
85		-	let m = value(addressFromString(getStringValue(this, (e + "_owner"))))
	84	+	let l = if ((j == "WAVES"))
	85	+	then 8
	86	+	else value(assetInfo(fromBase58String(j))).decimals
	87	+	let m = ((d.amount * pow(10, 0, l, 0, 0, CEILING)) / c)
	88	+	let n = value(addressFromString(getStringValue(this, (e + "_owner"))))
86	89		let f = getStringValue(this, (e + "_amount_asset"))
87		-	let n = getIntegerValue(this, (e + "_spent"))
88		-	if ((l > (k - n)))
	90	+	let o = getIntegerValue(this, (e + "_spent"))
	91	+	if ((m > (k - o)))
89	92		then throw("not enougth asset in order")
90		-	else ScriptResult(WriteSet([DataEntry((e + "_spent"), (n + l))]), TransferSet([ScriptTransfer(a.caller, l, if ((f == "WAVES"))
	93	+	else ScriptResult(WriteSet([DataEntry((e + "_spent"), (o + m))]), TransferSet([ScriptTransfer(a.caller, m, if ((f == "WAVES"))
91	94		then unit
92		-	else fromBase58String(f)), ScriptTransfer(m, d.amount, if ((b == "WAVES"))
	95	+	else fromBase58String(f)), ScriptTransfer(n, d.amount, if ((b == "WAVES"))
93	96		then unit
94	97		else fromBase58String(b))]))
95	98		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4
5	5
6	6		@Callable(a)
7	7		func makeSell (b,c) = if (if ((b != "WAVES"))
8	8		then !(isDefined(assetInfo(fromBase58String(b))))
9	9		else false)
10	10		then throw("There is no asset with specified id")
11	11		else if ((0 >= c))
12	12		then throw("price must be positive")
13	13		else {
14	14		let d = valueOrErrorMessage(a.payment, "where is payment?")
15	15		if ((0 >= d.amount))
16	16		then throw("amount must be positive")
17	17		else {
18	18		let e = ("sell_" + toBase58String(a.transactionId))
19	19		let f = {
20	20		let g = d.assetId
21	21		if ($isInstanceOf(g, "ByteVector"))
22	22		then {
23	23		let h = g
24	24		toBase58String(h)
25	25		}
26	26		else "WAVES"
27	27		}
28	28		WriteSet([DataEntry((e + "_amount"), d.amount), DataEntry((e + "_amount_asset"), f), DataEntry((e + "_price"), c), DataEntry((e + "_price_asset"), b), DataEntry((e + "_owner"), toBase58String(a.caller.bytes)), DataEntry((e + "_spent"), 0)])
29	29		}
30	30		}
31	31
32	32
33	33
34	34		@Callable(a)
35	35		func makeBuy (f,c) = if (if ((f != "WAVES"))
36	36		then !(isDefined(assetInfo(fromBase58String(f))))
37	37		else false)
38	38		then throw("There is no asset with specified id")
39	39		else if ((0 >= c))
40	40		then throw("price must be positive")
41	41		else {
42	42		let d = valueOrErrorMessage(a.payment, "where is payment?")
43	43		if ((0 >= d.amount))
44	44		then throw("amount must be positive")
45	45		else {
46	46		let e = ("buy_" + toBase58String(a.transactionId))
47	47		let b = {
48	48		let g = d.assetId
49	49		if ($isInstanceOf(g, "ByteVector"))
50	50		then {
51	51		let h = g
52	52		toBase58String(h)
53	53		}
54	54		else "WAVES"
55	55		}
56	56		WriteSet([DataEntry((e + "_amount"), (d.amount / c)), DataEntry((e + "_amount_asset"), f), DataEntry((e + "_price"), c), DataEntry((e + "_price_asset"), b), DataEntry((e + "_owner"), toBase58String(a.caller.bytes)), DataEntry((e + "_spent"), 0)])
57	57		}
58	58		}
59	59
60	60
61	61
62	62		@Callable(a)
63	63		func takeSell (i) = {
64	64		let d = valueOrErrorMessage(a.payment, "where is payment?")
65	65		if ((0 >= d.amount))
66	66		then throw("amount must be positive")
67	67		else {
68	68		let e = ("sell_" + i)
69	69		let j = {
70	70		let g = d.assetId
71	71		if ($isInstanceOf(g, "ByteVector"))
72	72		then {
73	73		let h = g
74	74		toBase58String(h)
75	75		}
76	76		else "WAVES"
77	77		}
78	78		let b = valueOrErrorMessage(getString(this, (e + "_price_asset")), "there is no order with specified id")
79	79		if ((b != j))
80	80		then throw(("payment asset must be " + b))
81	81		else {
82	82		let c = getIntegerValue(this, (e + "_price"))
83	83		let k = getIntegerValue(this, (e + "_amount"))
84		-	let l = (d.amount / c)
85		-	let m = value(addressFromString(getStringValue(this, (e + "_owner"))))
	84	+	let l = if ((j == "WAVES"))
	85	+	then 8
	86	+	else value(assetInfo(fromBase58String(j))).decimals
	87	+	let m = ((d.amount * pow(10, 0, l, 0, 0, CEILING)) / c)
	88	+	let n = value(addressFromString(getStringValue(this, (e + "_owner"))))
86	89		let f = getStringValue(this, (e + "_amount_asset"))
87		-	let n = getIntegerValue(this, (e + "_spent"))
88		-	if ((l > (k - n)))
	90	+	let o = getIntegerValue(this, (e + "_spent"))
	91	+	if ((m > (k - o)))
89	92		then throw("not enougth asset in order")
90		-	else ScriptResult(WriteSet([DataEntry((e + "_spent"), (n + l))]), TransferSet([ScriptTransfer(a.caller, l, if ((f == "WAVES"))
	93	+	else ScriptResult(WriteSet([DataEntry((e + "_spent"), (o + m))]), TransferSet([ScriptTransfer(a.caller, m, if ((f == "WAVES"))
91	94		then unit
92		-	else fromBase58String(f)), ScriptTransfer(m, d.amount, if ((b == "WAVES"))
	95	+	else fromBase58String(f)), ScriptTransfer(n, d.amount, if ((b == "WAVES"))
93	96		then unit
94	97		else fromBase58String(b))]))
95	98		}
96	99		}
97	100		}
98	101
99	102

github/deemru/w8io/169f3d6 
39.20 ms ◑