tx · CJxBMuAL2KQRwrwrGw3W9AA6PpppM6jmtUv6GeUp1iwa

3N2iycpXC7Fomf1vYLmz9uUWwLR2ZvxRCyw:  -0.00700000 Waves

2023.03.22 19:51 [2501483] smart account 3N2iycpXC7Fomf1vYLmz9uUWwLR2ZvxRCyw > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CJxBMuAL2KQRwrwrGw3W9AA6PpppM6jmtUv6GeUp1iwa",
    "fee": 700000,
    "feeAssetId": null,
    "timestamp": 1679503939399,
    "version": 2,
    "chainId": 84,
    "sender": "3N2iycpXC7Fomf1vYLmz9uUWwLR2ZvxRCyw",
    "senderPublicKey": "3TJ91ZMX9cHrPAcqCiYodSdxYs8AiLNHyvRJNK1PDc6i",
    "proofs": [
        "iUbRjiCWof51AxQ8KSkxDWZLACsVzhizzFBAdEuzWQW8RdCm9pd2nKypmiVWLUfkkNJ6tiVb3cFXehT3Lfqv4Sk"
    ],
    "script": "base64:BgIcCAISABIDCgEIEgUKAwEBCBIDCgEBEgASAwoBCAUABkF1cnVlcwEgOYDtDd1mVUaSfSlX4MdFqsCgGC27Z5CEtJGKkGOZYFwBCW9ubHlPd25lcgEBaQMJAAACCAUEdGhpcwVieXRlcwgIBQFpBmNhbGxlcgVieXRlcwUEdW5pdAkAAgECKU9ubHkgZGFwcCBhY2NvdW50IGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24hARBnZXRBdXJ1ZXNQYXltZW50AQFpAwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECFFBheW1lbnQgbm90IGF0dGFjaGVkBAFwCQCRAwIIBQFpCHBheW1lbnRzAAAEByRtYXRjaDAIBQFwB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQHYXNzZXRJZAUHJG1hdGNoMAMJAAACBQdhc3NldElkBQZBdXJ1ZXMIBQFwBmFtb3VudAkAAgECIE9ubHkgYXVydWVzIGFjY2VwdGVkIGFzIHBheW1lbnQhCQACAQIgT25seSBhdXJ1ZXMgYWNjZXB0ZWQgYXMgcGF5bWVudCEBDGdldEFzc2V0RGF0YQEHYXNzZXRJZAMJAAACBQdhc3NldElkAAAJAJYKBAIFTWluZXICR1V0aWxpdHkgYnVpbGRpbmcgdGhhdCBoZWxwcyB5b3UgdG8gbWluZSBhdXJ1ZXMgYXQgY2VydGFpbiBibG92ayBoZWlnaHQuALDqAQIHX19taW5lcgMJAAACBQdhc3NldElkAAEJAJYKBAIFQ2Fub24CR1V0aWxpdHkgYnVpbGRpbmcgdGhhdCBoZWxwcyB5b3UgdG8gbWluZSBhdXJ1ZXMgYXQgY2VydGFpbiBibG92ayBoZWlnaHQuAKjDAQIGX2Nhbm9uAwkAAAIFB2Fzc2V0SWQAAgkAlgoEAgRYYm93AkdVdGlsaXR5IGJ1aWxkaW5nIHRoYXQgaGVscHMgeW91IHRvIG1pbmUgYXVydWVzIGF0IGNlcnRhaW4gYmxvdmsgaGVpZ2h0LgCYdQIFX3hib3cDCQAAAgUHYXNzZXRJZAADCQCWCgQCBVRlc2xhAkdVdGlsaXR5IGJ1aWxkaW5nIHRoYXQgaGVscHMgeW91IHRvIG1pbmUgYXVydWVzIGF0IGNlcnRhaW4gYmxvdmsgaGVpZ2h0LgCgnAECBl90ZXNsYQMJAAACBQdhc3NldElkAAQJAAIBAhdZb3UgY2FuJ3QgYnV5IHRvd25oYWxsIQMJAAACBQdhc3NldElkAAUJAJYKBAIGQXJjaGVyAkdVdGlsaXR5IGJ1aWxkaW5nIHRoYXQgaGVscHMgeW91IHRvIG1pbmUgYXVydWVzIGF0IGNlcnRhaW4gYmxvdmsgaGVpZ2h0LgCUIwIHX2FyY2hlcgMJAAACBQdhc3NldElkAAYJAJYKBAIFUm9ib3QCR1V0aWxpdHkgYnVpbGRpbmcgdGhhdCBoZWxwcyB5b3UgdG8gbWluZSBhdXJ1ZXMgYXQgY2VydGFpbiBibG92ayBoZWlnaHQuAPwqAgVfcm9ibwMJAAACBQdhc3NldElkAAcJAJYKBAIJVmFsa3lyaWVlAkdVdGlsaXR5IGJ1aWxkaW5nIHRoYXQgaGVscHMgeW91IHRvIG1pbmUgYXVydWVzIGF0IGNlcnRhaW4gYmxvdmsgaGVpZ2h0LgDwLgIKX3ZhbGt5cmllZQkAAgECD1Vua293biBhc3NldElkIQELZ2V0QXNzZXRLZXkBBG5hbWUDCQAAAgUEbmFtZQIFTWluZXICB19fbWluZXIDCQAAAgUEbmFtZQIFQ2Fub24CBl9jYW5vbgMJAAACBQRuYW1lAgRYYm93AgVfeGJvdwMJAAACBQRuYW1lAgVUZXNsYQIGX3Rlc2xhAwkAAAIFBG5hbWUCCFRvd25oYWxsCQACAQIhWW91IGNhbid0IGFkZCBvciByZW1vdmUgdG93bmhhbGwhAwkAAAIFBG5hbWUCBkFyY2hlcgIHX2FyY2hlcgMJAAACBQRuYW1lAgVSb2JvdAIFX3JvYm8DCQAAAgUEbmFtZQIJVmFsa3lyaWVlAgpfdmFsa3lyaWVlCQACAQINVW5rb3duIEFzc2V0IQYBaQEJc3RhcnRHYW1lAAQHYWRkcmVzcwkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBAxnYW1lU3RhdGVLZXkJAKwCAgUHYWRkcmVzcwIJX2lzU3RydGVkAwkAAAIJAJsIAgUEdGhpcwUMZ2FtZVN0YXRlS2V5BQR1bml0BAZ1c2VySWQEByRtYXRjaDAJAJoIAgUEdGhpcwIGdXNlcklkAwkAAQIFByRtYXRjaDACA0ludAQBeAUHJG1hdGNoMAkAZAIFAXgAAQAABAd0aElzc3VlCQDCCAUCCFRvd25oYWxsAhFIUSBvZiB5b3VyIGVtcGlyZQABAAAHBAl0aEFzc2V0SWQJANgEAQkAuAgBBQd0aElzc3VlCQCUCgIJAMwIAgkBDEJvb2xlYW5FbnRyeQIFDGdhbWVTdGF0ZUtleQYJAMwIAgkBB1JlaXNzdWUDBQZBdXJ1ZXMAoI0GBgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAoI0GBQZBdXJ1ZXMJAMwIAgUHdGhJc3N1ZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQkAuAgBBQd0aElzc3VlCQDMCAIJAQtTdHJpbmdFbnRyeQIFCXRoQXNzZXRJZAUHYWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgIGdXNlcklkBQZ1c2VySWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkApAMBBQZ1c2VySWQFB2FkZHJlc3MJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIJX3Rvd25oYWxsAAEJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIQX3Rvd25oYWxsX3BsYWNlZAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2FkZHJlc3MCBl9taW5lcgAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2FkZHJlc3MCDV9taW5lcl9wbGFjZWQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAgZfY2Fub24AAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAg1fY2Fub25fcGxhY2VkAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIFX3hib3cAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAgxfeGJvd19wbGFjZWQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAgZfdGVzbGEAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAg1fdGVzbGFfcGxhY2VkAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIHX2FyY2hlcgAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2FkZHJlc3MCBV9yb2JvAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIKX3ZhbGt5cmllZQAABQNuaWwFBHVuaXQJAAIBAhVHYW1lIGFscmVhZHkgc3RhcnRlZCEBaQEIc2F2ZUdhbWUBBGRhdGEEBXRoQ250CQBlAgkAkAMBCQC9CQIFBGRhdGECEGJ1aWxkaW5nSW5kZXgnOjQAAQQIbWluZXJDbnQJAGUCCQCQAwEJAL0JAgUEZGF0YQIQYnVpbGRpbmdJbmRleCc6MAABBAhjYW5vbkNudAkAZQIJAJADAQkAvQkCBQRkYXRhAhBidWlsZGluZ0luZGV4JzoxAAEEB3hib3dDbnQJAGUCCQCQAwEJAL0JAgUEZGF0YQIQYnVpbGRpbmdJbmRleCc6MgABBAh0ZXNsYUNudAkAZQIJAJADAQkAvQkCBQRkYXRhAhBidWlsZGluZ0luZGV4JzozAAEEB2FkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQFdGhBdmEJAGQCCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFB2FkZHJlc3MCCV90b3duaGFsbAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICBQdhZGRyZXNzAhBfdG93bmhhbGxfcGxhY2VkBAhtaW5lckF2YQkAZAIJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUHYWRkcmVzcwIGX21pbmVyCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFB2FkZHJlc3MCDV9taW5lcl9wbGFjZWQECGNhbm9uQXZhCQBkAgkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICBQdhZGRyZXNzAgZfY2Fub24JARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUHYWRkcmVzcwINX2Nhbm9uX3BsYWNlZAQHeGJvd0F2YQkAZAIJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUHYWRkcmVzcwIFX3hib3cJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUHYWRkcmVzcwIMX3hib3dfcGxhY2VkBAh0ZXNsYUF2YQkAZAIJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUHYWRkcmVzcwIGX3Rlc2xhCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFB2FkZHJlc3MCDV90ZXNsYV9wbGFjZWQDAwMDAwkAZwIFBXRoQXZhBQV0aENudAkAZwIFCG1pbmVyQXZhBQhtaW5lckNudAcJAGcCBQhjYW5vbkF2YQUIY2Fub25DbnQHCQBnAgUHeGJvd0F2YQUHeGJvd0NudAcJAGcCBQh0ZXNsYUF2YQUIdGVzbGFDbnQHCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQdhZGRyZXNzAgVfZGF0YQUEZGF0YQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAglfdG93bmhhbGwJAGUCBQV0aEF2YQUFdGhDbnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIQX3Rvd25oYWxsX3BsYWNlZAUFdGhDbnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIGX21pbmVyCQBlAgUIbWluZXJBdmEFCG1pbmVyQ250CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2FkZHJlc3MCDV9taW5lcl9wbGFjZWQFCG1pbmVyQ250CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2FkZHJlc3MCBl9jYW5vbgkAZQIFCGNhbm9uQXZhBQhjYW5vbkNudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAg1fY2Fub25fcGxhY2VkBQhjYW5vbkNudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAgVfeGJvdwkAZQIFB3hib3dBdmEFB3hib3dDbnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUHYWRkcmVzcwIMX3hib3dfcGxhY2VkBQd4Ym93Q250CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2FkZHJlc3MCBl90ZXNsYQkAZQIFCHRlc2xhQXZhBQh0ZXNsYUNudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAg1fdGVzbGFfcGxhY2VkBQh0ZXNsYUNudAUDbmlsBQR1bml0CQACAQIkUGxhY2VkIG1vcmUgYnVpbGRpbmcgdGhlbiB5b3Ugb3duZWQhAWkBCXJld2FyZFdhcgMIYnVpbGRpbmcGdHJvb3BzCG9wcG9uZW50CQCUCgIJAMwIAgkBB1JlaXNzdWUDBQZBdXJ1ZXMJAGQCCQBoAgUIYnVpbGRpbmcAiCcJAGgCBQZ0cm9vcHMA0A8GCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgkAaAIFCGJ1aWxkaW5nAIgnBQZBdXJ1ZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBCQDZBAEFCG9wcG9uZW50CQBoAgUGdHJvb3BzANAPBQZBdXJ1ZXMFA25pbAUEdW5pdAFpAQNidXkBB2Fzc2V0SWQEB2FkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQMYXVydWVzQW1vdW50CQEQZ2V0QXVydWVzUGF5bWVudAEFAWkECyR0MDcyMDg3MjY3CQEMZ2V0QXNzZXREYXRhAQUHYXNzZXRJZAQEbmFtZQgFCyR0MDcyMDg3MjY3Al8xBAtkZXNjcmlwdGlvbggFCyR0MDcyMDg3MjY3Al8yBAVwcmljZQgFCyR0MDcyMDg3MjY3Al8zBANrZXkIBQskdDA3MjA4NzI2NwJfNAMJAGcCBQxhdXJ1ZXNBbW91bnQFBXByaWNlBApjdXJyZW50Q250CQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFB2FkZHJlc3MFA2tleQQFaXNzdWUJAMIIBQUEbmFtZQULZGVzY3JpcHRpb24AAQAABwQNaXNzdWVkQXNzZXRJZAkA2AQBCQC4CAEFBWlzc3VlCQCUCgIJAMwIAgUFaXNzdWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEJALgIAQUFaXNzdWUJAMwIAgkBBEJ1cm4CBQZBdXJ1ZXMFDGF1cnVlc0Ftb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzBQNrZXkJAGQCBQpjdXJyZW50Q250AAEJAMwIAgkBC1N0cmluZ0VudHJ5AgUNaXNzdWVkQXNzZXRJZAUHYWRkcmVzcwUDbmlsBQR1bml0CQACAQkArAICAhpOb3QgZW5vdWdoIHBheW1lbnQgdG8gYnV5IAUEbmFtZQFpAQhhZGRBc3NldAADCQAAAgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIdTm8gTkZUIGF0dGFjaGVkIHRvIHRoaXMgY2FsbCEEA25mdAkAkQMCCAUBaQhwYXltZW50cwAABAckbWF0Y2gwCAUDbmZ0B2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQHYXNzZXRJZAUHJG1hdGNoMAQHJG1hdGNoMQkA7AcBBQdhc3NldElkAwkAAQIFByRtYXRjaDECBUFzc2V0BAVhc3NldAUHJG1hdGNoMQMJAAACCAUFYXNzZXQGaXNzdWVyBQR0aGlzAwkAAAIJAJ0IAgUEdGhpcwkA2AQBBQdhc3NldElkBQR1bml0BAdhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA2tleQkBC2dldEFzc2V0S2V5AQgFBWFzc2V0BG5hbWUECGFzc2V0Q250CQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFB2FkZHJlc3MFA2tleQkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQgIBQFpBmNhbGxlcgVieXRlcwABBQdhc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJANgEAQUHYXNzZXRJZAUHYWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzBQNrZXkJAGQCBQhhc3NldENudAABBQNuaWwFBHVuaXQJAAIBAhxBc3NldCBhbHJlYWR5IGFkZGVkIHRvIGdhbWUhCQACAQIPV3JvbmcgTkZUIHNlbnQhCQACAQIQQ2FuJ3QgZmluZCBhc3NldAkAAgECG05vdCBhYmxlIHRvIGZpbmQgYXNzZXQgaWQhIQFpAQtyZW1vdmVBc3NldAEHYXNzZXRJZAQFb3duZXIJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFB2Fzc2V0SWQDCQAAAgkA2QQBBQVvd25lcggIBQFpBmNhbGxlcgVieXRlcwQHJG1hdGNoMAkA7AcBCQDZBAEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIFQXNzZXQEBWFzc2V0BQckbWF0Y2gwBANrZXkJAQtnZXRBc3NldEtleQEIBQVhc3NldARuYW1lBAdhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMECGFzc2V0Q250CQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFB2FkZHJlc3MFA2tleQMJAGYCBQhhc3NldENudAAACQCUCgIJAMwIAgkBC0RlbGV0ZUVudHJ5AQUHYXNzZXRJZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzBQNrZXkJAGUCBQhhc3NldENudAABBQNuaWwFBHVuaXQJAAIBCQCsAgIJAKwCAgIEQWxsIAgFBWFzc2V0BG5hbWUCFSBhcmUgbG9jayBpbnNpZGUgZ2FtZQkAAgECEENhbid0IGZpbmQgYXNzZXQJAAIBAiBZb3UgYXJlIG5vdCBvd25lciBvZiB0aGlzIGFzc2V0IQD2fJAa",
    "height": 2501483,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: F8RX5Zpt8cunT3oTunQW2BRu4FP5HzAYaNHdYHfa1MU4
