w8 · tx · 72T···TNS

tx · 72To7uGZhYUUYgj64Ga3SGqwH4oNGuTrPuU9yyPRtTNS

3PKZk5TdPCLP2GZviipLFfK46ExTnwkRCBd:  -0.00600000 Waves

2022.09.08 16:23 [3285708] smart account 3PKZk5TdPCLP2GZviipLFfK46ExTnwkRCBd > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "72To7uGZhYUUYgj64Ga3SGqwH4oNGuTrPuU9yyPRtTNS",
    "fee": 600000,
    "feeAssetId": null,
    "timestamp": 1662643217034,
    "version": 1,
    "sender": "3PKZk5TdPCLP2GZviipLFfK46ExTnwkRCBd",
    "senderPublicKey": "CoV1jk1qqzAeWBtHh14JiHCtHBsmn5oBWAdGsF4zTptz",
    "proofs": [
        "27AiC8hQz3vEckuFUC1WmnZ3GYs2VqnEwDQhvKiahTXPXNKgUh1CRAkfYZ6EP6xLrgxEA67GrDYhgYXeDNE6d6v2"
    ],
    "script": "base64:BgIaCAISBAoCCAgSABIECgIICBIDCgEIEgMKAQgeARB3cml0ZUNvbnN0U3RyaW5nAgNrZXkFdmFsdWUDCQEBIQEJAQlpc0RlZmluZWQBCQCdCAIFBHRoaXMFA2tleQkBC1N0cmluZ0VudHJ5AgUDa2V5BQV2YWx1ZQkAAgEJAKwCAgIVYWxyZWFkeSBpbml0aWFsaXplZDogBQNrZXkBDXdyaXRlQ29uc3RJbnQCA2tleQV2YWx1ZQMJAQEhAQkBCWlzRGVmaW5lZAEJAJoIAgUEdGhpcwUDa2V5CQEMSW50ZWdlckVudHJ5AgUDa2V5BQV2YWx1ZQkAAgEJAKwCAgIVYWxyZWFkeSBpbml0aWFsaXplZDogBQNrZXkBCHdyaXRlSW50AgNrZXkFdmFsdWUDCQBmAgAABQV2YWx1ZQkAAgEJAKwCAgkArAICCQCsAgICF3dyaXRpbmcgbmVnYXRpdmUgdmFsdWUgCQCkAwEFBXZhbHVlAgkgZm9yIGtleSAFA2tleQkBDEludGVnZXJFbnRyeQIFA2tleQUFdmFsdWUBCGNoYW5nZUJ5AgNrZXkFdmFsdWUJAQh3cml0ZUludAIFA2tleQkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUDa2V5AAAFBXZhbHVlAAtjb25maWdTdG9yZQIGY29uZmlnAA1jb25maWdBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzBQtjb25maWdTdG9yZQASbWF5YmVPcmFjbGVBZGRyZXNzBAckbWF0Y2gwCQCdCAIFDWNvbmZpZ0FkZHJlc3MCDm9yYWNsZV9hZGRyZXNzAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkApggBBQFzBQR1bml0AAZIRUlHSFQFBmhlaWdodAEJb3BBbGxvd2VkAQJvcAQHJG1hdGNoMAkA/AcEBQ1jb25maWdBZGRyZXNzAglvcEFsbG93ZWQJAMwIAgIEdXNkbgkAzAgCBQJvcAUDbmlsBQNuaWwDCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBYgUHJG1hdGNoMAMFAWIGCQACAQILbm90IGFsbG93ZWQJAAIBAiFvcEFsbG93ZWQ6IHVuZXhwZWN0ZWQgcmVzdWx0IHR5cGUBCG1haW5Pbmx5AQFpAwkBCGNvbnRhaW5zAgkBEUBleHRyTmF0aXZlKDEwNTMpAgUNY29uZmlnQWRkcmVzcwIEbWFpbgkApQgBCAUBaQZjYWxsZXIGCQACAQIQb25seSBtYWluIGNhbiBkbwEHdGhyb3dJZgIJY29uZGl0aW9uBWVycm9yAwUJY29uZGl0aW9uCQACAQUFZXJyb3IGAAlUSU1FRlJBTUUAoAsABHVzZG4JARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMCBHVzZG4BF2FkZHJlc3NUb3RhbFN0b3JlTGVnYWN5AQdhZGRyZXNzCQCsAgIFB2FkZHJlc3MCBV91c2RuARFhZGRyZXNzVG90YWxTdG9yZQEHYWRkcmVzcwkArAICBQdhZGRyZXNzAgVfVVNETgERdmVzdGluZ1N0YXJ0U3RvcmUBB2FkZHJlc3MJAKwCAgUHYWRkcmVzcwIOX3Zlc3Rpbmdfc3RhcnQBE3Zlc3RpbmdDbGFpbWVkU3RvcmUBB2FkZHJlc3MJAKwCAgUHYWRkcmVzcwIIX2NsYWltZWQBGXdpdGhkcmF3bldpdGhpbkVwb2NoU3RvcmUDCmVwb2NoU3RhcnQHYWRkcmVzcwdhc3NldElkCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwUHYXNzZXRJZAIBXwkApAMBBQplcG9jaFN0YXJ0Ahdfd2l0aGRyYXduX3dpdGhpbl9lcG9jaAARY3VycmVudEVwb2NoU3RhcnQJAGgCCQBpAgUGSEVJR0hUBQlUSU1FRlJBTUUFCVRJTUVGUkFNRQAMbWluQ2xhaW1Vc2RuCQELdmFsdWVPckVsc2UCCQCaCAIFDWNvbmZpZ0FkZHJlc3MCFW1pbmltYXhWZXN0aW5nVXNkbkFsbAkAaAIAZADAhD0ADm1heFRvdGFsUGVyRGF5CQELdmFsdWVPckVsc2UCCQCaCAIFDWNvbmZpZ0FkZHJlc3MCFm1heERhaWx5VmVzdGluZ1VzZG5BbGwJAGgCCQBoAgBkAOgHAMCEPQAOdG90YWxVU0ROU3RvcmUCCnRvdGFsX3VzZG4BE3dpdGhkcmF3blRvZGF5U3RvcmUBB2FkZHJlc3MJARl3aXRoZHJhd25XaXRoaW5FcG9jaFN0b3JlAwURY3VycmVudEVwb2NoU3RhcnQFB2FkZHJlc3MFBHVzZG4BDndpdGhkcmF3blRvZGF5AQdhZGRyZXNzCQELdmFsdWVPckVsc2UCCQCfCAEJARN3aXRoZHJhd25Ub2RheVN0b3JlAQUHYWRkcmVzcwAAABh3aXRoZHJhd25Ub2RheVRvdGFsU3RvcmUJARl3aXRoZHJhd25XaXRoaW5FcG9jaFN0b3JlAwURY3VycmVudEVwb2NoU3RhcnQCBXRvdGFsBQR1c2RuABN3aXRoZHJhd25Ub2RheVRvdGFsCQELdmFsdWVPckVsc2UCCQCfCAEFGHdpdGhkcmF3blRvZGF5VG90YWxTdG9yZQAAABN0b3RhbEF2YWlsYWJsZVRvZGF5CQBlAgUObWF4VG90YWxQZXJEYXkFE3dpdGhkcmF3blRvZGF5VG90YWwBEnVzZXJWZXN0aW5nQmFsYW5jZQEHYWRkcmVzcwQMdG90YWxWZXN0aW5nCQELdmFsdWVPckVsc2UCCQCfCAEJARFhZGRyZXNzVG90YWxTdG9yZQEFB2FkZHJlc3MJAQt2YWx1ZU9yRWxzZQIJAJ8IAQkBF2FkZHJlc3NUb3RhbFN0b3JlTGVnYWN5AQUHYWRkcmVzcwAABA5hbHJlYWR5Q2xhaW1lZAkBC3ZhbHVlT3JFbHNlAgkAnwgBCQETdmVzdGluZ0NsYWltZWRTdG9yZQEFB2FkZHJlc3MAAAQMY2xhaW1lZFRvZGF5CQEOd2l0aGRyYXduVG9kYXkBBQdhZGRyZXNzBAckbWF0Y2gwCQCaCAIFBHRoaXMJARF2ZXN0aW5nU3RhcnRTdG9yZQEFB2FkZHJlc3MDCQABAgUHJG1hdGNoMAIDSW50BAx2ZXN0aW5nU3RhcnQFByRtYXRjaDAED3RvdGFsTm9uQ2xhaW1lZAkAZQIFDHRvdGFsVmVzdGluZwUOYWxyZWFkeUNsYWltZWQECmRhaWx5TGltaXQJAJYDAQkAzAgCBQxtaW5DbGFpbVVzZG4JAMwIAgkAaQIFDHRvdGFsVmVzdGluZwD0AwUDbmlsBA5hdmFpbGFibGVUb2RheQkAlwMBCQDMCAIFD3RvdGFsTm9uQ2xhaW1lZAkAzAgCBRN0b3RhbEF2YWlsYWJsZVRvZGF5CQDMCAIJAGUCBQpkYWlseUxpbWl0BQxjbGFpbWVkVG9kYXkFA25pbAkAlwoFBQx0b3RhbFZlc3RpbmcFDmFscmVhZHlDbGFpbWVkBQx2ZXN0aW5nU3RhcnQFDGNsYWltZWRUb2RheQUOYXZhaWxhYmxlVG9kYXkJAJkKBwUMdG90YWxWZXN0aW5nAAAA////////////AQD///////////8BAP///////////wEA////////////AQD///////////8BAQphZHZpc2VVc2VyAQdhZGRyZXNzBAskdDAzNTE1MzYxNgkBEnVzZXJWZXN0aW5nQmFsYW5jZQEFB2FkZHJlc3MEDHRvdGFsVmVzdGluZwgFCyR0MDM1MTUzNjE2Al8xBA5hbHJlYWR5Q2xhaW1lZAgFCyR0MDM1MTUzNjE2Al8yBAVzdGFydAgFCyR0MDM1MTUzNjE2Al8zBAxjbGFpbWVkVG9kYXkIBQskdDAzNTE1MzYxNgJfNAQOYXZhaWxhYmxlVG9kYXkIBQskdDAzNTE1MzYxNgJfNQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIRbWFya2V0c19hZGRyZXNzOiAFB2FkZHJlc3MCGCwgbWFya2V0c190b3RhbFZlc3Rpbmc6IAkApAMBBQx0b3RhbFZlc3RpbmcCGiwgbWFya2V0c19hbHJlYWR5Q2xhaW1lZDogCQCkAwEFDmFscmVhZHlDbGFpbWVkAhcsIG1hcmtldHNfc3RhcnRIZWlnaHQ6IAkApAMBBQVzdGFydAIWLCBtYXJrZXRzX2RhaWx5TGltaXQ6IAkApAMBCQCWAwEJAMwIAgUMbWluQ2xhaW1Vc2RuCQDMCAIJAGkCBQx0b3RhbFZlc3RpbmcA9AMFA25pbAIYLCBtYXJrZXRzX2NsYWltZWRUb2RheTogCQCkAwEFDGNsYWltZWRUb2RheQIaLCBtYXJrZXRzX2F2YWlsYWJsZVRvZGF5OiAJAKQDAQUOYXZhaWxhYmxlVG9kYXkCIiwgbWFya2V0c19nbG9iYWxseUF2YWlsYWJsZVRvZGF5OiAJAKQDAQUTdG90YWxBdmFpbGFibGVUb2RheQEWd2l0aGRyYXdWZXN0ZWRJbnRlcm5hbAIHYWRkcmVzcwJ0bwQGY2hlY2tzCQEJb3BBbGxvd2VkAQIbbGlxdWlkYW9fYWxsX3dpdGhkcmF3VmVzdGVkAwkAAAIFBmNoZWNrcwUGY2hlY2tzBAskdDA0MjU5NDM2MAkBEnVzZXJWZXN0aW5nQmFsYW5jZQEFB2FkZHJlc3MEDHRvdGFsVmVzdGluZwgFCyR0MDQyNTk0MzYwAl8xBA5hbHJlYWR5Q2xhaW1lZAgFCyR0MDQyNTk0MzYwAl8yBAVzdGFydAgFCyR0MDQyNTk0MzYwAl8zBAxjbGFpbWVkVG9kYXkIBQskdDA0MjU5NDM2MAJfNAQOYXZhaWxhYmxlVG9kYXkIBQskdDA0MjU5NDM2MAJfNQMJAGYCAAAFBXN0YXJ0CQACAQISbm8gdmVzdGluZyBlbmFibGVkAwkAZwIAAAUOYXZhaWxhYmxlVG9kYXkJAAIBAhFub3RoaW5nIGF2YWlsYWJsZQkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFAnRvBQ5hdmFpbGFibGVUb2RheQkA2QQBBQR1c2RuCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQETdmVzdGluZ0NsYWltZWRTdG9yZQEFB2FkZHJlc3MJAGQCBQ5hbHJlYWR5Q2xhaW1lZAUOYXZhaWxhYmxlVG9kYXkJAMwIAgkBCGNoYW5nZUJ5AgkBE3dpdGhkcmF3blRvZGF5U3RvcmUBBQdhZGRyZXNzBQ5hdmFpbGFibGVUb2RheQkAzAgCCQEIY2hhbmdlQnkCBRh3aXRoZHJhd25Ub2RheVRvdGFsU3RvcmUFDmF2YWlsYWJsZVRvZGF5BQNuaWwFDmF2YWlsYWJsZVRvZGF5CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBQFpAQRpbml0AgRjb25mA25JZAMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECEm9ubHkgc2VsZiBjYW4gaW5pdAkAzAgCCQEQd3JpdGVDb25zdFN0cmluZwIFC2NvbmZpZ1N0b3JlBQRjb25mCQDMCAIJARB3cml0ZUNvbnN0U3RyaW5nAgIEdXNkbgUDbklkBQNuaWwBaQEOd2l0aGRyYXdWZXN0ZWQABAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgkBFndpdGhkcmF3VmVzdGVkSW50ZXJuYWwCBQdhZGRyZXNzBQdhZGRyZXNzAWkBE3dpdGhkcmF3VmVzdGVkRm9yVG8CA2FjYwJ0bwQGY2hlY2tzCQEIbWFpbk9ubHkBBQFpAwkAAAIFBmNoZWNrcwUGY2hlY2tzCQEWd2l0aGRyYXdWZXN0ZWRJbnRlcm5hbAIFA2FjYwUCdG8JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEKYWNjb3VudEZvcgEHYWRkcmVzcwQIYXR0YWNoZWQJAJEDAggFAWkIcGF5bWVudHMAAAQGY2hlY2tzAwMJAQhtYWluT25seQEFAWkJAQlvcEFsbG93ZWQBAhFsaXF1aWRhb19hbGxfbW92ZQcJAQd0aHJvd0lmAgkBAiE9AgkA2AQBCQEFdmFsdWUBCAUIYXR0YWNoZWQHYXNzZXRJZAUEdXNkbgIVdXNkbiBtdXN0IGJlIGF0dGFjaGVkBwMJAAACBQZjaGVja3MFBmNoZWNrcwQLJHQwNTU0NDU2NDUJARJ1c2VyVmVzdGluZ0JhbGFuY2UBBQdhZGRyZXNzBAx0b3RhbFZlc3RpbmcIBQskdDA1NTQ0NTY0NQJfMQQOYWxyZWFkeUNsYWltZWQIBQskdDA1NTQ0NTY0NQJfMgQFc3RhcnQIBQskdDA1NTQ0NTY0NQJfMwQMY2xhaW1lZFRvZGF5CAULJHQwNTU0NDU2NDUCXzQEDmF2YWlsYWJsZVRvZGF5CAULJHQwNTU0NDU2NDUCXzUJAMwIAgkBCHdyaXRlSW50AgkBEXZlc3RpbmdTdGFydFN0b3JlAQUHYWRkcmVzcwUGSEVJR0hUCQDMCAIJAQh3cml0ZUludAIJARFhZGRyZXNzVG90YWxTdG9yZQEFB2FkZHJlc3MJAGQCBQx0b3RhbFZlc3RpbmcIBQhhdHRhY2hlZAZhbW91bnQJAMwIAgkBCGNoYW5nZUJ5AgUOdG90YWxVU0ROU3RvcmUIBQhhdHRhY2hlZAZhbW91bnQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQdhZHZpc2VVAQNhY2MJAJQKAgUDbmlsCQEKYWR2aXNlVXNlcgEFA2FjYwBcgpzS",
    "chainId": 87,
    "height": 3285708,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3Li4XaEqNBhxEsuosTpxrTvtzUmdnsRdpoQ67PusCHAx
