tx · 3PPApkLP1CiSojXnnvfkSveq57XpcET6qCQxFDS3H5dA

3PPhk65Ab4UDgbxYUDW7YSXkzHfWtj7WBrB:  -0.01100000 Waves

2022.06.27 21:06 [3180782] smart account 3PPhk65Ab4UDgbxYUDW7YSXkzHfWtj7WBrB > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3PPApkLP1CiSojXnnvfkSveq57XpcET6qCQxFDS3H5dA",
    "fee": 1100000,
    "feeAssetId": null,
    "timestamp": 1656353266377,
    "version": 2,
    "chainId": 87,
    "sender": "3PPhk65Ab4UDgbxYUDW7YSXkzHfWtj7WBrB",
    "senderPublicKey": "JA8PUnni68FEVnZHgEhqhPwTTovQj8Cmf1sLwE9QuugX",
    "proofs": [
        "3yQtNiqrUAuxVxCTUHyxHf4tnNANY6Qjak1uztxLoLpxK5xdzkSMvhZJdSrYpbguEZKNiwTZB7sjYfEUwYwdAJ7X"
    ],
    "script": "base64:AAIFAAAAAAAAACAIAhIDCgEBEgMKAQQSAwoBBBIDCgEEEgMKAQQSAwoBBAAAAA4AAAAAB3BsdXRvSWQBAAAAIAgLS31S8qASJW+T7s99SrIspsrLF1j9hxE9vHm2pxfdAAAAAAZ1c2RuSWQBAAAAILYmKcME9c5TkaQOS3UkL2SMUbH6369UKb1I0h0qsqrRAAAAAApwbHV0b0lkU3RyAgAAACtZUUZZb013QVJNUXpaczN3cXVjQlRkSk5XU2JzWWszR0F3N3dzcVU0Z3lBAAAAAAl1c2RuSWRTdHICAAAALERHMnhGa1BkRHdLVW9Ca3pHQWhRdExwU0d6ZlhMaUNZUEV6ZUtIMkFkMjRwAAAAAAtwb29sQWRkcmVzcwkBAAAAB0FkZHJlc3MAAAABAQAAABoBV7jYyH909s3aUPtUxIZ5hR/OpH6dbeAMYwAAAAAGU2NhbGU4AAAAAAAF9eEAAAAAAAZTY2FsZTIAAAAAAAAAAGQAAAAABURlcHRoCQAAaAAAAAIAAAAAAAAAABgAAAAAAAAAADwAAAAAClBhcmFtZXRlcnMJAARMAAAAAgkABEwAAAACAAAAAAAAAABkCQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgAAAAAAAAAAAAkABEwAAAACAAAAAAAAAAAACQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAkABEwAAAACCQAETAAAAAIAAAAAAAAAAG4JAARMAAAAAgAAAAAAAAAAzAkABEwAAAACAAAAAAAAAAAECQAETAAAAAIAAAAAAAAAABgJAARMAAAAAgAAAAAAAAAeHgUAAAADbmlsCQAETAAAAAIJAARMAAAAAgAAAAAAAAAAeAkABEwAAAACAAAAAAAAAAE1CQAETAAAAAIAAAAAAAAAAAUJAARMAAAAAgAAAAAAAAAALAkABEwAAAACAAAAAAAAACJ0BQAAAANuaWwJAARMAAAAAgkABEwAAAACAAAAAAAAAACCCQAETAAAAAIAAAAAAAAAAaEJAARMAAAAAgAAAAAAAAAABgkABEwAAAACAAAAAAAAAAA9CQAETAAAAAIAAAAAAAAAHmQFAAAAA25pbAkABEwAAAACCQAETAAAAAIAAAAAAAAAAIwJAARMAAAAAgAAAAAAAAACDgkABEwAAAACAAAAAAAAAAAHCQAETAAAAAIAAAAAAAAAAEwJAARMAAAAAgAAAAAAAAAaDgUAAAADbmlsCQAETAAAAAIJAARMAAAAAgAAAAAAAAAAlgkABEwAAAACAAAAAAAAAAJ+CQAETAAAAAIAAAAAAAAAAAgJAARMAAAAAgAAAAAAAAAAWAkABEwAAAACAAAAAAAAABW4BQAAAANuaWwJAARMAAAAAgkABEwAAAACAAAAAAAAAACgCQAETAAAAAIAAAAAAAAAAvEJAARMAAAAAgAAAAAAAAAACQkABEwAAAACAAAAAAAAAABjCQAETAAAAAIAAAAAAAAAEVgFAAAAA25pbAkABEwAAAACCQAETAAAAAIAAAAAAAAAAKoJAARMAAAAAgAAAAAAAAAC8QkABEwAAAACAAAAAAAAAAAJCQAETAAAAAIAAAAAAAAAAG0JAARMAAAAAgAAAAAAAAANAgUAAAADbmlsCQAETAAAAAIJAARMAAAAAgAAAAAAAAAAtAkABEwAAAACAAAAAAAAAALxCQAETAAAAAIAAAAAAAAAAAkJAARMAAAAAgAAAAAAAAAAdgkABEwAAAACAAAAAAAAAAisBQAAAANuaWwJAARMAAAAAgkABEwAAAACAAAAAAAAAAC+CQAETAAAAAIAAAAAAAAAAvEJAARMAAAAAgAAAAAAAAAACQkABEwAAAACAAAAAAAAAAB+CQAETAAAAAIAAAAAAAAABFYFAAAAA25pbAkABEwAAAACCQAETAAAAAIAAAAAAAAAAMgJAARMAAAAAgAAAAAAAAAC8QkABEwAAAACAAAAAAAAAAAICQAETAAAAAIAAAAAAAAAAIsJAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsCQAETAAAAAIJAARMAAAAAgAAAAAAAAAA0gkABEwAAAACAAAAAAAAAALxCQAETAAAAAIAAAAAAAAAAAgJAARMAAAAAgAAAAAAAAAAkQkABEwAAAACAAAAAAAAAAAABQAAAANuaWwJAARMAAAAAgkABEwAAAACAAAAAAAAAADcCQAETAAAAAIAAAAAAAAAAvEJAARMAAAAAgAAAAAAAAAABwkABEwAAAACAAAAAAAAAACRCQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAkABEwAAAACCQAETAAAAAIAAAAAAAAAAOYJAARMAAAAAgAAAAAAAAAC8QkABEwAAAACAAAAAAAAAAAHCQAETAAAAAIAAAAAAAAAAJcJAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsCQAETAAAAAIJAARMAAAAAgAAAAAAAAAA8AkABEwAAAACAAAAAAAAAALxCQAETAAAAAIAAAAAAAAAAAYJAARMAAAAAgAAAAAAAAAAnAkABEwAAAACAAAAAAAAAAAABQAAAANuaWwJAARMAAAAAgkABEwAAAACAAAAAAAAAAD6CQAETAAAAAIAAAAAAAAAAvEJAARMAAAAAgAAAAAAAAAABgkABEwAAAACAAAAAAAAAACgCQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAkABEwAAAACCQAETAAAAAIAAAAAAAAAAQQJAARMAAAAAgAAAAAAAAAC8QkABEwAAAACAAAAAAAAAAAFCQAETAAAAAIAAAAAAAAAAKQJAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsCQAETAAAAAIJAARMAAAAAgAAAAAAAAABDgkABEwAAAACAAAAAAAAAALxCQAETAAAAAIAAAAAAAAAAAUJAARMAAAAAgAAAAAAAAAAqAkABEwAAAACAAAAAAAAAAAABQAAAANuaWwJAARMAAAAAgkABEwAAAACAAAAAAAAAAEYCQAETAAAAAIAAAAAAAAAAvEJAARMAAAAAgAAAAAAAAAABAkABEwAAAACAAAAAAAAAACsCQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAkABEwAAAACCQAETAAAAAIAAAAAAAAAASIJAARMAAAAAgAAAAAAAAAC8QkABEwAAAACAAAAAAAAAAAECQAETAAAAAIAAAAAAAAAAK8JAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsBQAAAANuaWwBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABeAUAAAAHJG1hdGNoMAUAAAABeAAAAAAAAAAAAAEAAAAMc2V0UGFyYW1ldGVyAAAAAwAAAANrZXkAAAADdmFsAAAADnJlbWVtYmVySGVpZ2h0CQAETgAAAAIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAFbGFzdF8FAAAAA2tleQUAAAADdmFsBQAAAANuaWwDBQAAAA5yZW1lbWJlckhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAGkAAAAAQUAAAAGaGVpZ2h0AgAAAAFfBQAAAANrZXkFAAAAA3ZhbAUAAAADbmlsBQAAAANuaWwBAAAADGdldFBhcmFtZXRlcgAAAAEAAAADa2V5CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgIAAAAFbGFzdF8FAAAAA2tleQEAAAATZ2V0UGFyYW1ldGVyQXRCbG9jawAAAAIAAAADa2V5AAAABWJsb2NrCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACCQABpAAAAAEFAAAABWJsb2NrAgAAAAFfBQAAAANrZXkBAAAADmNhbGN1bGF0ZVByaWNlAAAAAwAAAAtwb29sQWRkcmVzcwAAAAlhc3NldDBTdHIAAAAJYXNzZXQxU3RyBAAAAAhhMFdlaWdodAkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAALcG9vbEFkZHJlc3MJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfBQAAAAlhc3NldDBTdHICAAAAB193ZWlnaHQEAAAACGExV2VpZ2h0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAtwb29sQWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAAB3N0YXRpY18FAAAACWFzc2V0MVN0cgIAAAAHX3dlaWdodAQAAAAJYTBCYWxhbmNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAtwb29sQWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8FAAAACWFzc2V0MFN0cgIAAAAIX2JhbGFuY2UEAAAACWExQmFsYW5jZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAALcG9vbEFkZHJlc3MJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfBQAAAAlhc3NldDFTdHICAAAACF9iYWxhbmNlCQAAawAAAAMFAAAABlNjYWxlOAkAAGgAAAACBQAAAAlhMUJhbGFuY2UFAAAACGEwV2VpZ2h0CQAAaAAAAAIFAAAACWEwQmFsYW5jZQUAAAAIYTFXZWlnaHQAAAAGAAAAAWkBAAAAEHNldFRyZWFzdXJ5VmFsdWUAAAABAAAABmFtb3VudAkBAAAADHNldFBhcmFtZXRlcgAAAAMCAAAADXRyZWFzdXJ5VmFsdWUFAAAABmFtb3VudAYAAAABaQEAAAAQZ2V0VHJlYXN1cnlWYWx1ZQAAAAEAAAAFZGVidWcEAAAACXBhcmFtZXRlcgkBAAAADGdldFBhcmFtZXRlcgAAAAECAAAADXRyZWFzdXJ5VmFsdWUDBQAAAAVkZWJ1ZwkAAAIAAAABCQABpAAAAAEFAAAACXBhcmFtZXRlcgkABRQAAAACBQAAAANuaWwFAAAACXBhcmFtZXRlcgAAAAFpAQAAAA5nZXRNYXJrZXRWYWx1ZQAAAAEAAAAFZGVidWcEAAAACnBsdXRvQXNzZXQJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQUAAAAHcGx1dG9JZAQAAAAIcXVhbnRpdHkIBQAAAApwbHV0b0Fzc2V0AAAACHF1YW50aXR5BAAAAApwbHV0b1ByaWNlCQEAAAAOY2FsY3VsYXRlUHJpY2UAAAADBQAAAAtwb29sQWRkcmVzcwUAAAAKcGx1dG9JZFN0cgUAAAAJdXNkbklkU3RyBAAAAAlwYXJhbWV0ZXIJAABrAAAAAwUAAAAIcXVhbnRpdHkFAAAACnBsdXRvUHJpY2UFAAAABlNjYWxlOAMFAAAABWRlYnVnCQAAAgAAAAEJAAGkAAAAAQUAAAAJcGFyYW1ldGVyCQAFFAAAAAIFAAAAA25pbAUAAAAJcGFyYW1ldGVyAAAAAWkBAAAAD2dldEdyb3d0aEZhY3RvcgAAAAEAAAAFZGVidWcEAAAAC21hcmtldFZhbHVlAAAAAAAAAAAABAAAAAlwYXJhbWV0ZXIJAAGWAAAAAQkABEwAAAACCQAAawAAAAMFAAAAC21hcmtldFZhbHVlBQAAAAZTY2FsZTIJAQAAAAxnZXRQYXJhbWV0ZXIAAAABAgAAAA10cmVhc3VyeVZhbHVlCQAETAAAAAIAAAAAAAAAAGQFAAAAA25pbAMFAAAABWRlYnVnCQAAAgAAAAEJAAGkAAAAAQUAAAAJcGFyYW1ldGVyCQAFFAAAAAIFAAAAA25pbAUAAAAJcGFyYW1ldGVyAAAAAWkBAAAAEGdldFRyZWFzdXJ5RGVsdGEAAAABAAAABWRlYnVnBAAAAAlwYXJhbWV0ZXIJAAGWAAAAAQkABEwAAAACCQAAawAAAAMJAQAAAAxnZXRQYXJhbWV0ZXIAAAABAgAAAA10cmVhc3VyeVZhbHVlCQEAAAATZ2V0UGFyYW1ldGVyQXRCbG9jawAAAAICAAAADXRyZWFzdXJ5VmFsdWUJAABlAAAAAgUAAAAGaGVpZ2h0BQAAAAVEZXB0aAUAAAAGU2NhbGU4CQAETAAAAAIAAAAAAAAAAAAFAAAAA25pbAMFAAAABWRlYnVnCQAAAgAAAAEJAAGkAAAAAQUAAAAJcGFyYW1ldGVyCQAFFAAAAAIFAAAAA25pbAUAAAAJcGFyYW1ldGVyAAAAAWkBAAAAF2dldE9uYm9hcmRpbmdQYXJhbWV0ZXJzAAAAAQAAAAVkZWJ1ZwQAAAAMZ3Jvd3RoRmFjdG9yBAAAAAckbWF0Y2gwCQAD/AAAAAQFAAAABHRoaXMCAAAAD2dldEdyb3d0aEZhY3RvcgkABEwAAAACBwUAAAADbmlsBQAAAANuaWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAACaW4FAAAAByRtYXRjaDAFAAAAAmluCQAAAgAAAAECAAAACmJhZCBpbnZva2UDCQAAAAAAAAIFAAAADGdyb3d0aEZhY3RvcgUAAAAMZ3Jvd3RoRmFjdG9yCgEAAAACZjEAAAACAAAABWFjY3VtAAAABG5leHQDCQAAZwAAAAIFAAAADGdyb3d0aEZhY3RvcgkAAZEAAAACBQAAAARuZXh0AAAAAAAAAAAABQAAAARuZXh0BQAAAAVhY2N1bQQAAAALcGFyYW1ldGVyTGkKAAAAAAIkbAUAAAAKUGFyYW1ldGVycwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAABSRmMF8xAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAAmYxAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAAFJGYwXzIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDIwCQEAAAAFJGYwXzIAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgAAAAAAAAAACwAAAAAAAAAADAAAAAAAAAAADQAAAAAAAAAADgAAAAAAAAAADwAAAAAAAAAAEAAAAAAAAAAAEQAAAAAAAAAAEgAAAAAAAAAAEwAAAAAAAAAAFAoBAAAAAmYyAAAAAgAAAAVhY2N1bQAAAARuZXh0CQABLAAAAAIJAAEsAAAAAgUAAAAFYWNjdW0JAAGkAAAAAQUAAAAEbmV4dAIAAAABLAQAAAAMcGFyYW1ldGVyU3RyCgAAAAACJGwFAAAAC3BhcmFtZXRlckxpCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAIAAAAACgEAAAAFJGYxXzEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAACZjIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAUkZjFfMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMjAJAQAAAAUkZjFfMgAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKAAAAAAAAAAALAAAAAAAAAAAMAAAAAAAAAAANAAAAAAAAAAAOAAAAAAAAAAAPAAAAAAAAAAAQAAAAAAAAAAARAAAAAAAAAAASAAAAAAAAAAATAAAAAAAAAAAUAwUAAAAFZGVidWcJAAACAAAAAQUAAAAMcGFyYW1ldGVyU3RyCQAFFAAAAAIFAAAAA25pbAUAAAALcGFyYW1ldGVyTGkJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXlLeTfY",
    "height": 3180782,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3B48ctoUorVfvnQysrvs2fNw4TygNNXiXTHynVu2HctU
