Simple RPG game

Ivana Lipnerova
19. 3. 2016

Why do not present some data with some graphs and slider and so on?

  • I have no data I wish to share
  • tweaking Shiny to do what it's not built to do seems interesting
  • give some fun project for peers to review (and for me to do!)
  • I'm fan of certain postapocalyptic RPG game series, so this is a kind of tribute

What is the app about

  • the app game is very simple
  • takes inspiration from the tributed games to (re)create the Temple of Trials
  • uses Shiny's functions to let user go through the trials (e.g. do actions):

    • radioButtons let user chose which path he wishes to go
    • conditionalPanel appear after their condition is fulfilled, only one condition per panel is possible
    • actionButtons are triggers for conditional panels

How to play

Game mechanics

  • fight system is based on roll of dices
  • number of spent ability points is number of dice rolls
  • opponents have one or two dice rolls
  • larger sum of rolls wins (equality is a victory for player)
opponent <- (sample(1:6, 1, replace = T)); you<- (sum((sample(1:6, 3, replace = T))))
        #in place of 3 there is input from user in the app
winLose <- as.character(opponent <= you)
df<-data.frame(opponent, you, winLose); colnames(df) <- c("Your opponent", "You", "Do you win?")
df
  Your opponent You Do you win?
1             1  11        TRUE