[tormoz]

Эта функция принимает строку и разделитель, возвращает часть строки справа от разделителя. (Instr не использую намеренно из-за глюков с кириллицей)

Function ParsR$(linet$,r$)
        len_=Len(linet$)
      For i=1 To len_
        n$=Mid(linet$,i,1)
        If n$=r$
          zfile$=Right(linet$,len_-i)
          Return zfile$
        EndIf 
      Next 
End Function

Пример чтения конфиг файла :

Function Load_cfg(patch$)
  wf=ReadFile(patch$)

If wf<>0

While (Eof(wf) = 0)
    linet$=ReadLine(wf)
   
    If Left(linet$,6)="up_key"
        up_akey=ParsR$(linet$,"=")
   EndIf   
    If Left(linet$,6)="down_k"
        down_akey=ParsR$(linet$,"=")
   EndIf
    If Left(linet$,6)="jump_k"
       jump_akey=ParsR$(linet$,"=")
   EndIf
    If Left(linet$,6)="shot_k"
       shot_akey=ParsR$(linet$,"=")
   EndIf
    If Left(linet$,6)="attack"
        attack_akey=ParsR$(linet$,"=")
   EndIf
    If Left(linet$,6)="sit_ke"
       sit_akey=ParsR$(linet$,"=")
   EndIf
  If Left(linet$,6)="map_ke"
      map_akey=ParsR$(linet$,"=")
   EndIf
Wend
CloseFile wf
EndIf
End Function

Содержимое конфига такое (для этого примера):

up_key=205
down_key=203
jump_key=82
shot_key=200
attack_key=28
sit_key=208
map_key=50