Next: 9JgzsU7E2HUcpsDQ49cxgZih9DWJHG5KmXeDHhthzJ6n

Diff: 
Old
New
Differences
67
67
 
    let plutoAsset = value(assetInfo(plutoId))
68
68
 
    let quantity = plutoAsset.quantity
69
69
 
    let plutoPrice = calculatePrice(poolAddress, plutoIdStr, usdnIdStr)
70
-
    let parameter = (quantity * plutoPrice)
70
+
    let parameter = fraction(quantity, plutoPrice, Scale8)
71
71
 
    if (debug)
72
72
 
        then throw(toString(parameter))
73
73
 
        else $Tuple2(nil, parameter)
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let plutoId = base58'YQFYoMwARMQzZs3wqucBTdJNWSbsYk3GAw7wsqU4gyA'
5
5
 
6
6
 
let usdnId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
7
7
 
8
8
 
let plutoIdStr = "YQFYoMwARMQzZs3wqucBTdJNWSbsYk3GAw7wsqU4gyA"
9
9
 
10
10
 
let usdnIdStr = "DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p"
11
11
 
12
12
 
let poolAddress = Address(base58'3PJnGkuMm4LkJQVCT7QCRyzApQiEQ2UWcdx')
13
13
 
14
14
 
let Scale8 = 100000000
15
15
 
