[Помогите!] Нужна помощь прогеров на Дельфи.

[Улала]

Пишу ферму. Коннект и отправка ресов на кор проходят на ура. Делаю это через компонент idHTTP. А вот с продажей не выходит. Пробовал и через idHTTP, и через TCPClient. Спасибками закидаю.
ЗЫЖ Модеры, если опять не туда написал, просьба указать раздел, в который можно написать подобную просьбу.

[-=ShoN=-]

Цитата: Сообщение от Улала Пишу ферму. Коннект и отправка ресов на кор проходят на ура. Делаю это через компонент idHTTP. А вот с продажей не выходит. Пробовал и через idHTTP, и через TCPClient. Спасибками закидаю. ЗЫЖ Модеры, если опять не туда написал, просьба указать раздел, в который можно написать подобную просьбу.

http://zhyk.ru/forum/showthread.php?t=214339

[Улала]

Асистент, спасибо конечно за ссылочку, но вопрос тем не менее остается открытым. Скачал этот исходник, но толи автор так и не смог его дописать, толи еще чего. К тому же не понятно в какой версии он его писал - в 2010 или в ХЕ и до кучи у него по ходу очень много дополнительных обвесов для дельфи было установлено, а их версии тоже играют роль. Скачал все, что смог найти, прикрутил, но исходник все равно работает с ошибкой: не находит сида и id игрока, хотя они в получаемом коде присутствуют на все 100%. Поэтому вопрос: чтобы приконнектиться уже к конкретной карте отправляется строчка типа ('LOGIN|твой_ид|твой_сид|версия_клиента'#10#00'PNG '#10#00).

В Твой_ид должно быть сам номер (11223344) или uid=11223344 или UserID=11223344.
Тоже самое и с Твой_сид: сам сид (e3sf46fh4sdf76gj4g234j689dg34t5u) или sid=e3sf46fh4sdf76gj4g234j689dg34t5u или dosid=e3sf46fh4sdf76gj4g234j689dg34t5u.
И как узнать версию клиента, где ее смотреть и искать. И в каком виде должна записываться она?

[-=ShoN=-]

Цитата: Сообщение от Улала Асистент, спасибо конечно за ссылочку, но вопрос тем не менее остается открытым. Скачал этот исходник, но толи автор так и не смог его дописать, толи еще чего. К тому же не понятно в какой версии он его писал - в 2010 или в ХЕ и до кучи у него по ходу очень много дополнительных обвесов для дельфи было установлено, а их версии тоже играют роль. Скачал все, что смог найти, прикрутил, но исходник все равно работает с ошибкой: не находит сида и id игрока, хотя они в получаемом коде присутствуют на все 100%. Поэтому вопрос: чтобы приконнектиться уже к конкретной карте отправляется строчка типа ('LOGIN|твой_ид|твой_сид|версия_клиента'#10#00'PNG '#10#00). В Твой_ид должно быть сам номер (11223344) или uid=11223344 или UserID=11223344. Тоже самое и с Твой_сид: сам сид (e3sf46fh4sdf76gj4g234j689dg34t5u) или sid=e3sf46fh4sdf76gj4g234j689dg34t5u или dosid=e3sf46fh4sdf76gj4g234j689dg34t5u. И как узнать версию клиента, где ее смотреть и искать. И в каком виде должна записываться она?

в игровом окне она написана где-то=))хз, ниразу не пробывал))

[АзЕсмьЦарь]

