begin
  cls()
  userPage(false)
  get(nProb)
   switch nProb
    case 1
      pA=ref1:p1
      pB=ref1:p2
      pC=ref1:p3
    break
    case 2
      pA=ref2:p1
      pB=ref2:p2
      pC=ref2:p3
    break
    default
      popUpMsg("wrong dispatch")
    break
endSwitch
  putln("Hareketi baslatmak icin Start tusuna Basin")
  wait(diStart==true)
call pickNplace()
end