tx · 8m31RKwyQyohCMcWVDjTC3zf8WvTkCGzprbY1nTJKE1P

3NAm3p62bo4q3yMzWjJ6M4eEDBRYXxqkXLQ:  -0.05000000 Waves

2022.09.08 15:17 [2220118] smart account 3NAm3p62bo4q3yMzWjJ6M4eEDBRYXxqkXLQ > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8m31RKwyQyohCMcWVDjTC3zf8WvTkCGzprbY1nTJKE1P",
    "fee": 5000000,
    "feeAssetId": null,
    "timestamp": 1662639585738,
    "version": 2,
    "chainId": 84,
    "sender": "3NAm3p62bo4q3yMzWjJ6M4eEDBRYXxqkXLQ",
    "senderPublicKey": "6ftcjfxzkWUUwSQuuRg45YwriXgjJ5RMUoG9etzbvvs3",
    "proofs": [
        "4F1TKczNhofBQjCtJBHUJZATdu3uNN1UpUxzgmxdA2G8gWdiYuSAgi9EtuzTDDbuNbFmRzABKnLt8ZQXnz3hkKfh"
    ],
    "script": "base64:AAIFAAAAAAAAAAkIAhIFCgMICAgAAAAAAAAAAQAAAAFpAQAAAAdleGVjdXRlAAAAAwAAAARkQXBwAAAACGZ1bmN0aW9uAAAACmFyZ3NTdHJpbmcEAAAABGFyZ3MJAAS1AAAAAgUAAAAKYXJnc1N0cmluZwIAAAABLAoBAAAAAmRvAAAAAgAAAANhY2MAAAADYXJnBAAAAANpbnYJAAP8AAAABAkBAAAAB0FkZHJlc3MAAAABCQACWQAAAAEFAAAABGRBcHAFAAAACGZ1bmN0aW9uCQAETAAAAAIFAAAAA2FyZwUAAAADbmlsBQAAAANuaWwDCQAAAAAAAAIFAAAAA2ludgUAAAADaW52BQAAAANhY2MJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAAAAAdpbnZva2VzCgAAAAACJGwFAAAABGFyZ3MKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwAAAAAAAAAAAACgEAAAAFJGYwXzEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAACZG8AAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAUkZjBfMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAVTGlzdCBzaXplIGV4Y2VlZHMgMTAwCQEAAAAFJGYwXzIAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgAAAAAAAAAACwAAAAAAAAAADAAAAAAAAAAADQAAAAAAAAAADgAAAAAAAAAADwAAAAAAAAAAEAAAAAAAAAAAEQAAAAAAAAAAEgAAAAAAAAAAEwAAAAAAAAAAFAAAAAAAAAAAFQAAAAAAAAAAFgAAAAAAAAAAFwAAAAAAAAAAGAAAAAAAAAAAGQAAAAAAAAAAGgAAAAAAAAAAGwAAAAAAAAAAHAAAAAAAAAAAHQAAAAAAAAAAHgAAAAAAAAAAHwAAAAAAAAAAIAAAAAAAAAAAIQAAAAAAAAAAIgAAAAAAAAAAIwAAAAAAAAAAJAAAAAAAAAAAJQAAAAAAAAAAJgAAAAAAAAAAJwAAAAAAAAAAKAAAAAAAAAAAKQAAAAAAAAAAKgAAAAAAAAAAKwAAAAAAAAAALAAAAAAAAAAALQAAAAAAAAAALgAAAAAAAAAALwAAAAAAAAAAMAAAAAAAAAAAMQAAAAAAAAAAMgAAAAAAAAAAMwAAAAAAAAAANAAAAAAAAAAANQAAAAAAAAAANgAAAAAAAAAANwAAAAAAAAAAOAAAAAAAAAAAOQAAAAAAAAAAOgAAAAAAAAAAOwAAAAAAAAAAPAAAAAAAAAAAPQAAAAAAAAAAPgAAAAAAAAAAPwAAAAAAAAAAQAAAAAAAAAAAQQAAAAAAAAAAQgAAAAAAAAAAQwAAAAAAAAAARAAAAAAAAAAARQAAAAAAAAAARgAAAAAAAAAARwAAAAAAAAAASAAAAAAAAAAASQAAAAAAAAAASgAAAAAAAAAASwAAAAAAAAAATAAAAAAAAAAATQAAAAAAAAAATgAAAAAAAAAATwAAAAAAAAAAUAAAAAAAAAAAUQAAAAAAAAAAUgAAAAAAAAAAUwAAAAAAAAAAVAAAAAAAAAAAVQAAAAAAAAAAVgAAAAAAAAAAVwAAAAAAAAAAWAAAAAAAAAAAWQAAAAAAAAAAWgAAAAAAAAAAWwAAAAAAAAAAXAAAAAAAAAAAXQAAAAAAAAAAXgAAAAAAAAAAXwAAAAAAAAAAYAAAAAAAAAAAYQAAAAAAAAAAYgAAAAAAAAAAYwAAAAAAAAAAZAMJAAAAAAAAAgUAAAAHaW52b2tlcwUAAAAHaW52b2tlcwUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5+g9CUw==",
    "height": 2220118,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6qGpGLMFLYXF99uFEHToFi6dzNppP4gap4De5frZV5tu
