
02.05.2010, 12:57
|
|
Banned
Регистрация: 12.02.2007
Сообщений: 19
Провел на форуме: 393694
Репутация:
11
|
|
на PureBasic
Код:
OpenFile(0,"akks.txt")
OpenFile(1,"logins.txt")
OpenFile(2,"pass.txt")
Repeat
str.s = ReadString(0)
WriteStringN(1, StringField(str, 1, ":"))
WriteStringN(2, StringField(str, 2, ":"))
Until Eof(0)
CloseFile(2)
CloseFile(1)
CloseFile(0)
Последний раз редактировалось mal4Ik; 02.05.2010 в 13:14..
|
|
|