[RegIon]

я так гружу:

Function loadsettings(puth$)


If FileType(puth$)=1
.load
  set=OpenFile(puth$)
  graphsize=ReadLine(set)
  colorit=ReadLine(set)
  volummus=ReadLine(set) 
  volumsou=ReadLine(set)
  ;key
  move_up=ReadLine(set)
  move_down=ReadLine(set)
  move_left=ReadLine(set)
   move_right=ReadLine(set)
   move_jump=ReadLine(set)
   move_sest=ReadLine(set)
   key_fun=ReadLine(set)
   key_bar_op=ReadLine(set)
   key_bar_left=ReadLine(set)
   key_bar_right=ReadLine(set)
CloseFile(set)
Else
  in=WriteFile(puth$)
  WriteLine(in,0)
  WriteLine(in,16)
  WriteLine(in,80)
  WriteLine(in,50)
  WriteLine(in,200)
  WriteLine(in,208)
  WriteLine(in,203)
  WriteLine(in,205)
  WriteLine(in,57)
  WriteLine(in,23)
  WriteLine(in,0)
  WriteLine(in,0)
  WriteLine(in,0)
  WriteLine(in,0)
CloseFile(in)
Goto load
EndIf
End Function