Показать сообщение отдельно

  #4  
Старый 02.05.2010, 12:57
mal4Ik
Banned
Регистрация: 12.02.2007
Сообщений: 19
Провел на форуме:
393694

Репутация: 11
Отправить сообщение для mal4Ik с помощью ICQ
По умолчанию

на 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..