16
16
 
let Scale2 = 100
17
17
 
18
18
 
let Depth = (24 * 60)
19
19
 
20
20
 
let Parameters = [[100, 0, 0, 0, 0], [110, 204, 4, 24, 7710], [120, 309, 5, 44, 8820], [130, 417, 6, 61, 7780], [140, 526, 7, 76, 6670], [150, 638, 8, 88, 5560], [160, 753, 9, 99, 4440], [170, 753, 9, 109, 3330], [180, 753, 9, 118, 2220], [190, 753, 9, 126, 1110], [200, 753, 8, 139, 0], [210, 753, 8, 145, 0], [220, 753, 7, 145, 0], [230, 753, 7, 151, 0], [240, 753, 6, 156, 0], [250, 753, 6, 160, 0], [260, 753, 5, 164, 0], [270, 753, 5, 168, 0], [280, 753, 4, 172, 0], [290, 753, 4, 175, 0]]
21
21
 
22
22
 
func tryGetInteger (key) = match getInteger(this, key) {
23
23
 
    case x: Int => 
24
24
 
        x
25
25
 
    case _ => 
26
26
 
        0
27
27
 
}
28
28
 
29
29
 
30
30
 
func setParameter (key,val,rememberHeight) = ([IntegerEntry(("last_" + key), val)] ++ (if (rememberHeight)
31
31
 
    then [IntegerEntry(((toString(height) + "_") + key), val)]
32
32
 
    else nil))