Next: GiPfYuyYnvCqUwrZ51y86GW4XHqCxyapzdDSATtVckFx

Diff: 
Old New Differences
172 172          then throwIf((toBase58String(value(attached.assetId)) != usdn), "usdn must be attached")
173 173          else false
174 174      if ((checks == checks))
175 -         then [writeInt(vestingStartStore(address), HEIGHT), changeBy(addressTotalStore(address), attached.amount), changeBy(totalUSDNStore, attached.amount)]
175 +         then {
176 +             let $t055445645 = userVestingBalance(address)
177 +             let totalVesting = $t055445645._1
178 +             let alreadyClaimed = $t055445645._2
179 +             let start = $t055445645._3
180 +             let claimedToday = $t055445645._4
181 +             let availableToday = $t055445645._5
182 + [writeInt(vestingStartStore(address), HEIGHT), writeInt(addressTotalStore(address), (totalVesting + attached.amount)), changeBy(totalUSDNStore, attached.amount)]
183 +             }
176 184          else throw("Strict value is not equal to itself.")
177 185      }
178 186  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  func writeConstString (key,value) = if (!(isDefined(getString(this, key))))
5 5      then StringEntry(key, value)
6 6      else throw(("already initialized: " + key))
7 7  
8 8  
9 9  func writeConstInt (key,value) = if (!(isDefined(getInteger(this, key))))
10 10      then IntegerEntry(key, value)
11 11      else throw(("already initialized: " + key))
12 12  
13 13  
14 14  func writeInt (key,value) = if ((0 > value))
15 15      then throw(((("writing negative value " + toString(value)) + " for key ") + key))
16 16      else IntegerEntry(key, value)
17 17  
18 18  
19 19  func changeBy (key,value) = writeInt(key, (valueOrElse(getInteger(this, key), 0) + value))
20 20  
21 21  
22 22  let configStore = "config"
23 23  
24 24  let configAddress = addressFromStringValue(getStringValue(this, configStore))
25 25  
26 26  let maybeOracleAddress = match getString(configAddress, "oracle_address") {
27 27      case s: String => 
28 28          addressFromString(s)
29 29      case _ => 
30 30          unit
31 31  }
32 32  
33 33  let HEIGHT = height
34 34  
35 35  func opAllowed (op) = match invoke(configAddress, "opAllowed", ["usdn", op], nil) {
36 36      case b: Boolean => 
37 37          if (b)
38 38              then true
39 39              else throw("not allowed")
40 40      case _ => 
41 41          throw("opAllowed: unexpected result type")
42 42  }
43 43  
44 44  
45 45  func mainOnly (i) = if (contains(getStringValue(configAddress, "main"), toString(i.caller)))
46 46      then true
47 47      else throw("only main can do")
48 48  
49 49  
50 50  func throwIf (condition,error) = if (condition)
51 51      then throw(error)
52 52      else true
53 53  
54 54  
55 55  let TIMEFRAME = 1440
56 56  
57 57  let usdn = getStringValue(this, "usdn")
58 58  
59 59  func addressTotalStoreLegacy (address) = (address + "_usdn")
60 60  
61 61  
62 62  func addressTotalStore (address) = (address + "_USDN")
63 63  
64 64  
65 65  func vestingStartStore (address) = (address + "_vesting_start")
66 66  
67 67  
68 68  func vestingClaimedStore (address) = (address + "_claimed")
69 69  
70 70  
71 71  func withdrawnWithinEpochStore (epochStart,address,assetId) = (((((address + "_") + assetId) + "_") + toString(epochStart)) + "_withdrawn_within_epoch")
72 72  
73 73  
74 74  let currentEpochStart = ((HEIGHT / TIMEFRAME) * TIMEFRAME)
75 75  
76 76  let minClaimUsdn = valueOrElse(getInteger(configAddress, "minimaxVestingUsdnAll"), (100 * 1000000))
77 77  
78 78  let maxTotalPerDay = valueOrElse(getInteger(configAddress, "maxDailyVestingUsdnAll"), ((100 * 1000) * 1000000))
79 79  
80 80  let totalUSDNStore = "total_usdn"
81 81  
82 82  func withdrawnTodayStore (address) = withdrawnWithinEpochStore(currentEpochStart, address, usdn)
83 83  
84 84  
85 85  func withdrawnToday (address) = valueOrElse(getInteger(withdrawnTodayStore(address)), 0)
86 86  
87 87  
88 88  let withdrawnTodayTotalStore = withdrawnWithinEpochStore(currentEpochStart, "total", usdn)
89 89  
90 90  let withdrawnTodayTotal = valueOrElse(getInteger(withdrawnTodayTotalStore), 0)
91 91  
92 92  let totalAvailableToday = (maxTotalPerDay - withdrawnTodayTotal)
93 93  
94 94  func userVestingBalance (address) = {
95 95      let totalVesting = valueOrElse(getInteger(addressTotalStore(address)), valueOrElse(getInteger(addressTotalStoreLegacy(address)), 0))
96 96      let alreadyClaimed = valueOrElse(getInteger(vestingClaimedStore(address)), 0)
97 97      let claimedToday = withdrawnToday(address)
98 98      match getInteger(this, vestingStartStore(address)) {
99 99          case vestingStart: Int => 
100 100              let totalNonClaimed = (totalVesting - alreadyClaimed)
101 101              let dailyLimit = max([minClaimUsdn, (totalVesting / 500)])
102 102              let availableToday = min([totalNonClaimed, totalAvailableToday, (dailyLimit - claimedToday)])
103 103              $Tuple5(totalVesting, alreadyClaimed, vestingStart, claimedToday, availableToday)
104 104          case _ => 
105 105              $Tuple7(totalVesting, 0, -1, -1, -1, -1, -1)
106 106      }
107 107      }
108 108  
109 109  
110 110  func adviseUser (address) = {
111 111      let $t035153616 = userVestingBalance(address)
112 112      let totalVesting = $t035153616._1
113 113      let alreadyClaimed = $t035153616._2
114 114      let start = $t035153616._3
115 115      let claimedToday = $t035153616._4
116 116      let availableToday = $t035153616._5
117 117      ((((((((((((((("markets_address: " + address) + ", markets_totalVesting: ") + toString(totalVesting)) + ", markets_alreadyClaimed: ") + toString(alreadyClaimed)) + ", markets_startHeight: ") + toString(start)) + ", markets_dailyLimit: ") + toString(max([minClaimUsdn, (totalVesting / 500)]))) + ", markets_claimedToday: ") + toString(claimedToday)) + ", markets_availableToday: ") + toString(availableToday)) + ", markets_globallyAvailableToday: ") + toString(totalAvailableToday))
118 118      }
119 119  
120 120  
121 121  func withdrawVestedInternal (address,to) = {
122 122      let checks = opAllowed("liquidao_all_withdrawVested")
123 123      if ((checks == checks))
124 124          then {
125 125              let $t042594360 = userVestingBalance(address)
126 126              let totalVesting = $t042594360._1
127 127              let alreadyClaimed = $t042594360._2
128 128              let start = $t042594360._3
129 129              let claimedToday = $t042594360._4
130 130              let availableToday = $t042594360._5
131 131              if ((0 > start))
132 132                  then throw("no vesting enabled")
133 133                  else if ((0 >= availableToday))
134 134                      then throw("nothing available")
135 135                      else $Tuple2([ScriptTransfer(addressFromStringValue(to), availableToday, fromBase58String(usdn)), IntegerEntry(vestingClaimedStore(address), (alreadyClaimed + availableToday)), changeBy(withdrawnTodayStore(address), availableToday), changeBy(withdrawnTodayTotalStore, availableToday)], availableToday)
136 136              }
137 137          else throw("Strict value is not equal to itself.")
138 138      }
139 139  
140 140  
141 141  @Callable(i)
142 142  func init (conf,nId) = if ((i.caller != this))
143 143      then throw("only self can init")
144 144      else [writeConstString(configStore, conf), writeConstString("usdn", nId)]
145 145  
146 146  
147 147  
148 148  @Callable(i)
149 149  func withdrawVested () = {
150 150      let address = toString(i.caller)
151 151      withdrawVestedInternal(address, address)
152 152      }
153 153  
154 154  
155 155  
156 156  @Callable(i)
157 157  func withdrawVestedForTo (acc,to) = {
158 158      let checks = mainOnly(i)
159 159      if ((checks == checks))
160 160          then withdrawVestedInternal(acc, to)
161 161          else throw("Strict value is not equal to itself.")
162 162      }
163 163  
164 164  
165 165  
166 166  @Callable(i)
167 167  func accountFor (address) = {
168 168      let attached = i.payments[0]
169 169      let checks = if (if (mainOnly(i))
170 170          then opAllowed("liquidao_all_move")
171 171          else false)
172 172          then throwIf((toBase58String(value(attached.assetId)) != usdn), "usdn must be attached")
173 173          else false
174 174      if ((checks == checks))
175 -         then [writeInt(vestingStartStore(address), HEIGHT), changeBy(addressTotalStore(address), attached.amount), changeBy(totalUSDNStore, attached.amount)]
175 +         then {
176 +             let $t055445645 = userVestingBalance(address)
177 +             let totalVesting = $t055445645._1
178 +             let alreadyClaimed = $t055445645._2
179 +             let start = $t055445645._3
180 +             let claimedToday = $t055445645._4
181 +             let availableToday = $t055445645._5
182 + [writeInt(vestingStartStore(address), HEIGHT), writeInt(addressTotalStore(address), (totalVesting + attached.amount)), changeBy(totalUSDNStore, attached.amount)]
183 +             }
176 184          else throw("Strict value is not equal to itself.")
177 185      }
178 186  
179 187  
180 188  
181 189  @Callable(i)
182 190  func adviseU (acc) = $Tuple2(nil, adviseUser(acc))
183 191  
184 192