Next: 2gUwao5dwrzJgAU8UGJ53p7oJGDRo3W5QUkrbRbpPW2c

Diff: 
Old
New
Differences
79
79
 
                }
80
80
 
            let o = Issue("Townhall", "HQ of your empire", 1, 0, false)
81
81
 
            let p = toBase58String(calculateAssetId(o))
82
-
            $Tuple2([BooleanEntry(l, true), Reissue(a, 100000, true), ScriptTransfer(c.caller, 100000, a), o, StringEntry(p, k), IntegerEntry("userId", m), StringEntry(toString(m), k), IntegerEntry((k + "_townhall"), 1), IntegerEntry((k + "_townhall_placed"), 0), IntegerEntry((k + "_miner"), 0), IntegerEntry((k + "_miner_placed"), 0), IntegerEntry((k + "_canon"), 0), IntegerEntry((k + "_canon_placed"), 0), IntegerEntry((k + "_xbow"), 0), IntegerEntry((k + "_xbow_placed"), 0), IntegerEntry((k + "_tesla"), 0), IntegerEntry((k + "_tesla_placed"), 0), IntegerEntry((k + "_archer"), 0), IntegerEntry((k + "_robo"), 0), IntegerEntry((k + "_valkyriee"), 0)], unit)
82
+
            $Tuple2([BooleanEntry(l, true), Reissue(a, 100000, true), ScriptTransfer(c.caller, 100000, a), o, ScriptTransfer(c.caller, 1, calculateAssetId(o)), StringEntry(p, k), IntegerEntry("userId", m), StringEntry(toString(m), k), IntegerEntry((k + "_townhall"), 1), IntegerEntry((k + "_townhall_placed"), 0), IntegerEntry((k + "_miner"), 0), IntegerEntry((k + "_miner_placed"), 0), IntegerEntry((k + "_canon"), 0), IntegerEntry((k + "_canon_placed"), 0), IntegerEntry((k + "_xbow"), 0), IntegerEntry((k + "_xbow_placed"), 0), IntegerEntry((k + "_tesla"), 0), IntegerEntry((k + "_tesla_placed"), 0), IntegerEntry((k + "_archer"), 0), IntegerEntry((k + "_robo"), 0), IntegerEntry((k + "_valkyriee"), 0)], unit)
