En utilisant BIDE, tu peux consulter un programme en basic casio sur PC. Le mot de passe est "YSNP", et le code le suivant :
0 -> M
1 -> W
100 -> C
0 -> T
10000 -> D
Lbl 1
ClrText
" " -> Str 1
Str 1 + Str 1 + Str 1 -> Str 1
Locate 17, 1, "GOLD
Locate 14, 3, "WORKERS
Locate 1, 4, "Cost:
Fix 1
Locate 6, 4, C
Locate 17, 4, "Gold
Locate 16, 6, "TOWNS
Locate 1, 7, "Cost:
Norm 1
EngOn
Locate 6, 7, D
EngOff
Locate 17, 7, "Gold
Do
Do
GetKey -> G
LpWhile Not G
Fix 1
If G = 79 And M >= C :Then
M - C -> M
C * 1.2 -> C
W + 1 -> W
Locate 6, 4, C
Locate 1, 1, Str 1
IfEnd
If G = 69 And M >= D :Then
M - D -> M
D * 10 -> D
T + 1 -> T
Norm 1
EngOn
Locate 6, 7, D
EngOff
Locate 1, 6, T
Locate 1, 1, Str 1
IfEnd
M + W -> M
W + T -> W
Fix 1
Locate 1, 1, M
Norm 1
Locate 1, 3, W
If G = 59 :Then
File 2
{M, W, C, T, D -> List 1
File 1
IfEnd
If G = 49 :Then
File 2
List 1[1 -> M
List 1[2 -> W
List 1[3 -> C
List 1[4 -> T
List 1[5 -> D
File 1
Goto 1
IfEnd
If G = 39 :Then
File 2
{M, W, C, T, D -> List 2
File 1
IfEnd
If G = 29 :Then
File 2
List 2[1 -> M
List 2[2 -> W
List 2[3 -> C
List 2[4 -> T
List 2[5 -> D
File 1
Goto 1
IfEnd
Do
LpWhile GetKey
LpWhile 1 |