Old	New		Differences
172	172		then throwIf((toBase58String(value(attached.assetId)) != usdn), "usdn must be attached")
173	173		else false
174	174		if ((checks == checks))
175		-	then [writeInt(vestingStartStore(address), HEIGHT), changeBy(addressTotalStore(address), attached.amount), changeBy(totalUSDNStore, attached.amount)]
	175	+	then {
	176	+	let $t055445645 = userVestingBalance(address)
	177	+	let totalVesting = $t055445645._1
	178	+	let alreadyClaimed = $t055445645._2
	179	+	let start = $t055445645._3
	180	+	let claimedToday = $t055445645._4
	181	+	let availableToday = $t055445645._5
	182	+	[writeInt(vestingStartStore(address), HEIGHT), writeInt(addressTotalStore(address), (totalVesting + attached.amount)), changeBy(totalUSDNStore, attached.amount)]
	183	+	}
176	184		else throw("Strict value is not equal to itself.")
177	185		}
178	186

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		func writeConstString (key,value) = if (!(isDefined(getString(this, key))))
5	5		then StringEntry(key, value)
6	6		else throw(("already initialized: " + key))
7	7
8	8
9	9		func writeConstInt (key,value) = if (!(isDefined(getInteger(this, key))))
10	10		then IntegerEntry(key, value)
11	11		else throw(("already initialized: " + key))
12	12
13	13
14	14		func writeInt (key,value) = if ((0 > value))
15	15		then throw(((("writing negative value " + toString(value)) + " for key ") + key))
16	16		else IntegerEntry(key, value)
17	17
18	18
19	19		func changeBy (key,value) = writeInt(key, (valueOrElse(getInteger(this, key), 0) + value))
20	20
21	21
22	22		let configStore = "config"
23	23
24	24		let configAddress = addressFromStringValue(getStringValue(this, configStore))
25	25
26	26		let maybeOracleAddress = match getString(configAddress, "oracle_address") {
27	27		case s: String =>
28	28		addressFromString(s)
29	29		case _ =>
30	30		unit
31	31		}
32	32
33	33		let HEIGHT = height
34	34
35	35		func opAllowed (op) = match invoke(configAddress, "opAllowed", ["usdn", op], nil) {
36	36		case b: Boolean =>
37	37		if (b)
38	38		then true
39	39		else throw("not allowed")
40	40		case _ =>
41	41		throw("opAllowed: unexpected result type")
42	42		}
43	43
44	44
45	45		func mainOnly (i) = if (contains(getStringValue(configAddress, "main"), toString(i.caller)))
46	46		then true
47	47		else throw("only main can do")
48	48
49	49
50	50		func throwIf (condition,error) = if (condition)
51	51		then throw(error)
52	52		else true
53	53
54	54
55	55		let TIMEFRAME = 1440
56	56
57	57		let usdn = getStringValue(this, "usdn")
58	58
59	59		func addressTotalStoreLegacy (address) = (address + "_usdn")
60	60
61	61
62	62		func addressTotalStore (address) = (address + "_USDN")
63	63
64	64
65	65		func vestingStartStore (address) = (address + "_vesting_start")
66	66
67	67
68	68		func vestingClaimedStore (address) = (address + "_claimed")
69	69
70	70
71	71		func withdrawnWithinEpochStore (epochStart,address,assetId) = (((((address + "_") + assetId) + "_") + toString(epochStart)) + "_withdrawn_within_epoch")
72	72
73	73
74	74		let currentEpochStart = ((HEIGHT / TIMEFRAME) * TIMEFRAME)
75	75
76	76		let minClaimUsdn = valueOrElse(getInteger(configAddress, "minimaxVestingUsdnAll"), (100 * 1000000))
77	77
78	78		let maxTotalPerDay = valueOrElse(getInteger(configAddress, "maxDailyVestingUsdnAll"), ((100 * 1000) * 1000000))
79	79
80	80		let totalUSDNStore = "total_usdn"
81	81
82	82		func withdrawnTodayStore (address) = withdrawnWithinEpochStore(currentEpochStart, address, usdn)
83	83
84	84
85	85		func withdrawnToday (address) = valueOrElse(getInteger(withdrawnTodayStore(address)), 0)
86	86
87	87
88	88		let withdrawnTodayTotalStore = withdrawnWithinEpochStore(currentEpochStart, "total", usdn)
89	89
90	90		let withdrawnTodayTotal = valueOrElse(getInteger(withdrawnTodayTotalStore), 0)
91	91
92	92		let totalAvailableToday = (maxTotalPerDay - withdrawnTodayTotal)
93	93
94	94		func userVestingBalance (address) = {
95	95		let totalVesting = valueOrElse(getInteger(addressTotalStore(address)), valueOrElse(getInteger(addressTotalStoreLegacy(address)), 0))
96	96		let alreadyClaimed = valueOrElse(getInteger(vestingClaimedStore(address)), 0)
97	97		let claimedToday = withdrawnToday(address)
98	98		match getInteger(this, vestingStartStore(address)) {
99	99		case vestingStart: Int =>
100	100		let totalNonClaimed = (totalVesting - alreadyClaimed)
101	101		let dailyLimit = max([minClaimUsdn, (totalVesting / 500)])
102	102		let availableToday = min([totalNonClaimed, totalAvailableToday, (dailyLimit - claimedToday)])
103	103		$Tuple5(totalVesting, alreadyClaimed, vestingStart, claimedToday, availableToday)
104	104		case _ =>
105	105		$Tuple7(totalVesting, 0, -1, -1, -1, -1, -1)
106	106		}
107	107		}
108	108
109	109
110	110		func adviseUser (address) = {
111	111		let $t035153616 = userVestingBalance(address)
112	112		let totalVesting = $t035153616._1
113	113		let alreadyClaimed = $t035153616._2
114	114		let start = $t035153616._3
115	115		let claimedToday = $t035153616._4
116	116		let availableToday = $t035153616._5
117	117		((((((((((((((("markets_address: " + address) + ", markets_totalVesting: ") + toString(totalVesting)) + ", markets_alreadyClaimed: ") + toString(alreadyClaimed)) + ", markets_startHeight: ") + toString(start)) + ", markets_dailyLimit: ") + toString(max([minClaimUsdn, (totalVesting / 500)]))) + ", markets_claimedToday: ") + toString(claimedToday)) + ", markets_availableToday: ") + toString(availableToday)) + ", markets_globallyAvailableToday: ") + toString(totalAvailableToday))
118	118		}
119	119
120	120
121	121		func withdrawVestedInternal (address,to) = {
122	122		let checks = opAllowed("liquidao_all_withdrawVested")
123	123		if ((checks == checks))
124	124		then {
125	125		let $t042594360 = userVestingBalance(address)
126	126		let totalVesting = $t042594360._1
127	127		let alreadyClaimed = $t042594360._2
128	128		let start = $t042594360._3
129	129		let claimedToday = $t042594360._4
130	130		let availableToday = $t042594360._5
131	131		if ((0 > start))
132	132		then throw("no vesting enabled")
133	133		else if ((0 >= availableToday))
134	134		then throw("nothing available")
135	135		else $Tuple2([ScriptTransfer(addressFromStringValue(to), availableToday, fromBase58String(usdn)), IntegerEntry(vestingClaimedStore(address), (alreadyClaimed + availableToday)), changeBy(withdrawnTodayStore(address), availableToday), changeBy(withdrawnTodayTotalStore, availableToday)], availableToday)
136	136		}
137	137		else throw("Strict value is not equal to itself.")
138	138		}
139	139
140	140
141	141		@Callable(i)
142	142		func init (conf,nId) = if ((i.caller != this))
143	143		then throw("only self can init")
144	144		else [writeConstString(configStore, conf), writeConstString("usdn", nId)]
145	145
146	146
147	147
148	148		@Callable(i)
149	149		func withdrawVested () = {
150	150		let address = toString(i.caller)
151	151		withdrawVestedInternal(address, address)
152	152		}
153	153
154	154
155	155
156	156		@Callable(i)
157	157		func withdrawVestedForTo (acc,to) = {
158	158		let checks = mainOnly(i)
159	159		if ((checks == checks))
160	160		then withdrawVestedInternal(acc, to)
161	161		else throw("Strict value is not equal to itself.")
162	162		}
163	163
164	164
165	165
166	166		@Callable(i)
167	167		func accountFor (address) = {
168	168		let attached = i.payments[0]
169	169		let checks = if (if (mainOnly(i))
170	170		then opAllowed("liquidao_all_move")
171	171		else false)
172	172		then throwIf((toBase58String(value(attached.assetId)) != usdn), "usdn must be attached")
173	173		else false
174	174		if ((checks == checks))
175		-	then [writeInt(vestingStartStore(address), HEIGHT), changeBy(addressTotalStore(address), attached.amount), changeBy(totalUSDNStore, attached.amount)]
	175	+	then {
	176	+	let $t055445645 = userVestingBalance(address)
	177	+	let totalVesting = $t055445645._1
	178	+	let alreadyClaimed = $t055445645._2
	179	+	let start = $t055445645._3
	180	+	let claimedToday = $t055445645._4
	181	+	let availableToday = $t055445645._5
	182	+	[writeInt(vestingStartStore(address), HEIGHT), writeInt(addressTotalStore(address), (totalVesting + attached.amount)), changeBy(totalUSDNStore, attached.amount)]
	183	+	}
176	184		else throw("Strict value is not equal to itself.")
177	185		}
178	186
179	187
180	188
181	189		@Callable(i)
182	190		func adviseU (acc) = $Tuple2(nil, adviseUser(acc))
183	191
184	192

github/deemru/w8io/3ef1775 
29.16 ms ◑