On this page:
4.1 Stone Kata (difficulty = 1)
4.2 Stone Kata (difficulty = 2)
4.3 Stone Kata (difficulty = 3)
4.4 Stone Kata (difficulty = 5)
4.5 Stone Kata (difficulty = 6)

4 Stone Katas

4.1 Stone Kata (difficulty = 1)

read
Code a game with collectible stones.
code
#lang survival-pokemon
 
(pokemon-game #:stone-list (list (basic-stone)))

4.2 Stone Kata (difficulty = 2)

Tip: The default value of basic-stone is 10.

read
Code a game with very valuable collectible stones.
code
#lang survival-pokemon
 
(define (my-stone) (basic-stone #:value 500))
 
(pokemon-game #:stone-list (list (my-stone)))

4.3 Stone Kata (difficulty = 3)

read
Code a game with many valuable leaf stones.
code
#lang survival-pokemon
 
(define (my-stone)
   (basic-stone
    #:sprite leafstone-sprite
    #:name "Leaf Stone"
    #:value 100
    #:amount-in-world 20))
 
(pokemon-game #:stone-list (list (my-stone)))

4.4 Stone Kata (difficulty = 5)

read
Code a game with a moon stone, and a single, extremely valuable shiny stone that only appears once.
code
#lang survival-pokemon
 
(define (my-stone)
   (basic-stone
    #:sprite moonstone-sprite
    #:name "Moon Stone"))
 
(define (my-special-stone)
   (basic-stone
    #:sprite shinystone-sprite
    #:name "Shiny Stone"
    #:value 1000
    #:amount-in-world 1
    #:respawn? #f))
 
(pokemon-game
  #:stone-list (list (my-stone) (my-special-stone)))

4.5 Stone Kata (difficulty = 6)

Tip: When using the (survival-game) function, you have to use a #:coin-list instead of a #:stone-list.

read
Code a game with 3 collectible stones: a basic stone; a rarer, more valuable thunder stone; and an extremely rare and valuable sun stone.
code
#lang survival-pokemon
 
(define (thunder-stone)
   (basic-coin
    #:sprite thunderstone-sprite
    #:name "Thunder Stone"
    #:value 500
    #:amount-in-world 5))
 
(define (sun-stone)
   (basic-coin
    #:sprite sunstone-sprite
    #:name "Sun Stone"
    #:value 1000
    #:amount-in-world 1
    #:respawn? #f))
 
(survival-game
  #:coin-list (list
   (basic-stone)
   (thunder-stone)
   (sun-stone)))