Как можно сделать дозвон на определенный номер програмно на ассемблере , или где взяь пример..... документации полно ...но там расплывчито и не оч. понятно как реально это сделать...Заранее Пасиб !

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

C WASM:
[mini]TERMINAL http://wasm.ru/src/5/miniterminal.zip - небольшая и удобная программа для общения посредствам модемов. Демонстрирует работу с COM портом.

-----
Сколько ни наталкивали на мысль – все равно сумел увернуться

| Сообщение посчитали полезным:

Этоя уже нашел ....разбираю ...может есть еще что ?

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

Это пример на Дельфях. Думаю принцип будет понятен.
var
hCommFile : THandle;

procedure TForm1.Button1Click(Sender: TObject);
var
PhoneNumber : string;
CommPort : string;
NumberWritten : LongInt;
begin
PhoneNumber := 'ATDT 1-555-555-1212' + #13 + #10; //Типа команда дозвона отправляемая на модем
CommPort := 'COM2'; //Порт модема
{Open the comm port}
hCommFile := CreateFile(PChar(CommPort),
GENERIC_WRITE,
0,
nil,
OPEN_EXISTING,
FILE_ATTRIBUTE_NORMAL,
0);
if hCommFile=INVALID_HANDLE_VALUE then
begin
ShowMessage('Unable to open '+ CommPort);
exit;
end;

NumberWritten:=0;
if WriteFile(hCommFile,
PChar(PhoneNumber)^,
Length(PhoneNumber),
NumberWritten,
nil) = false then ShowMessage('Unable to write to ' + CommPort);

end;

procedure TForm1.Button2Click(Sender: TObject);
begin
{Close the port}
CloseHandle(hCommFile);
end;

| Сообщение посчитали полезным:

Псб 8) !!!!

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

Вот что мне люди дали ..... класно


.586p
.model flat,stdcall
option casemap:none

includelib kernel32.lib
include windows.inc
include kernel32.inc


.data
ModemPort db "COM3",0
MuteDinamic db "ATM2",13,10,0
CallNumber db "ATDT 8905ххххххх",13,10,0 ;ATDP - в импульсном режиме

.data?
ModemHandle dd ?
OkBytes dd ?



.code
_entry:

invoke CreateFile, ADDR ModemPort, GENERIC_READ or GENERIC_WRITE, 0, 0, OPEN_EXISTING, 0, 0
.if eax != INVALID_HANDLE_VALUE

mov ModemHandle, eax

; Выключение динамика
invoke WriteFile, ModemHandle, ADDR MuteDinamic, SIZEOF MuteDinamic, ADDR OkBytes, 0
invoke Sleep, 2000

; ATDP - Набор номера в тональном режиме
invoke WriteFile, ModemHandle, ADDR CallNumber, SIZEOF CallNumber, ADDR OkBytes, 0
invoke Sleep, 20000

invoke CloseHandle, ModemHandle
.endif

invoke ExitProcess,0
end _entry

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

mak пишет:
Вот что мне люди дали ..... класно

Да работает нормально , только чёто я никак динамик отключить немогу.
Как его отключить то ?

-----
Что один человек сделал , другой всегда сломать может...

| Сообщение посчитали полезным:

Вот тебе ещё счастье. Список комманд модема в аттаче.

dfb8_16.12.2006_CRACKLAB.rU.tgz - ModemCommands.txt

| Сообщение посчитали полезным:

Все динамик отключил
MuteDinamic db "ATM2",13,10,0 заменил на MuteDinamic db "ATM0",13,10,0

-----
Что один человек сделал , другой всегда сломать может...

| Сообщение посчитали полезным:

Супер !!!! Пасибки !! 8))

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

А что если я не знаю какой порт COM ........как его узнать ????????? (может когда идет инициализация модема ...типо перебор портов)....что если соединение USB как это узнать и как использовать ???

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

Попробуй посмотреть раздел реестра HKEY_LOCAL_MACHINE/HARDWARE/DEVICEMAP/SERIALCOMM
По-моему там есть компорты. Других вариантов пока не знаю.

| Сообщение посчитали полезным:

Я посмотрел ....но как узнать на каком порте висит модем ????? .....а если на usb висит как .....запустить процедуру на асме ...написанную выше ???

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

mak пишет:
но как узнать на каком порте висит модем
Перебирать все порты, посылать туда ATZ и если приходит OK то это модем. Имеет смысл опрашивать порты с 1 по 8.

| Сообщение посчитали полезным:

хорошо .....а если это usb ???

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

mak а если усб то у него есть мост usb->com. И по этому разницы для твоей проги не будет.

-----
StarForce и Themida ацтой!

| Сообщение посчитали полезным:

если из под венды - то лучше всего использовать RasDial (http://www.google.com/search?hl=ru&q=rasdial&btnG=%D0%9F%D0%BE%D0%B8% D1%81%D0%BA&lr=lang_ru)

| Сообщение посчитали полезным:

Maximus Пасибо пояснил !!!!!!!!!!!! А то я уже в TAPI полез ...а там вообще засада ? справки клевой нет , да и то что нашел ... жесть .....

infern0 ...тоже не плохо .......посмотрю .....только звонок мне без пасса нужен , ну да ладно !!! Пасиб !

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

RasDial посмотрел ... штука класная ......но мне нужно чтоб определяло на каком порте модем .....звонила ...и потом само удалялась ............. 1 ые 2 зада чи есть а вот последняя 8(

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

tomac пишет:
Перебирать все порты, посылать туда ATZ и если приходит OK то это модем. Имеет смысл опрашивать порты с 1 по 8.

как примерно посыл выглядит ??? какие выходные данные и куда ..в eax ??

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным:

вот выложил прогу на делфи для дозвона.

webfile.ru/1252032

| Сообщение посчитали полезным:

А на асме ни как ??? Пожалууста !!!!

-----
RE In Progress [!] Coding Hazard [!] Stay Clear of this Cube

| Сообщение посчитали полезным: