Casio50 » fx-3x50P » Programs 程式集 » Games 遊戲 »
遊戲目的:在最少的嘗試內抓到CPU
| <COMP> |
|---|
| Fix0 : 9 Ran# – 5 : Rnd : Ans → X ◢ |
| 9 Ran# – 5 : Rnd : Ans → Y ◢ |
| 9 Ran# – 5 : Rnd : Ans → A ◢ |
| 9 Ran# – 5 : Rnd : Ans → B ◢ |
| Lbl 0 : ? → D : 1 M+ : |
| D ÷ 3 → D : Rnd : 3 ( Ans – D → C : C ≥ 0 => C = 0 → C : |
| X + C → X ◢ 0 → C : |
| D – √ 3 : Rnd : Y + Ans → Y ◢ |
| 2 ( Ran# – . 5 : Rnd : A + Ans → A ◢ |
| 2 ( Ran# – . 5 : Rnd : B + Ans → B ◢ |
| ( X = A ) ( Y = B ) = 0 => Goto 0 : Norm1 |
| 152 Bytes |
| 一般操作 | 例子 | |||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| 啟動程式 | 按 Prog 1 | |||||||||
| 顯示你的位置 | -3 EXE 2 EXE | |||||||||
| 顯示CPU位置 | 2 EXE 4 EXE | |||||||||
輸入移動方位, 如下圖:
|
[D?] 4 EXE | |||||||||
| 如你與CPU的位置相同會顯示「Norm 1」, 表示勝利 | ||||||||||
| A | CPU.X |
|---|---|
| B | CPU.Y |
| C | You.MoveX |
| D | PosID / 3 |
| X | You.X |
| Y | You.Y |
| M | TotalMoves |