Ultima attività 5 days ago Unlisted

translated from wul

gistfile1.txt Raw Playground
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: $target |
18 :target: $target
19
20| :: ask user for a number |
21 :@js:
22 const input = prompt("Guess what number I'm thinking of between 1 and 100", "");
23 f("guess", input)
24
25| :: compare guess with target :target: $n? :guess: $n |
26 :state: win
27
28| :: compare guess with target :target: $n? :guess: $m |
29 :state: $state :guess: $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("OMG you totally got it! That's it!!");
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