33
33
 
34
34
 
35
35
 
func getParameter (key) = tryGetInteger(("last_" + key))
36
36
 
37
37
 
38
38
 
func getParameterAtBlock (key,block) = tryGetInteger(((toString(block) + "_") + key))
39
39
 
40
40
 
41
41
 
func calculatePrice (poolAddress,asset0Str,asset1Str) = {
42
42
 
    let a0Weight = getIntegerValue(poolAddress, (("static_" + asset0Str) + "_weight"))
43
43
 
    let a1Weight = getIntegerValue(poolAddress, (("static_" + asset1Str) + "_weight"))
44
44
 
    let a0Balance = getIntegerValue(poolAddress, (("global_" + asset0Str) + "_balance"))
45
45
 
    let a1Balance = getIntegerValue(poolAddress, (("global_" + asset1Str) + "_balance"))
46
46
 
    fraction(Scale8, (a1Balance * a0Weight), (a0Balance * a1Weight))
47
47
 
    }
48
48
 
49
49
 
50
50
 
@Callable(i)
51
51
 
func setTreasuryValue (amount) = setParameter("treasuryValue", amount, true)
52
52
 
53
53
 
54
54
 
55
55
 
@Callable(i)
56
56
 
func getTreasuryValue (debug) = {
57
57
 
    let parameter = getParameter("treasuryValue")
58
58
 
    if (debug)
59
59
 
        then throw(toString(parameter))
60
60
 
        else $Tuple2(nil, parameter)
61
61
 
    }