83
83
 
            }
84
84
 
        else throw("Game already started!")
85
85
 
    }
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = base58'4sUGAwEDLVm6Z3sNbLapWXtEtMkhRU8fypam9dLT4UjM'
5
5
 
6
6
 
func b (c) = if ((this.bytes == c.caller.bytes))
7
7
 
    then unit
8
8
 
    else throw("Only dapp account can call this function!")
9
9
 
10
10
 
11
11
 
func d (c) = if ((size(c.payments) == 0))
12
12
 
    then throw("Payment not attached")
13
13
 
    else {
14
14
 
        let e = c.payments[0]
15
15
 
        let f = e.assetId
16
16
 
        if ($isInstanceOf(f, "ByteVector"))
17
17
 
            then {
18
18
 
                let g = f
19
19
 
                if ((g == a))
20
20
 
                    then e.amount
21
21
 
                    else throw("Only aurues accepted as payment!")
22
22
 
                }
23
23
 
            else throw("Only aurues accepted as payment!")
24
24
 
        }
25
25
 
26
26
 
27
27
 
func h (g) = if ((g == 0))
28
28
 
    then $Tuple4("Miner", "Utility building that helps you to mine aurues at certain blovk height.", 30000, "__miner")
29
29
 
    else if ((g == 1))
30
30
 
        then $Tuple4("Canon", "Utility building that helps you to mine aurues at certain blovk height.", 25000, "_canon")