Цитата: Сообщение от Улала Асистент, спасибо конечно за ссылочку, но вопрос тем не менее остается открытым. Скачал этот исходник, но толи автор так и не смог его дописать, толи еще чего. К тому же не понятно в какой версии он его писал - в 2010 или в ХЕ и до кучи у него по ходу очень много дополнительных обвесов для дельфи было установлено, а их версии тоже играют роль. Скачал все, что смог найти, прикрутил, но исходник все равно работает с ошибкой: не находит сида и id игрока, хотя они в получаемом коде присутствуют на все 100%. Поэтому вопрос: чтобы приконнектиться уже к конкретной карте отправляется строчка типа ('LOGIN|твой_ид|твой_сид|версия_клиента'#10#00'PNG '#10#00). В Твой_ид должно быть сам номер (11223344) или uid=11223344 или UserID=11223344. Тоже самое и с Твой_сид: сам сид (e3sf46fh4sdf76gj4g234j689dg34t5u) или sid=e3sf46fh4sdf76gj4g234j689dg34t5u или dosid=e3sf46fh4sdf76gj4g234j689dg34t5u. И как узнать версию клиента, где ее смотреть и искать. И в каком виде должна записываться она?

Чтобы войти на игровую карту, нужно отправить серверу следующую строчку:
LOGIN|677134665|6ffbb25badd3adc4e768c3ca3a1920b7|3 .1.5
где
- LOGIN служебное слово
- 677134665 - id игрока
- 6ffbb25badd3adc4e768c3ca3a1920b7 - СИД
- 3.1.5 - версия клиента

На делфи это будет выглядеть примерно так:
ClientSocket1.Socket.SendText('LOGIN|'+s5+'|'+s6+' |3.1.5'+#10+#0);

Версию клиента нужно искать в файле main.swf
Естественно, чтобы вытащить версию, нужно будет декомпилировать данный файл и только потом искать версию.
Для декомпиляции советую скачать триальную версию библиотеки
DelphiSWFSDK
Получение версии будет выглядеть примерно так:

procedure TForm1.Button1Click(Sender: TObject);

var

  Strm: TMemoryStream;
  str:TStringStream;
  strar:TStringList;
  swf:TSWFStreamReader;

begin
    Strm:=TMemoryStream.Create;
    idhttp1.get('http://ru1.darkorbit.bigpoint.com/spacemap/main.swf',Strm);
    swf:=TSWFStreamReader.Create(Strm);
    str:=TStringStream.Create;
    str.LoadFromStream(swf.BodyStream);
    str.SaveToFile('c:/stream.txt');
    //Memo1.Lines.LoadFromFile('c:/stream.txt');

end;

Получение версии клиента взято из исходника толи DBot толи MBot.
Ну а дальше сам думай.

[Wallace_Breen]

ClientSocket тебе в помощь

[*xalyava*]

Цитата: Сообщение от АзЕсмьЦарь Версию клиента нужно искать в файле main.swf

Зачем ?)
Если зайди в игровое окно и щелкнуть по нему правой кнопкой, в самой первой строке всплывающего окна, будет написано: Version ***

[Улала]

И опять в догонку.
Как коннектиться к карте я разобрался, все заработало. Вот теперь проблема продать ресы. Ни в какую не хочет. Отправляю команду следующего содержания:

ClientSocket1.Socket.SendText('T|1|10+#10#00);

но ничего не происходит. Что делаю не так и где копать. Подскажите плз.

ЗЫЖ Как перемещаться по координатам? Какие для этого команды?

[QwintO]

Цитата: Сообщение от Улала И опять в догонку. Как коннектиться к карте я разобрался, все заработало. Вот теперь проблема продать ресы. Ни в какую не хочет. Отправляю команду следующего содержания: ClientSocket1.Socket.SendText('T|1|10+#10#00); но ничего не происходит. Что делаю не так и где копать. Подскажите плз. ЗЫЖ Как перемещаться по координатам? Какие для этого команды?

ClientSocket1.Socket.SendText('T|1|10'+#10#00);
А разве ты еще одну кавычку не потерял?
И тебе делфя ничего по этому поводу не предупредила? Не верю!!!

[V.I.R.U.S.]

Если не можешь разобраться в таких элементарных вещах, нафига вообще браться за что то? Хочешь чтобы за тебя все здесь написали???

[Улала]

2QwintO Так тебя устроит?

ClientSocket1.Socket.SendText('T|1|10'+#10#00);

Суть от этого не меняется.

2V.I.R.U.S. А разве вы, уважаемый, сразу заговорили, ходить сразу же начали, читать и писать? Тоже наверное кто-то учил. И проги писать тоже. Никто же не говорил, что зачем берешься, если не умеешь? Так зачем и сейчас заниматься косноязычеством. Если нет желания подсказать, то зачем тратить свое время на таких бездарностей как я и тратить время этих самых бездарностей. А пост*****ся и поумничать я и сам могу. Ветка как называется? "Общение и обсуждение". Вот я и обсуждаю. С уважением.

[QwintO]

Цитата: Сообщение от Улала 2QwintO Так тебя устроит? ClientSocket1.Socket.SendText('T|1|10'+#10#00); Суть от этого не меняется.

Ну во первых... Одна строчка выдранная из контекста проги - ничего не говорит... То что ты зашел на карту - еще ничего не значит... На данном этапе ничего более сказать не в состоянии.

[R-A-Z-O-R]

Смени ник на 'Ололо', тогда мы тебе будем помогать

[V.I.R.U.S.]

Цитата: Сообщение от Улала 2QwintO Так тебя устроит? ClientSocket1.Socket.SendText('T|1|10'+#10#00); Суть от этого не меняется. 2V.I.R.U.S. А разве вы, уважаемый, сразу заговорили, ходить сразу же начали, читать и писать? Тоже наверное кто-то учил. И проги писать тоже. Никто же не говорил, что зачем берешься, если не умеешь? Так зачем и сейчас заниматься косноязычеством. Если нет желания подсказать, то зачем тратить свое время на таких бездарностей как я и тратить время этих самых бездарностей. А пост*****ся и поумничать я и сам могу. Ветка как называется? "Общение и обсуждение". Вот я и обсуждаю. С уважением.

Я сразу начал НА ЭТОМ форуме писать программы, а не клянчить помощи. Если так хочется, извините дуйте в магазин за книжками, на форумы по делфи. Да и там не любят все писать за человека.

[Mebius]

Цитата: Сообщение от Улала 2QwintO Так тебя устроит? ClientSocket1.Socket.SendText('T|1|10'+#10#00); Суть от этого не меняется. 2V.I.R.U.S. А разве вы, уважаемый, сразу заговорили, ходить сразу же начали, читать и писать? Тоже наверное кто-то учил. И проги писать тоже. Никто же не говорил, что зачем берешься, если не умеешь? Так зачем и сейчас заниматься косноязычеством. Если нет желания подсказать, то зачем тратить свое время на таких бездарностей как я и тратить время этих самых бездарностей. А пост*****ся и поумничать я и сам могу. Ветка как называется? "Общение и обсуждение". Вот я и обсуждаю. С уважением.

Извени конечно, но вирус прав, зачем лезть в дебри темного леса не имея знаний для этого. это просто идиотизм. вопросы аля "в каком виде должен быть логин на карту", "ай пакеты не отходят" и особенно меня убил момент с кавычкой.

Перед тем как что то писать, ферму, бота, и др программы. сначало нужно изучить изнутри то, для чего пишется программа. а не проснуться с утка, подпрыгнуть с кровати и сесть писать "не знаю что, не знаю как, не знаю для чего, но все равно я пишу"

Мальчик. тебе тут все написали за тебя, как коннектится написали, что для этого использовать из компонентов тоже написать, пакет коннекта дали, как получить версию клиента дали.

я тут еще ни одного твоего не увидел, а вход в акк и отправка ресурсов, задача для пятикласника! так что нечего распинаться тут про названия тем, обсуждение и пр. возьми у мамы 1.5к рублей, сходи в магазин и купи три книжки по делфи!