source/ringpm/packages/fifteenpuzzle/main.ring

   1 func main
   2         C_LINESIZE = 80
   3         ? copy("=",C_LINESIZE)
   4         ? "FifteenPuzzle Package"
   5         ? copy("=",C_LINESIZE)
   6         ? "FifteenPuzzle package for the Ring programming language"
   7         ? "See the folder : ring/applications/fifteenpuzzle"
   8         ? copy("=",C_LINESIZE)
   9         cDir = currentdir()
  10         chdir(exefolder()+"/../applications/fifteenpuzzle")
  11         system("ring CalmoSoftFifteenPuzzleGame.ring")
  12         chdir(cDir)