31
31
 
        else if ((g == 2))
32
32
 
            then $Tuple4("Xbow", "Utility building that helps you to mine aurues at certain blovk height.", 15000, "_xbow")
33
33
 
            else if ((g == 3))
34
34
 
                then $Tuple4("Tesla", "Utility building that helps you to mine aurues at certain blovk height.", 20000, "_tesla")
35
35
 
                else if ((g == 4))
36
36
 
                    then throw("You can't buy townhall!")
37
37
 
                    else if ((g == 5))
38
38
 
                        then $Tuple4("Archer", "Utility building that helps you to mine aurues at certain blovk height.", 4500, "_archer")
39
39
 
                        else if ((g == 6))
40
40
 
                            then $Tuple4("Robot", "Utility building that helps you to mine aurues at certain blovk height.", 5500, "_robo")
41
41
 
                            else if ((g == 7))
42
42
 
                                then $Tuple4("Valkyriee", "Utility building that helps you to mine aurues at certain blovk height.", 6000, "_valkyriee")
43
43
 
                                else throw("Unkown assetId!")
44
44
 
45
45
 
46
46
 
func i (j) = if ((j == "Miner"))
47
47
 
    then "__miner"
48
48
 
    else if ((j == "Canon"))
49
49
 
        then "_canon"