62
62
 
63
63
 
64
64
 
65
65
 
@Callable(i)
66
66
 
func getMarketValue (debug) = {
67
67
 
    let plutoAsset = value(assetInfo(plutoId))
68
68
 
    let quantity = plutoAsset.quantity
69
69
 
    let plutoPrice = calculatePrice(poolAddress, plutoIdStr, usdnIdStr)
70
-
    let parameter = (quantity * plutoPrice)
70
+
    let parameter = fraction(quantity, plutoPrice, Scale8)
71
71
 
    if (debug)
72
72
 
        then throw(toString(parameter))
73
73
 
        else $Tuple2(nil, parameter)
74
74
 
    }
75
75
 
76
76
 
77
77
 
78
78
 
@Callable(i)
79
79
 
func getGrowthFactor (debug) = {
80
80
 
    let marketValue = 0
81
81
 
    let parameter = max([fraction(marketValue, Scale2, getParameter("treasuryValue")), 100])
82
82
 
    if (debug)
83
83
 
        then throw(toString(parameter))
84
84
 
        else $Tuple2(nil, parameter)
85
85
 
    }
86
86
 
87
87
 
88
88
 
89
89
 
@Callable(i)
90
90
 
func getTreasuryDelta (debug) = {
91
91
 
    let parameter = max([fraction(getParameter("treasuryValue"), getParameterAtBlock("treasuryValue", (height - Depth)), Scale8), 0])
92
92
 
    if (debug)
93
93
 
        then throw(toString(parameter))
94
94
 
        else $Tuple2(nil, parameter)
95
95
 
    }