Next: Gdwe3WHq8qBiuRMMuJCPBqMxfRPsUxz1HB8dWuaT5wGC

Diff: 

OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-func tryGetString (key) = match getString(this, key) {
5-    case b: String => 
6-        b
7-    case _ => 
8-        ""
9-}
10-
11-
12-func tryGetInteger (key) = match getInteger(this, key) {
13-    case b: Int => 
14-        b
15-    case _ => 
16-        0
17-}
18-
19-
20-func getAssetString (assetId) = match assetId {
21-    case b: ByteVector => 
22-        toBase58String(b)
23-    case _ => 
24-        "WAVES"
25-}
26-
27-
28-func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
29-    then unit
30-    else fromBase58String(assetIdStr)
314 
325 
336 @Callable(i)
34-func createOrder (asset1,amount1) = {
35-    let newOrdersAmount = (tryGetInteger("global_ordersAmount") + 1)
36-    let orderId = toString(newOrdersAmount)
37-    if ((size(i.payments) != 1))
38-        then throw("You should to provide payment")
39-        else if ((0 >= amount1))
40-            then throw("Amount1 cannot be less or equals 0")
41-            else {
42-                let asset0 = getAssetString(i.payments[0].assetId)
43-                let amount0 = i.payments[0].amount
44-                let userActiveOrders = tryGetString((("user_" + toString(i.caller)) + "_activeOrders"))
45-                let newUserActiveOrders =                 match userActiveOrders {
46-                    case _ => 
47-                        if (("" == $match0))
48-                            then orderId
49-                            else ((userActiveOrders + ",") + orderId)
50-                }
51-[IntegerEntry("global_ordersAmount", newOrdersAmount), StringEntry((("order_" + orderId) + "_token0"), asset0), IntegerEntry((("order_" + orderId) + "_amount0"), amount0), IntegerEntry((("order_" + orderId) + "_amount1"), amount1), StringEntry((("order_" + orderId) + "_token1"), asset1), IntegerEntry((("order_" + orderId) + "_fulfilled0"), 0), IntegerEntry((("order_" + orderId) + "_fulfilled1"), 0), StringEntry((("order_" + orderId) + "_owner"), toString(i.caller)), StringEntry((("order_" + orderId) + "_status"), "active"), StringEntry((("user_" + toString(i.caller)) + "_activeOrders"), newUserActiveOrders)]
52-                }
53-    }
7+func execute (dApp,function,argsString) = {
8+    let args = split(argsString, ",")
9+    func do (acc,arg) =     {
10+        let inv = invoke(Address(fromBase58String(dApp)), function, [arg], nil)
11+        if ((inv == inv))
12+            then acc
13+            else throw("Strict value is not equal to itself.")
14+        }
5415 
16+    let invokes = {
17+        let $l = args
18+        let $s = size($l)
19+        let $acc0 = 0
20+        func $f0_1 ($a,$i) =         if (($i >= $s))
21+            then $a
22+            else do($a, $l[$i])
5523 
24+        func $f0_2 ($a,$i) =         if (($i >= $s))
25+            then $a
26+            else throw("List size exceeds 100")
5627 
57-@Callable(i)
58-func fulfillOrder (orderId) = {
59-    let orderOwner = valueOrErrorMessage(getString((("order_" + orderId) + "_owner")), "Cannot find order owner")
60-    let orderStatus = getString((("order_" + orderId) + "_status"))
61-    let orderAsset0 = valueOrErrorMessage(getString((("order_" + orderId) + "_token0")), "Cannot find token0")
62-    let orderAmount0 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_amount0")), "Cannot find amount0")
63-    let orderFulfilled0 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_fulfilled0")), "Cannot find fulfilled0")
64-    let orderAmount0Left = (orderAmount0 - orderFulfilled0)
65-    let orderAsset1 = valueOrErrorMessage(getString((("order_" + orderId) + "_token1")), "Cannot find token1")
66-    let orderAmount1 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_amount1")), "Cannot find amount1")
67-    let orderFulfilled1 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_fulfilled1")), "Cannot find fulfilled1")
68-    let orderAmount1Left = (orderAmount1 - orderFulfilled1)
69-    if ((orderStatus != "active"))
70-        then throw("Order already closed or canceled")
71-        else if ((size(i.payments) != 1))
72-            then throw("You should to provide payment")
73-            else {
74-                let callerAddress = i.caller
75-                let ownerAddress = addressFromStringValue(orderOwner)
76-                let paymentAsset1 = getAssetString(i.payments[0].assetId)
77-                let paymentAmount1 = i.payments[0].amount
78-                if ((paymentAsset1 != orderAsset1))
79-                    then throw("Wrong payment asset")
80-                    else if ((paymentAmount1 >= orderAmount1Left))
81-                        then [ScriptTransfer(callerAddress, (paymentAmount1 - orderAmount1Left), getAssetBytes(orderAsset1)), ScriptTransfer(callerAddress, orderAmount0Left, getAssetBytes(orderAsset0)), ScriptTransfer(ownerAddress, orderAmount1Left, getAssetBytes(paymentAsset1)), IntegerEntry((("order_" + orderId) + "_fulfilled0"), (orderFulfilled0 + orderAmount0Left)), IntegerEntry((("order_" + orderId) + "_fulfilled1"), (orderFulfilled1 + orderAmount1Left)), StringEntry((("order_" + orderId) + "_status"), "closed")]
82-                        else {
83-                            let amount0 = fraction(orderAmount0, paymentAmount1, orderAmount1, FLOOR)
84-[ScriptTransfer(ownerAddress, paymentAmount1, getAssetBytes(paymentAsset1)), ScriptTransfer(callerAddress, amount0, getAssetBytes(orderAsset0)), IntegerEntry((("order_" + orderId) + "_fulfilled0"), (orderFulfilled0 + amount0)), IntegerEntry((("order_" + orderId) + "_fulfilled1"), (orderFulfilled1 + paymentAmount1))]
85-                            }
86-                }
87-    }
88-
89-
90-
91-@Callable(i)
92-func cancelOrder (orderId) = {
93-    let orderOwner = valueOrErrorMessage(getString((("order_" + orderId) + "_owner")), "Cannot find order owner")
94-    let orderStatus = getString((("order_" + orderId) + "_status"))
95-    let orderAsset0 = valueOrErrorMessage(getString((("order_" + orderId) + "_token0")), "Cannot find token0")
96-    let orderAmount0 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_amount0")), "Cannot find amount0")
97-    let orderFulfilled0 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_fulfilled0")), "Cannot find fulfilled0")
98-    let orderAmount0Left = (orderAmount0 - orderFulfilled0)
99-    if ((toBase58String(i.caller.bytes) != orderOwner))
100-        then throw("You cannot cancel order")
101-        else if ((orderStatus != "active"))
102-            then throw("order is closed or canceled")
103-            else [ScriptTransfer(addressFromStringValue(orderOwner), orderAmount0Left, getAssetBytes(orderAsset0)), StringEntry((("order_" + orderId) + "_status"), "canceled")]
28+        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
29+        }
30+    if ((invokes == invokes))
31+        then nil
32+        else throw("Strict value is not equal to itself.")
10433     }
10534 
10635 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-func tryGetString (key) = match getString(this, key) {
5-    case b: String => 
6-        b
7-    case _ => 
8-        ""
9-}
10-
11-
12-func tryGetInteger (key) = match getInteger(this, key) {
13-    case b: Int => 
14-        b
15-    case _ => 
16-        0
17-}
18-
19-
20-func getAssetString (assetId) = match assetId {
21-    case b: ByteVector => 
22-        toBase58String(b)
23-    case _ => 
24-        "WAVES"
25-}
26-
27-
28-func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
29-    then unit
30-    else fromBase58String(assetIdStr)
314 
325 
336 @Callable(i)
34-func createOrder (asset1,amount1) = {
35-    let newOrdersAmount = (tryGetInteger("global_ordersAmount") + 1)
36-    let orderId = toString(newOrdersAmount)
37-    if ((size(i.payments) != 1))
38-        then throw("You should to provide payment")
39-        else if ((0 >= amount1))
40-            then throw("Amount1 cannot be less or equals 0")
41-            else {
42-                let asset0 = getAssetString(i.payments[0].assetId)
43-                let amount0 = i.payments[0].amount
44-                let userActiveOrders = tryGetString((("user_" + toString(i.caller)) + "_activeOrders"))
45-                let newUserActiveOrders =                 match userActiveOrders {
46-                    case _ => 
47-                        if (("" == $match0))
48-                            then orderId
49-                            else ((userActiveOrders + ",") + orderId)
50-                }
51-[IntegerEntry("global_ordersAmount", newOrdersAmount), StringEntry((("order_" + orderId) + "_token0"), asset0), IntegerEntry((("order_" + orderId) + "_amount0"), amount0), IntegerEntry((("order_" + orderId) + "_amount1"), amount1), StringEntry((("order_" + orderId) + "_token1"), asset1), IntegerEntry((("order_" + orderId) + "_fulfilled0"), 0), IntegerEntry((("order_" + orderId) + "_fulfilled1"), 0), StringEntry((("order_" + orderId) + "_owner"), toString(i.caller)), StringEntry((("order_" + orderId) + "_status"), "active"), StringEntry((("user_" + toString(i.caller)) + "_activeOrders"), newUserActiveOrders)]
52-                }
53-    }
7+func execute (dApp,function,argsString) = {
8+    let args = split(argsString, ",")
9+    func do (acc,arg) =     {
10+        let inv = invoke(Address(fromBase58String(dApp)), function, [arg], nil)
11+        if ((inv == inv))
12+            then acc
13+            else throw("Strict value is not equal to itself.")
14+        }
5415 
16+    let invokes = {
17+        let $l = args
18+        let $s = size($l)
19+        let $acc0 = 0
20+        func $f0_1 ($a,$i) =         if (($i >= $s))
21+            then $a
22+            else do($a, $l[$i])
5523 
24+        func $f0_2 ($a,$i) =         if (($i >= $s))
25+            then $a
26+            else throw("List size exceeds 100")
5627 
57-@Callable(i)
58-func fulfillOrder (orderId) = {
59-    let orderOwner = valueOrErrorMessage(getString((("order_" + orderId) + "_owner")), "Cannot find order owner")
60-    let orderStatus = getString((("order_" + orderId) + "_status"))
61-    let orderAsset0 = valueOrErrorMessage(getString((("order_" + orderId) + "_token0")), "Cannot find token0")
62-    let orderAmount0 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_amount0")), "Cannot find amount0")
63-    let orderFulfilled0 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_fulfilled0")), "Cannot find fulfilled0")
64-    let orderAmount0Left = (orderAmount0 - orderFulfilled0)
65-    let orderAsset1 = valueOrErrorMessage(getString((("order_" + orderId) + "_token1")), "Cannot find token1")
66-    let orderAmount1 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_amount1")), "Cannot find amount1")
67-    let orderFulfilled1 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_fulfilled1")), "Cannot find fulfilled1")
68-    let orderAmount1Left = (orderAmount1 - orderFulfilled1)
69-    if ((orderStatus != "active"))
70-        then throw("Order already closed or canceled")
71-        else if ((size(i.payments) != 1))
72-            then throw("You should to provide payment")
73-            else {
74-                let callerAddress = i.caller
75-                let ownerAddress = addressFromStringValue(orderOwner)
76-                let paymentAsset1 = getAssetString(i.payments[0].assetId)
77-                let paymentAmount1 = i.payments[0].amount
78-                if ((paymentAsset1 != orderAsset1))
79-                    then throw("Wrong payment asset")
80-                    else if ((paymentAmount1 >= orderAmount1Left))
81-                        then [ScriptTransfer(callerAddress, (paymentAmount1 - orderAmount1Left), getAssetBytes(orderAsset1)), ScriptTransfer(callerAddress, orderAmount0Left, getAssetBytes(orderAsset0)), ScriptTransfer(ownerAddress, orderAmount1Left, getAssetBytes(paymentAsset1)), IntegerEntry((("order_" + orderId) + "_fulfilled0"), (orderFulfilled0 + orderAmount0Left)), IntegerEntry((("order_" + orderId) + "_fulfilled1"), (orderFulfilled1 + orderAmount1Left)), StringEntry((("order_" + orderId) + "_status"), "closed")]
82-                        else {
83-                            let amount0 = fraction(orderAmount0, paymentAmount1, orderAmount1, FLOOR)
84-[ScriptTransfer(ownerAddress, paymentAmount1, getAssetBytes(paymentAsset1)), ScriptTransfer(callerAddress, amount0, getAssetBytes(orderAsset0)), IntegerEntry((("order_" + orderId) + "_fulfilled0"), (orderFulfilled0 + amount0)), IntegerEntry((("order_" + orderId) + "_fulfilled1"), (orderFulfilled1 + paymentAmount1))]
85-                            }
86-                }
87-    }
88-
89-
90-
91-@Callable(i)
92-func cancelOrder (orderId) = {
93-    let orderOwner = valueOrErrorMessage(getString((("order_" + orderId) + "_owner")), "Cannot find order owner")
94-    let orderStatus = getString((("order_" + orderId) + "_status"))
95-    let orderAsset0 = valueOrErrorMessage(getString((("order_" + orderId) + "_token0")), "Cannot find token0")
96-    let orderAmount0 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_amount0")), "Cannot find amount0")
97-    let orderFulfilled0 = valueOrErrorMessage(getInteger((("order_" + orderId) + "_fulfilled0")), "Cannot find fulfilled0")
98-    let orderAmount0Left = (orderAmount0 - orderFulfilled0)
99-    if ((toBase58String(i.caller.bytes) != orderOwner))
100-        then throw("You cannot cancel order")
101-        else if ((orderStatus != "active"))
102-            then throw("order is closed or canceled")
103-            else [ScriptTransfer(addressFromStringValue(orderOwner), orderAmount0Left, getAssetBytes(orderAsset0)), StringEntry((("order_" + orderId) + "_status"), "canceled")]
28+        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
29+        }
30+    if ((invokes == invokes))
31+        then nil
32+        else throw("Strict value is not equal to itself.")
10433     }
10534 
10635 
10736 @Verifier(tx)
10837 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
10938 
github/deemru/w8io/169f3d6 
47.23 ms ◑