50
50
 
        else if ((j == "Xbow"))
51
51
 
            then "_xbow"
52
52
 
            else if ((j == "Tesla"))
53
53
 
                then "_tesla"
54
54
 
                else if ((j == "Townhall"))
55
55
 
                    then throw("You can't add or remove townhall!")
56
56
 
                    else if ((j == "Archer"))
57
57
 
                        then "_archer"
58
58
 
                        else if ((j == "Robot"))
59
59
 
                            then "_robo"
60
60
 
                            else if ((j == "Valkyriee"))
61
61
 
                                then "_valkyriee"
62
62
 
                                else throw("Unkown Asset!")
63
63
 
64
64
 
65
65
 
@Callable(c)
66
66
 
func startGame () = {
67
67
 
    let k = toBase58String(c.caller.bytes)
68
68
 
    let l = (k + "_isStrted")
69
69
 
    if ((getBoolean(this, l) == unit))
70
70
 
        then {
71
71
 
            let m = {
72
72
 
                let f = getInteger(this, "userId")
73
73
 
                if ($isInstanceOf(f, "Int"))
74
74
 
                    then {
75
75
 
                        let n = f
76
76
 
                        (n + 1)
77
77
 
                        }
78
78
 
                    else 0
79
79
 
                }
80
80
 
            let o = Issue("Townhall", "HQ of your empire", 1, 0, false)
81
81
 
            let p = toBase58String(calculateAssetId(o))
82
-
            $Tuple2([BooleanEntry(l, true), Reissue(a, 100000, true), ScriptTransfer(c.caller, 100000, a), o, StringEntry(p, k), IntegerEntry("userId", m), StringEntry(toString(m), k), IntegerEntry((k + "_townhall"), 1), IntegerEntry((k + "_townhall_placed"), 0), IntegerEntry((k + "_miner"), 0), IntegerEntry((k + "_miner_placed"), 0), IntegerEntry((k + "_canon"), 0), IntegerEntry((k + "_canon_placed"), 0), IntegerEntry((k + "_xbow"), 0), IntegerEntry((k + "_xbow_placed"), 0), IntegerEntry((k + "_tesla"), 0), IntegerEntry((k + "_tesla_placed"), 0), IntegerEntry((k + "_archer"), 0), IntegerEntry((k + "_robo"), 0), IntegerEntry((k + "_valkyriee"), 0)], unit)
82
+
            $Tuple2([BooleanEntry(l, true), Reissue(a, 100000, true), ScriptTransfer(c.caller, 100000, a), o, ScriptTransfer(c.caller, 1, calculateAssetId(o)), StringEntry(p, k), IntegerEntry("userId", m), StringEntry(toString(m), k), IntegerEntry((k + "_townhall"), 1), IntegerEntry((k + "_townhall_placed"), 0), IntegerEntry((k + "_miner"), 0), IntegerEntry((k + "_miner_placed"), 0), IntegerEntry((k + "_canon"), 0), IntegerEntry((k + "_canon_placed"), 0), IntegerEntry((k + "_xbow"), 0), IntegerEntry((k + "_xbow_placed"), 0), IntegerEntry((k + "_tesla"), 0), IntegerEntry((k + "_tesla_placed"), 0), IntegerEntry((k + "_archer"), 0), IntegerEntry((k + "_robo"), 0), IntegerEntry((k + "_valkyriee"), 0)], unit)
83
83
 
            }
84
84
 
        else throw("Game already started!")
85
85
 
    }
