generate-question* ( question -- quot )

Vocabulary

quiz

Inputs

question

an object

Outputs

quot

an object

Definition

IN: quiz

GENERIC: generate-question* ( question -- quot )

Methods

USING: combinators quiz quotations ;

M: callable generate-question* ( -- quot ) call-effect ;


USING: kernel quiz random unicode.flags unicode.flags.images ;

M: country-code-from-flag generate-question*
    drop valid-flags random [ flag>unicode ] curry ;


USING: kernel quiz random unicode.flags unicode.flags.images ;

M: country-name-from-flag generate-question*
    drop valid-flags random [ flag>country ] curry ;


USING: kernel quiz random unicode.flags unicode.flags.images ;

M: flag-from-country-code generate-question*
    drop valid-flag-names random [ unicode>flag ] curry ;


USING: assocs countries kernel quiz random unicode.flags
unicode.flags.images ;

M: flag-from-country-name generate-question*
    drop valid-flag-names random alpha-2 ?at drop
    [ country>flag ] curry ;


USING: accessors kernel math quiz random sequences ;

M: math-multiplication generate-question*
    [ count>> random ] [ n>> ] bi [ random 2 + ] curry replicate
    [ product ] curry ;


USING: accessors kernel math quiz random ;

M: math-sq generate-question*
    random-choices>> random [ sq ] curry ;


USING: accessors kernel math math.functions quiz random ;

M: math-sqrt generate-question*
    random-choices>> random sq [ sqrt >integer ] curry ;


USING: accessors kernel quiz sequences ;

M: multiple-choice-question generate-question*
    [ n>> ] [ generator>> ] bi [ generate-question* ] curry
    replicate ;


USING: accessors quiz ;

M: question generate-question* generator>> generate-question* ;


USING: accessors combinators.smart continuations kernel quiz
random sequences splitting ;

M: stack-shuffler generate-question*
    n-shufflers>> [ stack-shufflers random ] [ ] replicate-as
    [ inputs first-n-letters ] keep
    [ with-datastack join-words ] 2curry ;


USING: assocs kernel quiz random ;

M: state-capital generate-question*
    drop state-capitals keys random [ state-capitals at ] curry
    ;