w8 · tx · 5Xk···C29

tx · 5XkJct88BYGNtdiGT7sN7ja4zMUi7uMqgCucYXv22C29

3N3DQFhEz8QzvM2hrNHMsXKqfcZiAnzrvAz:  -0.01000000 Waves

2022.10.28 16:13 [2292300] smart account 3N3DQFhEz8QzvM2hrNHMsXKqfcZiAnzrvAz > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5XkJct88BYGNtdiGT7sN7ja4zMUi7uMqgCucYXv22C29",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1666962655698,
    "version": 2,
    "chainId": 84,
    "sender": "3N3DQFhEz8QzvM2hrNHMsXKqfcZiAnzrvAz",
    "senderPublicKey": "9y561KuPQ5dHWzq35YLJ9XAjGXaY135i4hrBiWq98nQa",
    "proofs": [
        "3EAFiEEHjzBdaJ325uJVN5BnsSXjhzgHo2rAjkmMpK5fN25S2pUmaXFha9ERYDCoVoBT3RqsYozMWDUxSX6NmgrX"
    ],
    "script": "base64:AAIFAAAAAAAAAAoIAhIAEgASABIAAAAABAAAAAAJcmVjaXBpZW50CQEAAAAFdmFsdWUAAAABCQAEJgAAAAECAAAAIzNNeE5uWVZwODFZZllwdmRwc2tmQ0FTNFNkbU5ZY3J0WUxFAQAAAAxpc0ZpcnN0bGV2ZWwAAAAABAAAAAckbWF0Y2gwCQAD/AAAAAQFAAAABHRoaXMCAAAACkZpcnN0bGV2ZWwFAAAAA25pbAUAAAADbmlsAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAdCb29sZWFuBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhCQAAAgAAAAECAAAAJlVuc3VwcG9ydGVkIHJlc3VsdCBmb3JtYXQgKEZpcnN0bGV2ZWwpAQAAAA1pc1NlY29uZGxldmVsAAAAAAQAAAAHJG1hdGNoMAkAA/wAAAAEBQAAAAR0aGlzAgAAAAtTZWNvbmRsZXZlbAUAAAADbmlsBQAAAANuaWwDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAB0Jvb2xlYW4EAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEJAAACAAAAAQIAAAAnVW5zdXBwb3J0ZWQgcmVzdWx0IGZvcm1hdCAoU2Vjb25kbGV2ZWwpAQAAAAxpc1RoaXJkbGV2ZWwAAAAABAAAAAckbWF0Y2gwCQAD/AAAAAQFAAAABHRoaXMCAAAAClRoaXJkbGV2ZWwFAAAAA25pbAUAAAADbmlsAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAdCb29sZWFuBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhCQAAAgAAAAECAAAAJlVuc3VwcG9ydGVkIHJlc3VsdCBmb3JtYXQgKFRoaXJkbGV2ZWwpAAAABAAAAAFpAQAAAApGaXJzdGxldmVsAAAAAAQAAAAFYXNzZXQJAARDAAAABwIAAAANUlRva2VuUlRva2VuMQIAAAAZVGhpcyBpcyBhbiBvcmRpbmFyeSB0b2tlbgAAAAAAAA9CQAAAAAAAAAAAAgYFAAAABHVuaXQAAAAAAAAAAAAEAAAAB2Fzc2V0SWQJAAQ4AAAAAQUAAAAFYXNzZXQEAAAABWxlYXNlCQAERQAAAAMFAAAACXJlY2lwaWVudAAAAAAAAAAAAQAAAAAAAAAAAQQAAAACaWQJAAQ5AAAAAQUAAAAFbGVhc2UEAAAAAWEJAQAAAA1pc1NlY29uZGxldmVsAAAAAAMJAAAAAAAAAgUAAAABYQUAAAABYQkABRQAAAACCQAETAAAAAIJAQAAAAtCaW5hcnlFbnRyeQAAAAICAAAABGJpbjEBAAAAAAkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgIAAAAFYm9vbDEGCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAARpbnQxAAAAAAAAAAABCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAABHN0cjECAAAAAAkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABAgAAAARzdHIxCQAETAAAAAIFAAAABWFzc2V0CQAETAAAAAIJAQAAAAdSZWlzc3VlAAAAAwUAAAAHYXNzZXRJZAAAAAAAAAAAAQYJAARMAAAAAgkBAAAABEJ1cm4AAAACBQAAAAdhc3NldElkAAAAAAAAD0JACQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACXJlY2lwaWVudAAAAAAAAA9CQAUAAAAEdW5pdAkABEwAAAACBQAAAAVsZWFzZQkABEwAAAACCQAEQgAAAAUCAAAAClViZXJUb2tlbjECAAAAIFRoZSB1bHRpbWF0ZSB0b2tlbi4gT25lIGFuZCBvbmx5AAAAAAAAAAABAAAAAAAAAAAABwkABEwAAAACCQEAAAALTGVhc2VDYW5jZWwAAAABBQAAAAJpZAUAAAADbmlsBgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAALU2Vjb25kbGV2ZWwAAAAABAAAAAVhc3NldAkABEMAAAAHAgAAAA5SVG9rZW5SVG9rZW4xMgIAAAAZVGhpcyBpcyBhbiBvcmRpbmFyeSB0b2tlbgAAAAAAAA9CQAAAAAAAAAAAAgYFAAAABHVuaXQAAAAAAAAAAAAEAAAAB2Fzc2V0SWQJAAQ4AAAAAQUAAAAFYXNzZXQEAAAABWxlYXNlCQAERQAAAAMFAAAACXJlY2lwaWVudAAAAAAAAAAAAQAAAAAAAAAAAgQAAAACaWQJAAQ5AAAAAQUAAAAFbGVhc2UEAAAAAWEJAQAAAAxpc1RoaXJkbGV2ZWwAAAAAAwkAAAAAAAACBQAAAAFhBQAAAAFhCQAFFAAAAAIJAARMAAAAAgkBAAAAC0JpbmFyeUVudHJ5AAAAAgIAAAAEYmluMgEAAAAACQAETAAAAAIJAQAAAAxCb29sZWFuRW50cnkAAAACAgAAAAVib29sMgYJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAABGludDIAAAAAAAAAAAEJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAEc3RyMgIAAAAACQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAECAAAABHN0cjIJAARMAAAAAgUAAAAFYXNzZXQJAARMAAAAAgkBAAAAB1JlaXNzdWUAAAADBQAAAAdhc3NldElkAAAAAAAAAAABBgkABEwAAAACCQEAAAAEQnVybgAAAAIFAAAAB2Fzc2V0SWQAAAAAAAAPQkAJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAJcmVjaXBpZW50AAAAAAAAHoSABQAAAAR1bml0CQAETAAAAAIFAAAABWxlYXNlCQAETAAAAAIJAARCAAAABQIAAAAKVWJlclRva2VuMgIAAAAgVGhlIHVsdGltYXRlIHRva2VuLiBPbmUgYW5kIG9ubHkAAAAAAAAAAAEAAAAAAAAAAAAHCQAETAAAAAIJAQAAAAtMZWFzZUNhbmNlbAAAAAEFAAAAAmlkBQAAAANuaWwGCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAAApUaGlyZGxldmVsAAAAAAQAAAAFYXNzZXQJAARDAAAABwIAAAANUlRva2VuUlRva2VuMwIAAAAZVGhpcyBpcyBhbiBvcmRpbmFyeSB0b2tlbgAAAAAAAA9CQAAAAAAAAAAAAgYFAAAABHVuaXQAAAAAAAAAAAAEAAAAB2Fzc2V0SWQJAAQ4AAAAAQUAAAAFYXNzZXQEAAAABWxlYXNlCQAERQAAAAMFAAAACXJlY2lwaWVudAAAAAAAAAAAAQAAAAAAAAAAAwQAAAACaWQJAAQ5AAAAAQUAAAAFbGVhc2UJAAUUAAAAAgkABEwAAAACCQEAAAALQmluYXJ5RW50cnkAAAACAgAAAARiaW4zAQAAAAAJAARMAAAAAgkBAAAADEJvb2xlYW5FbnRyeQAAAAICAAAABWJvb2wzBgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAEaW50MwAAAAAAAAAAAQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAARzdHIzAgAAAAAJAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQIAAAAEc3RyMwkABEwAAAACBQAAAAVhc3NldAkABEwAAAACCQEAAAAHUmVpc3N1ZQAAAAMFAAAAB2Fzc2V0SWQAAAAAAAAAAAEGCQAETAAAAAIJAQAAAARCdXJuAAAAAgUAAAAHYXNzZXRJZAAAAAAAAAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAlyZWNpcGllbnQAAAAAAAAtxsAFAAAABHVuaXQJAARMAAAAAgUAAAAFbGVhc2UJAARMAAAAAgkABEIAAAAFAgAAAApVYmVyVG9rZW4zAgAAACBUaGUgdWx0aW1hdGUgdG9rZW4uIE9uZSBhbmQgb25seQAAAAAAAAAAAQAAAAAAAAAAAAcJAARMAAAAAgkBAAAAC0xlYXNlQ2FuY2VsAAAAAQUAAAACaWQFAAAAA25pbAYAAAABaQEAAAAEY2FsbAAAAAAEAAAABWFzc2V0CQAEQgAAAAUCAAAADE5ld0Fzc2V0dHR0dAIAAAAAAAAAAAAAAAABAAAAAAAAAAABBgQAAAAHYXNzZXRJZAkABDgAAAABBQAAAAVhc3NldAQAAAAFbGVhc2UJAARFAAAAAwUAAAAJcmVjaXBpZW50AAAAAAAAAAABAAAAAAAAAAAABAAAAAJpZAkABDkAAAABBQAAAAVsZWFzZQQAAAABYQkBAAAADGlzRmlyc3RsZXZlbAAAAAADCQAAAAAAAAIFAAAAAWEFAAAAAWEJAARMAAAAAgkBAAAAC0JpbmFyeUVudHJ5AAAAAgIAAAADYmluAQAAAAAJAARMAAAAAgkBAAAADEJvb2xlYW5FbnRyeQAAAAICAAAABGJvb2wGCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAANpbnQAAAAAAAAAAAEJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAADc3RyAgAAAAAJAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQIAAAADc3RyCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACXJlY2lwaWVudAAAAAAAAAAAAQUAAAAEdW5pdAkABEwAAAACBQAAAAVsZWFzZQkABEwAAAACCQEAAAALTGVhc2VDYW5jZWwAAAABBQAAAAJpZAUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAABza/BG",
    "height": 2292300,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: J9CZyEjvboCNXAd387EMtMPqfouG6fS7J9QLrrYtRzjc