86
86
 
87
87
 
88
88
 
89
89
 
@Callable(c)
90
90
 
func saveGame (q) = {
91
91
 
    let r = (size(split_51C(q, "buildingIndex':4")) - 1)
92
92
 
    let s = (size(split_51C(q, "buildingIndex':0")) - 1)
93
93
 
    let t = (size(split_51C(q, "buildingIndex':1")) - 1)
94
94
 
    let u = (size(split_51C(q, "buildingIndex':2")) - 1)
95
95
 
    let v = (size(split_51C(q, "buildingIndex':3")) - 1)
96
96
 
    let k = toBase58String(c.caller.bytes)
97
97
 
    let w = (getIntegerValue(this, (k + "_townhall")) + getIntegerValue(this, (k + "_townhall_placed")))
98
98
 
    let x = (getIntegerValue(this, (k + "_miner")) + getIntegerValue(this, (k + "_miner_placed")))
99
99
 
    let y = (getIntegerValue(this, (k + "_canon")) + getIntegerValue(this, (k + "_canon_placed")))
100
100
 
    let z = (getIntegerValue(this, (k + "_xbow")) + getIntegerValue(this, (k + "_xbow_placed")))
101
101
 
    let A = (getIntegerValue(this, (k + "_tesla")) + getIntegerValue(this, (k + "_tesla_placed")))
102
102
 
    if (if (if (if (if ((w >= r))
103
103
 
        then (x >= s)
104
104
 
        else false)
105
105
 
        then (y >= t)
106
106
 
        else false)
107
107
 
        then (z >= u)
108
108
 
        else false)
109
109
 
        then (A >= v)
110
110
 
        else false)
111
111
 
        then $Tuple2([StringEntry((k + "_data"), q), IntegerEntry((k + "_townhall"), (w - r)), IntegerEntry((k + "_townhall_placed"), r), IntegerEntry((k + "_miner"), (x - s)), IntegerEntry((k + "_miner_placed"), s), IntegerEntry((k + "_canon"), (y - t)), IntegerEntry((k + "_canon_placed"), t), IntegerEntry((k + "_xbow"), (z - u)), IntegerEntry((k + "_xbow_placed"), u), IntegerEntry((k + "_tesla"), (A - v)), IntegerEntry((k + "_tesla_placed"), v)], unit)
112
112
 
        else throw("Placed more building then you owned!")
113
113
 
    }