96
96
 
97
97
 
98
98
 
99
99
 
@Callable(i)
100
100
 
func getOnboardingParameters (debug) = {
101
101
 
    let growthFactor =     match invoke(this, "getGrowthFactor", [false], nil) {
102
102
 
        case in: Int => 
103
103
 
            in
104
104
 
        case _ => 
105
105
 
            throw("bad invoke")
106
106
 
    }
107
107
 
    if ((growthFactor == growthFactor))
108
108
 
        then {
109
109
 
            func f1 (accum,next) =             if ((growthFactor >= next[0]))
110
110
 
                then next
111
111
 
                else accum
112
112
 
113
113
 
            let parameterLi = {
114
114
 
                let $l = Parameters
115
115
 
                let $s = size($l)
116
116
 
                let $acc0 = nil
117
117
 
                func $f0_1 ($a,$i) =                 if (($i >= $s))
118
118
 
                    then $a
119
119
 
                    else f1($a, $l[$i])
120
120
 
121
121
 
                func $f0_2 ($a,$i) =                 if (($i >= $s))
122
122
 
                    then $a
123
123
 
                    else throw("List size exceeds 20")
124
124
 
125
125
 
                $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($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
126
126
 
                }
127
127
 
            func f2 (accum,next) =             ((accum + toString(next)) + ",")
128
128
 
129
129
 
            let parameterStr = {
130
130
 
                let $l = parameterLi
131
131
 
                let $s = size($l)
132
132
 
                let $acc0 = ""
133
133
 
                func $f1_1 ($a,$i) =                 if (($i >= $s))
134
134
 
                    then $a
135
135
 
                    else f2($a, $l[$i])
136
136
 
137
137
 
                func $f1_2 ($a,$i) =                 if (($i >= $s))
138
138
 
                    then $a
139
139
 
                    else throw("List size exceeds 20")
140
140
 
141
141
 
                $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
142
142
 
                }
143
143
 
            if (debug)
144
144
 
                then throw(parameterStr)
145
145
 
                else $Tuple2(nil, parameterLi)
146
146
 
            }
147
147
 
        else throw("Strict value is not equal to itself.")
148
148
 
    }
149
149
 
150
150
 
151
151
 
@Verifier(tx)
152
152
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
153
153
 

github/deemru/w8io/3ef1775 
46.00 ms ◑