'This BMX file was edited with BLIde ( http://www.blide.org )
If KeyHit(KEY_ESCAPE) Then
	FlushKeys()
	MenuLevel = 10
End If
DrawText("Press ESC for back", width / 2 - 50, height - 30)

Local fileout:TStream = ReadFile("Saves\Profile.lgc")
If (ReadLine(fileout) = "Null")
	Include "Menu_new_company.bmx"
EndIf
CloseFile(fileout)




Local n
Local ButtonStep2 = 0

'Interface
If (KeyHit(KeyUp1) Or KeyHit(KeyUp2)) Then
	SelectedComButton = SelectedComButton - 1
End If
If (KeyHit(KeyDown1) Or KeyHit(KeyDown2)) Then
	SelectedComButton = SelectedComButton + 1
End If


'Fix
If (SelectedComButton > 2) Then
   SelectedComButton = 0
EndIf
If (SelectedComButton < 0) Then
   SelectedComButton = 2
EndIf

if (KeyHit(KeyEnter1) or KeyHit(KeyEnter2)) Then 
	  Select SelectedComButton
	  	Case 0
			MenuLevel = 20
		Case 1
		 	MenuLevel = 21
		Case 2
			MenuLevel = 22
	  End Select
EndIf





For n = 0 To 2
	SetColor(0, 170, 0)
	DrawText(ButtonText[n + 6], width / 2 - 30, height / 2 + ButtonStep2)
	SetColor(255, 255, 255)
	If (n = SelectedComButton) Then
		SetBlend(ALPHABLEND)
			SetAlpha(0.3)
  				 DrawImage(ButtonImg, width / 2 - 30 + 40, height / 2 + ButtonStep2)
			SetAlpha(1)
	End If
	ButtonStep2 = ButtonStep2 + 50
Next