114
114
 
115
115
 
116
116
 
117
117
 
@Callable(c)
118
118
 
func rewardWar (B,C,D) = $Tuple2([Reissue(a, ((B * 5000) + (C * 2000)), true), ScriptTransfer(c.caller, (B * 5000), a), ScriptTransfer(Address(fromBase58String(D)), (C * 2000), a)], unit)
119
119
 
120
120
 
121
121
 
122
122
 
@Callable(c)
123
123
 
func buy (g) = {
124
124
 
    let k = toBase58String(c.caller.bytes)
125
125
 
    let E = d(c)
126
126
 
    let F = h(g)
127
127
 
    let j = F._1
128
128
 
    let G = F._2
129
129
 
    let H = F._3
130
130
 
    let I = F._4
131
131
 
    if ((E >= H))
132
132
 
        then {
133
133
 
            let J = getIntegerValue(this, (k + I))
134
134
 
            let K = Issue(j, G, 1, 0, false)
135
135
 
            let L = toBase58String(calculateAssetId(K))
136
136
 
            $Tuple2([K, ScriptTransfer(c.caller, 1, calculateAssetId(K)), Burn(a, E), IntegerEntry((k + I), (J + 1)), StringEntry(L, k)], unit)
137
137
 
            }
138
138
 
        else throw(("Not enough payment to buy " + j))
139
139
 
    }
