bina 100% com hb+minigui sem resistor, ideias

[luiz antonio da silva]

Olá pessoal !

Consegui montar um bina 100% funcional com harbour + minigui ou console e lm-56n (netodragon), não foi preciso usar o resistor ou conversor dtmf/fsk na linha, apenas modificar o inf do modem. (testado em win98/me/xp/2003/7 e vista).

Como o lance de disk-alguma coisa já tá meio batido, gosteria de ideias novas pra usar o bina, qq ajuda será bem vinda.

Grato.
Luiz.

[Pablo César]

Puxa que bom ! Realmente esse modem é um ótimo modem, mas seria muito bom que você pudesse fazer uma contribuição e mostrar os caminhos das pedras, quem sabe um exemplo simples na área de Downloads.

Agora uma nova utilidade não se me ocorre no momento, a identificação de chamadas para o atendimento de disk alguma coisa... é o melhor aliás também pode ser intentado fazer como todas as ligações recebidas e até mesmo feitas possam ser registradas. Na internet existe um hardware que registra as ligações feitas para arquivo, quem sabe possa ser feita também o registro se o programa ficar em background. Não sei se funcionaria, mas era questão de primeiramente testar a sua solução.

[asimoes]

Olá Luiz,

Esse modem que você está usando é um Lg? interno? e você conseguiu fazer a identificação de chamadas sem fazer uso do resistor conforme tutorial do Vagner (vagucs)?

[ ]´s

[luiz antonio da silva]

Sim Asimoes, é um lg interno (netodragon), e tá funcionando 100%, um amigo que tem restaurante tá usando como teste, e por enquanto, tá redondinho....sem resistor nem conversor.

Luiz.

[luiz antonio da silva]

olá Pablo !

sem problema, assim que terminar os testes, posto a solução encontrada, muito simples por sinal...rs

Abraço.
Luiz.

[sygecom]

Olá Luiz,
Agradeço antecipadamente em compartilhar conosco sua solução, acho que é um recurso que todos gostariam de ver como funciona, eu pelo menos estou curioso para ver como isso funciona. Obrigado.

[HASA]

)
Olá Luiz, poderia compartilhar conosco,
:{
HASA

[gilsonpaulo]

Com um colega que precisou nos usamos modens da motorola sm56 aqueles winmodens. vc deve abrir o hyperterminal do windows e selecionar porta que o modem esta instado e mandar conectar, apos isto teste algum destes comandos no modem.:

Código: Selecionar todos

AT#CID=1
AT+VCID=1
AT#CLS=8#CID=1
AT#CID=2
AT%CCID=1
AT%CCID=2
AT#CC1
AT*ID1

Teste com valor 1 ou 2, o valor define qual tipo de padrão sera habilitado, não me lembro agora mas 1 é fsk e 2 dtmf ou vice e versa. Se a resposta for ok o modem suporta feito isto ligue para a linha que esta conectada ao modem (não feche o hypertrminal) se aparecer o numero do telefone que esta ligando significa que o modem tem suporte ao padrao dtmf.

Se aparecer somente ring ring troque de valor. se mesmo assim nao aparecer o modem não tem suporte.

Testei tambem com Smartlink sl 2800, 2801 e com intel 537ep, alguns motorolas não funcionaram.

Neste sistema ele ficou somente monitorando a porta do modem.

Este sistem foi desenvolvido em VS2010.

Seque um pequeno trecho do codigo, em VS2010

Código: Selecionar todos

 Private Sub bina_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bina.Click
        liberado = "Nao"
        cmd.CommandText = "select * from CONTROLE"

        If bina.Text = "Iniciar Bina" Then
            bina.Text = "Fechar Bina"
            cmd.Connection = conn
            Dim mydata1 As MySqlDataReader
            mydata1 = cmd.ExecuteReader()
            Do While mydata1.Read
                xporta = mydata1(("serial")).ToString
            Loop
            mydata1.Close()


            If aportaexiste(xporta) Then
                MsgBox("PORTA DO BINA ENCONTRADO")
                liberado = "Sim"
                If portaserial.IsOpen = False Then
                    portaserial.Open(xporta, 19200, 8, Rs232.DataParity.Parity_None, Rs232.DataStopBit.StopBit_1, 4096)
                End If
            Else
                MsgBox("PORTA DO BINA NAO ENCONTRADO")
                liberado = "Nao"
                bina.Text = "Iniciar Bina"
                Exit Sub
            End If
            Timer2.Enabled = True

            ' portaserial.Write("AT#CID=1" & vbCr)
            If liberado = "Sim" Then
                portaserial.Write("AT+VCID=2" & vbCr)
                botaobinanao.FillColor = Color.Gray
                botaobinasim.FillColor = Color.Green
            End If


        Else
            botaobinanao.FillColor = Color.Red
            botaobinasim.FillColor = Color.Gray
            portaserial.Close()
            bina.Text = "Iniciar Bina"


        End If


    End Sub
    Private Sub ligar()
        If liberado = "Sim" Then
            Timer2.Enabled = True
            portaserial.Write("AT+VCID=2" & vbCr)
            botaobinanao.FillColor = Color.Gray
            botaobinasim.FillColor = Color.Green
        End If
    End Sub
    Private Sub desligar()
        If liberado = "Sim" Then
            Timer2.Enabled = False
            portaserial.Write("AT+VCID=0" & vbCr)
            botaobinanao.FillColor = Color.Red
            botaobinasim.FillColor = Color.Gray
        End If
    End Sub

    Private Sub tbina_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tbina.TextChanged

    End Sub
End Class

PS. Sua linha tem que estar com o identrificar de chamadas ativo.

[HASA]

)
Olá Luiz Antonio, conseguiu terminar de testar ?, como vc disse ao Pablo que postaria a solução continuamos no aguardo...

Hasa

:xau

[Clipper]

Só para constar.

A cerca de 6 meses consegui colocar para funcionar a identificação de chamadas com o clipper, sem usar a LIB do Wagner e sem resistor.

Utilizei um software externo (free) que fica no tray e faz a identificação e grava em um arquivo texto, a ideia é simples e funciona com qualquer linguagem.

Esse software chama Phone Tray Free e pode ser muito útil para fazer os testes de funcionalidades do modem com bina.

Vale ressaltar que o modem para funcionar com bina precisar ter o recurso de ID (alguns não tem).

Testei com os seguintes modens.

AGERE (FSK)
NETODRAGON (FSK)

SMARTLAN (DTMF)
LG (DTMF)

MOTOROLA (Nessa desgraça de placa não funcionou nem por decreto)

Abaixo um vídeo que mostra funcionando no aplicativo.


Uma ideia de uso é de registro de chamadas, como a do Phone Tray. Veja imagem abaixo :



Até logo.

Marcelo

[HASA]

)
Legal, obrigado pela dica, valeuuuu
:xau
Hasa

[rbonotto]

Ola Clipper, baixei e instalei o programa Phone Tray Free

Li o tutorial mas não achei qual o modo de passar para dentro do programa ( compilado em harbour ) o numero do telefone para uma variavel.

Poderia dar umas dicas ?

abs,

[sambomb]

Uma coisa que eu gostaria muito de fazer é a gravação das chamadas feitas e recebidas e uma secretária eletrônica...

Exemplo: Fiz uma ligação, o bina reconhece, grava no banco de dados a data, hora, número e tipo de chamada, e fica em loop até o gravador de chamada terminar de gravar o arquivo, depois ele renomeia o arquivo e grava no banco de dados.

Quando receber uma ligação, faz o mesmo esquema, mas se não atender dentro de x segundos, ativa uma mensagem de voz gravada previamente e deixa a pessoa do outro lado deixar uma mensagem.

Acredito que a tarefa mais difícil seja a da secretária eletrônica por precisar atender/desligar o telefone e mandar uma mensagem, e provavelmente iria precisar de algum hardware extra....

Mas se conseguisse implementar isso seria ótimo para usar em casa e em empresas!
Nos horários em que a empresa estiver fechada vai poder receber encomendas, pedidos, reclamações, dúvidas, etc....

[fladimir]

Samir temos uma Central PABx aki na empresa q faz isso e grava em um banco SQL, estou tentanto ter acesso ao banco mas não pelo software deles e sim direto pois ai posso trabalhar os dados q lá são armazenados... seria mais ou menos o q vc quis dizer ou não?

[]´s

[sambomb]

A grande questão da Central PABx é que ela tem funcionalidades diferentes das que citei.

Até onde eu sei:
Funções que não seriam necessárias:

• Tem a possibilidade de receber múltiplas ligações simultâneas
• Chamada em espera com toque musical - Não seria necessário

Funções não possibilitadas que seriam necessárias:

• Atendimento automático após um período específico de chamada
• Envio de resposta na ligação
• Gravação da chamada