gistfile1.txt
· 989 B · Text
Raw
Playground
||:@include: lib/rpn.nv
|| :: play a guessing game from 1 to 100
| :: play a guessing game from $min to $max |
:: . pick a number from $min to $max
. begin game loop
| :: begin game loop |
:: . ask user for a number
. compare guess with target
. decide on next step
| :: pick a number from $min to $max |
:@rpn: ( random ) :@rpn data: 100
| :@rpn data: $guess |
:guess: $guess
| :: ask user for a number |
:@js:
const input = prompt("1-100", "");
f("target", input)
| :: compare guess with target :guess: $n? :target: $n |
:state: win
| :: compare guess with target :guess: $n? :target: $m |
:state: $state :target: $m
:@js:
if($n > $m) {
$state = "Too low!"
} else if($n < $m) {
$state = "Too high!"
}
| :: decide on next step :state: win |
:@js: alert("you win!");
| :: decide on next step :state: $state |
:@js: alert($state);
:: begin game loop
| :print: $message |
:@js: print($message);
| 1 | ||:@include: lib/rpn.nv |
| 2 | |
| 3 | || :: play a guessing game from 1 to 100 |
| 4 | |
| 5 | | :: play a guessing game from $min to $max | |
| 6 | :: . pick a number from $min to $max |
| 7 | . begin game loop |
| 8 | |
| 9 | | :: begin game loop | |
| 10 | :: . ask user for a number |
| 11 | . compare guess with target |
| 12 | . decide on next step |
| 13 | |
| 14 | | :: pick a number from $min to $max | |
| 15 | :@rpn: ( random ) :@rpn data: 100 |
| 16 | |
| 17 | | :@rpn data: $guess | |
| 18 | :guess: $guess |
| 19 | |
| 20 | | :: ask user for a number | |
| 21 | :@js: |
| 22 | const input = prompt("1-100", ""); |
| 23 | f("target", input) |
| 24 | |
| 25 | | :: compare guess with target :guess: $n? :target: $n | |
| 26 | :state: win |
| 27 | |
| 28 | | :: compare guess with target :guess: $n? :target: $m | |
| 29 | :state: $state :target: $m |
| 30 | :@js: |
| 31 | if($n > $m) { |
| 32 | $state = "Too low!" |
| 33 | } else if($n < $m) { |
| 34 | $state = "Too high!" |
| 35 | } |
| 36 | |
| 37 | | :: decide on next step :state: win | |
| 38 | :@js: alert("you win!"); |
| 39 | |
| 40 | | :: decide on next step :state: $state | |
| 41 | :@js: alert($state); |
| 42 | :: begin game loop |
| 43 | |
| 44 | | :print: $message | |
| 45 | :@js: print($message); |
| 46 |