140
140
 
141
141
 
142
142
 
143
143
 
@Callable(c)
144
144
 
func addAsset () = if ((size(c.payments) == 0))
145
145
 
    then throw("No NFT attached to this call!")
146
146
 
    else {
147
147
 
        let M = c.payments[0]
148
148
 
        let f = M.assetId
149
149
 
        if ($isInstanceOf(f, "ByteVector"))
150
150
 
            then {
151
151
 
                let g = f
152
152
 
                let N = assetInfo(g)
153
153
 
                if ($isInstanceOf(N, "Asset"))
154
154
 
                    then {
155
155
 
                        let O = N
156
156
 
                        if ((O.issuer == this))
157
157
 
                            then if ((getString(this, toBase58String(g)) == unit))
158
158
 
                                then {
159
159
 
                                    let k = toBase58String(c.caller.bytes)
160
160
 
                                    let I = i(O.name)
161
161
 
                                    let P = getIntegerValue(this, (k + I))
162
162
 
                                    $Tuple2([ScriptTransfer(Address(c.caller.bytes), 1, g), StringEntry(toBase58String(g), k), IntegerEntry((k + I), (P + 1))], unit)
163
163
 
                                    }
164
164
 
                                else throw("Asset already added to game!")
165
165
 
                            else throw("Wrong NFT sent!")
166
166
 
                        }
167
167
 
                    else throw("Can't find asset")
168
168
 
                }
169
169
 
            else throw("Not able to find asset id!!")
170
170
 
        }
171
171
 
172
172
 
173
173
 
174
174
 
@Callable(c)
175
175
 
func removeAsset (g) = {
176
176
 
    let Q = getStringValue(this, g)
177
177
 
    if ((fromBase58String(Q) == c.caller.bytes))
178
178
 
        then {
179
179
 
            let f = assetInfo(fromBase58String(g))
180
180
 
            if ($isInstanceOf(f, "Asset"))
181
181
 
                then {
182
182
 
                    let O = f
183
183
 
                    let I = i(O.name)
184
184
 
                    let k = toBase58String(c.caller.bytes)
185
185
 
                    let P = getIntegerValue(this, (k + I))
186
186
 
                    if ((P > 0))
187
187
 
                        then $Tuple2([DeleteEntry(g), IntegerEntry((k + I), (P - 1))], unit)
188
188
 
                        else throw((("All " + O.name) + " are lock inside game"))
189
189
 
                    }
190
190
 
                else throw("Can't find asset")
191
191
 
            }
192
192
 
        else throw("You are not owner of this asset!")
193
193
 
    }
194
194
 
195
195
 

github/deemru/w8io/026f985 
42.12 ms ◑