position(20,10)
headline("Corporate Locations")
Selection("Corporate Headquarters",!hq.txt)
selection("European Headquarters",!euro.txt)
Selection("Business Development Group",!bdg.txt)
Status("Use [Up] or [Down] Arrows then press the [Enter] key or [ESC] to exit")