
var wx;
var wy;
var wy_max;
var cx;
var cy;
wx = 10;
wy = 1;
wy_max = 20;
cx = 12;
cy = 20;
while(1){
key = inkey();
lc(cx, cy);
log(" ");
if((key == 28) * (cx > 11)){
cx = cx - 1;
}
if((key == 29) * (cx < 12)){
cx = cx + 1;
}
if(wy <= wy_max){
cls();
while(wy <= wy_max){
lc(wx, wy);
log("| |");
wy = wy + 1;
}
}
lc(cx, cy);
log("A");
sleep(20);
}