Next: HEX4cT9SBjuqiLDTAHjJB5qpMP18GtRvsVSSRTkDLpsr

Diff: 
Old New Differences
35 35      let id = calculateLeaseId(lease)
36 36      let a = isSecondlevel()
37 37      if ((a == a))
38 -         then $Tuple2([BinaryEntry("bin1", base58''), BooleanEntry("bool1", true), IntegerEntry("int1", 1), StringEntry("str1", ""), DeleteEntry("str1"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken1", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
38 +         then $Tuple2([BinaryEntry("bin1", base58''), BooleanEntry("bool1", true), IntegerEntry("int1", 1), StringEntry("str1", ""), DeleteEntry("str1"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1000000, unit), lease, Issue("UberToken1", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
39 39          else throw("Strict value is not equal to itself.")
40 40      }
41 41  
49 49      let id = calculateLeaseId(lease)
50 50      let a = isThirdlevel()
51 51      if ((a == a))
52 -         then $Tuple2([BinaryEntry("bin2", base58''), BooleanEntry("bool2", true), IntegerEntry("int2", 1), StringEntry("str2", ""), DeleteEntry("str2"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken2", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
52 +         then $Tuple2([BinaryEntry("bin2", base58''), BooleanEntry("bool2", true), IntegerEntry("int2", 1), StringEntry("str2", ""), DeleteEntry("str2"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 2000000, unit), lease, Issue("UberToken2", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
53 53          else throw("Strict value is not equal to itself.")
54 54      }
55 55  
61 61      let assetId = calculateAssetId(asset)
62 62      let lease = Lease(recipient, 1, 3)
63 63      let id = calculateLeaseId(lease)
64 -     $Tuple2([BinaryEntry("bin3", base58''), BooleanEntry("bool3", true), IntegerEntry("int3", 1), StringEntry("str3", ""), DeleteEntry("str3"), asset, Reissue(assetId, 1, true), Burn(assetId, 1), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken3", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
64 +     $Tuple2([BinaryEntry("bin3", base58''), BooleanEntry("bool3", true), IntegerEntry("int3", 1), StringEntry("str3", ""), DeleteEntry("str3"), asset, Reissue(assetId, 1, true), Burn(assetId, 1), ScriptTransfer(recipient, 3000000, unit), lease, Issue("UberToken3", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
65 65      }
66 66  
67 67  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let recipient = value(addressFromString("3MxNnYVp81YfYpvdpskfCAS4SdmNYcrtYLE"))
5 5  
6 6  func isFirstlevel () = match invoke(this, "Firstlevel", nil, nil) {
7 7      case a: Boolean => 
8 8          a
9 9      case _ => 
10 10          throw("Unsupported result format (Firstlevel)")
11 11  }
12 12  
13 13  
14 14  func isSecondlevel () = match invoke(this, "Secondlevel", nil, nil) {
15 15      case a: Boolean => 
16 16          a
17 17      case _ => 
18 18          throw("Unsupported result format (Secondlevel)")
19 19  }
20 20  
21 21  
22 22  func isThirdlevel () = match invoke(this, "Thirdlevel", nil, nil) {
23 23      case a: Boolean => 
24 24          a
25 25      case _ => 
26 26          throw("Unsupported result format (Thirdlevel)")
27 27  }
28 28  
29 29  
30 30  @Callable(i)
31 31  func Firstlevel () = {
32 32      let asset = Issue("RTokenRToken1", "This is an ordinary token", 1000000, 2, true, unit, 0)
33 33      let assetId = calculateAssetId(asset)
34 34      let lease = Lease(recipient, 1, 1)
35 35      let id = calculateLeaseId(lease)
36 36      let a = isSecondlevel()
37 37      if ((a == a))
38 -         then $Tuple2([BinaryEntry("bin1", base58''), BooleanEntry("bool1", true), IntegerEntry("int1", 1), StringEntry("str1", ""), DeleteEntry("str1"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken1", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
38 +         then $Tuple2([BinaryEntry("bin1", base58''), BooleanEntry("bool1", true), IntegerEntry("int1", 1), StringEntry("str1", ""), DeleteEntry("str1"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1000000, unit), lease, Issue("UberToken1", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
39 39          else throw("Strict value is not equal to itself.")
40 40      }
41 41  
42 42  
43 43  
44 44  @Callable(i)
45 45  func Secondlevel () = {
46 46      let asset = Issue("RTokenRToken12", "This is an ordinary token", 1000000, 2, true, unit, 0)
47 47      let assetId = calculateAssetId(asset)
48 48      let lease = Lease(recipient, 1, 2)
49 49      let id = calculateLeaseId(lease)
50 50      let a = isThirdlevel()
51 51      if ((a == a))
52 -         then $Tuple2([BinaryEntry("bin2", base58''), BooleanEntry("bool2", true), IntegerEntry("int2", 1), StringEntry("str2", ""), DeleteEntry("str2"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken2", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
52 +         then $Tuple2([BinaryEntry("bin2", base58''), BooleanEntry("bool2", true), IntegerEntry("int2", 1), StringEntry("str2", ""), DeleteEntry("str2"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 2000000, unit), lease, Issue("UberToken2", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
53 53          else throw("Strict value is not equal to itself.")
54 54      }
55 55  
56 56  
57 57  
58 58  @Callable(i)
59 59  func Thirdlevel () = {
60 60      let asset = Issue("RTokenRToken3", "This is an ordinary token", 1000000, 2, true, unit, 0)
61 61      let assetId = calculateAssetId(asset)
62 62      let lease = Lease(recipient, 1, 3)
63 63      let id = calculateLeaseId(lease)
64 -     $Tuple2([BinaryEntry("bin3", base58''), BooleanEntry("bool3", true), IntegerEntry("int3", 1), StringEntry("str3", ""), DeleteEntry("str3"), asset, Reissue(assetId, 1, true), Burn(assetId, 1), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken3", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
64 +     $Tuple2([BinaryEntry("bin3", base58''), BooleanEntry("bool3", true), IntegerEntry("int3", 1), StringEntry("str3", ""), DeleteEntry("str3"), asset, Reissue(assetId, 1, true), Burn(assetId, 1), ScriptTransfer(recipient, 3000000, unit), lease, Issue("UberToken3", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
65 65      }
66 66  
67 67  
68 68  
69 69  @Callable(i)
70 70  func call () = {
71 71      let asset = Issue("NewAssettttt", "", 1, 1, true)
72 72      let assetId = calculateAssetId(asset)
73 73      let lease = Lease(recipient, 1, 0)
74 74      let id = calculateLeaseId(lease)
75 75      let a = isFirstlevel()
76 76      if ((a == a))
77 77          then [BinaryEntry("bin", base58''), BooleanEntry("bool", true), IntegerEntry("int", 1), StringEntry("str", ""), DeleteEntry("str"), ScriptTransfer(recipient, 1, unit), lease, LeaseCancel(id)]
78 78          else throw("Strict value is not equal to itself.")
79 79      }
80 80  
81 81

Old	New		Differences
35	35		let id = calculateLeaseId(lease)
36	36		let a = isSecondlevel()
37	37		if ((a == a))
38		-	then $Tuple2([BinaryEntry("bin1", base58''), BooleanEntry("bool1", true), IntegerEntry("int1", 1), StringEntry("str1", ""), DeleteEntry("str1"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken1", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
	38	+	then $Tuple2([BinaryEntry("bin1", base58''), BooleanEntry("bool1", true), IntegerEntry("int1", 1), StringEntry("str1", ""), DeleteEntry("str1"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1000000, unit), lease, Issue("UberToken1", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
39	39		else throw("Strict value is not equal to itself.")
40	40		}
41	41

49	49		let id = calculateLeaseId(lease)
50	50		let a = isThirdlevel()
51	51		if ((a == a))
52		-	then $Tuple2([BinaryEntry("bin2", base58''), BooleanEntry("bool2", true), IntegerEntry("int2", 1), StringEntry("str2", ""), DeleteEntry("str2"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken2", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
	52	+	then $Tuple2([BinaryEntry("bin2", base58''), BooleanEntry("bool2", true), IntegerEntry("int2", 1), StringEntry("str2", ""), DeleteEntry("str2"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 2000000, unit), lease, Issue("UberToken2", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
53	53		else throw("Strict value is not equal to itself.")
54	54		}
55	55

61	61		let assetId = calculateAssetId(asset)
62	62		let lease = Lease(recipient, 1, 3)
63	63		let id = calculateLeaseId(lease)
64		-	$Tuple2([BinaryEntry("bin3", base58''), BooleanEntry("bool3", true), IntegerEntry("int3", 1), StringEntry("str3", ""), DeleteEntry("str3"), asset, Reissue(assetId, 1, true), Burn(assetId, 1), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken3", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
	64	+	$Tuple2([BinaryEntry("bin3", base58''), BooleanEntry("bool3", true), IntegerEntry("int3", 1), StringEntry("str3", ""), DeleteEntry("str3"), asset, Reissue(assetId, 1, true), Burn(assetId, 1), ScriptTransfer(recipient, 3000000, unit), lease, Issue("UberToken3", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
65	65		}
66	66
67	67

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let recipient = value(addressFromString("3MxNnYVp81YfYpvdpskfCAS4SdmNYcrtYLE"))
5	5
6	6		func isFirstlevel () = match invoke(this, "Firstlevel", nil, nil) {
7	7		case a: Boolean =>
8	8		a
9	9		case _ =>
10	10		throw("Unsupported result format (Firstlevel)")
11	11		}
12	12
13	13
14	14		func isSecondlevel () = match invoke(this, "Secondlevel", nil, nil) {
15	15		case a: Boolean =>
16	16		a
17	17		case _ =>
18	18		throw("Unsupported result format (Secondlevel)")
19	19		}
20	20
21	21
22	22		func isThirdlevel () = match invoke(this, "Thirdlevel", nil, nil) {
23	23		case a: Boolean =>
24	24		a
25	25		case _ =>
26	26		throw("Unsupported result format (Thirdlevel)")
27	27		}
28	28
29	29
30	30		@Callable(i)
31	31		func Firstlevel () = {
32	32		let asset = Issue("RTokenRToken1", "This is an ordinary token", 1000000, 2, true, unit, 0)
33	33		let assetId = calculateAssetId(asset)
34	34		let lease = Lease(recipient, 1, 1)
35	35		let id = calculateLeaseId(lease)
36	36		let a = isSecondlevel()
37	37		if ((a == a))
38		-	then $Tuple2([BinaryEntry("bin1", base58''), BooleanEntry("bool1", true), IntegerEntry("int1", 1), StringEntry("str1", ""), DeleteEntry("str1"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken1", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
	38	+	then $Tuple2([BinaryEntry("bin1", base58''), BooleanEntry("bool1", true), IntegerEntry("int1", 1), StringEntry("str1", ""), DeleteEntry("str1"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1000000, unit), lease, Issue("UberToken1", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
39	39		else throw("Strict value is not equal to itself.")
40	40		}
41	41
42	42
43	43
44	44		@Callable(i)
45	45		func Secondlevel () = {
46	46		let asset = Issue("RTokenRToken12", "This is an ordinary token", 1000000, 2, true, unit, 0)
47	47		let assetId = calculateAssetId(asset)
48	48		let lease = Lease(recipient, 1, 2)
49	49		let id = calculateLeaseId(lease)
50	50		let a = isThirdlevel()
51	51		if ((a == a))
52		-	then $Tuple2([BinaryEntry("bin2", base58''), BooleanEntry("bool2", true), IntegerEntry("int2", 1), StringEntry("str2", ""), DeleteEntry("str2"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken2", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
	52	+	then $Tuple2([BinaryEntry("bin2", base58''), BooleanEntry("bool2", true), IntegerEntry("int2", 1), StringEntry("str2", ""), DeleteEntry("str2"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 2000000, unit), lease, Issue("UberToken2", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
53	53		else throw("Strict value is not equal to itself.")
54	54		}
55	55
56	56
57	57
58	58		@Callable(i)
59	59		func Thirdlevel () = {
60	60		let asset = Issue("RTokenRToken3", "This is an ordinary token", 1000000, 2, true, unit, 0)
61	61		let assetId = calculateAssetId(asset)
62	62		let lease = Lease(recipient, 1, 3)
63	63		let id = calculateLeaseId(lease)
64		-	$Tuple2([BinaryEntry("bin3", base58''), BooleanEntry("bool3", true), IntegerEntry("int3", 1), StringEntry("str3", ""), DeleteEntry("str3"), asset, Reissue(assetId, 1, true), Burn(assetId, 1), ScriptTransfer(recipient, 1, unit), lease, Issue("UberToken3", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
	64	+	$Tuple2([BinaryEntry("bin3", base58''), BooleanEntry("bool3", true), IntegerEntry("int3", 1), StringEntry("str3", ""), DeleteEntry("str3"), asset, Reissue(assetId, 1, true), Burn(assetId, 1), ScriptTransfer(recipient, 3000000, unit), lease, Issue("UberToken3", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
65	65		}
66	66
67	67
68	68
69	69		@Callable(i)
70	70		func call () = {
71	71		let asset = Issue("NewAssettttt", "", 1, 1, true)
72	72		let assetId = calculateAssetId(asset)
73	73		let lease = Lease(recipient, 1, 0)
74	74		let id = calculateLeaseId(lease)
75	75		let a = isFirstlevel()
76	76		if ((a == a))
77	77		then [BinaryEntry("bin", base58''), BooleanEntry("bool", true), IntegerEntry("int", 1), StringEntry("str", ""), DeleteEntry("str"), ScriptTransfer(recipient, 1, unit), lease, LeaseCancel(id)]
78	78		else throw("Strict value is not equal to itself.")
79	79		}
80	80
81	81

github/deemru/w8io/873ac7e 
45.81 ms ◑