ΑΡΧΗ
	ΔΙΑΒΑΣΕ extras, currentTime
	exist = false
	
	ΑΝ (extras <> null) ΤΟΤΕ
		ΔΙΑΒΑΣΕ κατάσταση
	ΤΕΛΟΣ_ΑΝ
	
	ΑΝ (κατάσταση == "gas_station.xml") ΤΟΤΕ
		διαχωρισμός = "gas station"
		StationActivityTitle = "Gas Stations"
		StationActivityIcon = gasStationIcon
		StationActivityBackgroundColor = orange
		nearButtonName = "Nearest Gas Station"
	ΑΛΛΙΩΣ ΑΝ (κατάσταση == "supermarket.xml") ΤΟΤΕ
		διαχωρισμός = "supermarket"
		StationActivityTitle = "Supermarkets"
		StationActivityIcon = supermarketIcon
		StationActivityBackgroundColor = green
		nearButtonName = "Nearest Supermarket"
	ΤΕΛΟΣ_ΑΝ
	
	ΔΙΑΒΑΣΕ αρχειο(κατάσταση)
	ΑΝ (αρχειο(κατάσταση) <> null) ΤΟΤΕ
		exist = true
		ΔΙΑΒΑΣΕ αρχειο(κατάσταση)Ι
		ΓΙΑ k ΑΠΟ 0 ΜΕΧΡΙ αρχειο(κατάσταση)Ι ΜΕ ΒΗΜΑ 1
			ΕΜΦΑΝΙΣΕ αρχειο(κατάσταση)[k]
		ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
	ΑΛΛΙΩΣ
		exist = false
		ΕΜΦΑΝΙΣΕ "Press refresh button to see the list."
	ΤΕΛΟΣ_ΑΝ
	
	ΑΝ (refreshButton == pressed) ΤΟΤΕ
		Eπικοινωνία με Server
		ΔΙΑΒΑΣΕ αρχειο(κατάσταση)
		exist = true
	ΤΕΛΟΣ_ΑΝ
	
	ΑΝ (row == pressed) ΤΟΤΕ
		ΔΙΑΒΑΣΕ latitudeRowPressed, longitudeRowPressed, titleRowPressed
		extras = list + "" + κατάσταση + "" + latitudeRowPressed + "" + longitudeRowPressed + "" + titleRowPressed
		ΑΠΟΘΗΚΕΥΣΕ extras
		Ανακατεύθυνση του χρήστη στη κλάση MapActivity
	ΤΕΛΟΣ_ΑΝ
	
	ΑΝ (nearButton == pressed) ΤΟΤΕ
		ΑΝ (exist == true) ΤΟΤΕ
			ΔΙΑΒΑΣΕ statusOfGPS
			ΑΝ (statusOfGPS == true) ΤΟΤΕ
				ΑΝ (διαχωρισμός == "supermarket") ΤΟΤΕ
					ΑΝ ((currentTime >= 800) && (currentTime < 2100)) ΤΟΤΕ
						ΑΝ ((currentTime >= 2030) && (currentTime < 2100)) ΤΟΤΕ
							ΕΜΦΑΝΙΣΕ "Supermarkets are closing at 21:00 and you may not have enough time to complete your shopping!"
							ΑΝ (okButton == pressed) ΤΟΤΕ
								extras = nearest + "" + κατάσταση
								ΑΠΟΘΗΚΕΥΣΕ extras
								Ανακατεύθυνση του χρήστη στη κλάση MapActivity
							ΤΕΛΟΣ_ΑΝ
						ΑΛΛΙΩΣ
							extras = nearest + "" + κατάσταση
							ΑΠΟΘΗΚΕΥΣΕ extras
							Ανακατεύθυνση του χρήστη στη κλάση MapActivity
						ΤΕΛΟΣ_ΑΝ
					ΑΛΛΙΩΣ
						ΕΜΦΑΝΙΣΕ "There are no supermarkets open at this hour."
					ΤΕΛΟΣ_ΑΝ
				ΑΛΛΙΩΣ ΑΝ (διαχωρισμός == "gas station") ΤΟΤΕ
					ΑΝ ((currentTime >= 600) && (currentTime < 2230)) ΤΟΤΕ
						extras = nearest + "" + κατάσταση
						ΑΠΟΘΗΚΕΥΣΕ extras
						Ανακατεύθυνση του χρήστη στη κλάση MapActivity
					ΑΛΛΙΩΣ
						ΕΜΦΑΝΙΣΕ "Some gas stations are closed at this hour. The nearest open will be found."
						ΑΝ (okButton == pressed) ΤΟΤΕ
							extras = nearest + "" + κατάσταση
							ΑΠΟΘΗΚΕΥΣΕ extras
							Ανακατεύθυνση του χρήστη στη κλάση MapActivity
						ΤΕΛΟΣ_ΑΝ
					ΤΕΛΟΣ_ΑΝ
				ΤΕΛΟΣ_ΑΝ
			ΑΛΛΙΩΣ
				ΕΜΦΑΝΙΣΕ "GPS is disabled!"
			ΤΕΛΟΣ_ΑΝ
		ΑΛΛΙΩΣ
			ΕΜΦΑΝΙΣΕ "Refresh the list to find the closest " + διαχωρισμός
		ΤΕΛΟΣ_ΑΝ
	ΤΕΛΟΣ_ΑΝ	
ΤΕΛΟΣ