Skip to content

Instantly share code, notes, and snippets.

@merivale
Created January 20, 2021 14:49
Show Gist options
  • Save merivale/fc0b2ba90338a2b08e91a0c9720fa074 to your computer and use it in GitHub Desktop.
Save merivale/fc0b2ba90338a2b08e91a0c9720fa074 to your computer and use it in GitHub Desktop.
Plutus Playground Smart Contract
import qualified Data.Text as T
import Language.Plutus.Contract hiding (when)
import Language.PlutusTx.Prelude
import Playground.Contract
-- | A 'Contract' that logs a message.
hello :: Contract BlockchainActions T.Text ()
hello = logInfo @String "Hello, world"
endpoints :: Contract BlockchainActions T.Text ()
endpoints = hello
mkSchemaDefinitions ''BlockchainActions
$(mkKnownCurrencies [])
[0,[{"simulationWallets":[{"simulatorWalletWallet":{"getWallet":1},"simulatorWalletBalance":{"getValue":[[{"unCurrencySymbol":""},[[{"unTokenName":""},100]]]]}},{"simulatorWalletWallet":{"getWallet":2},"simulatorWalletBalance":{"getValue":[[{"unCurrencySymbol":""},[[{"unTokenName":""},100]]]]}}],"simulationName":"Hello, world","simulationId":1,"simulationActions":[{"blocks":1,"tag":"AddBlocks"}]}]]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment