Ir para conteúdo
Faça parte da equipe! (2024) ×
Conheça nossa Beta Zone! Novas áreas a caminho! ×

[N]ARUTO_

Steel Member
 Perfil  Explorar Conteúdo

  • Total de Posts

    77

  • Registro em

  • Última visita

  • WCoins

    0  

 Tipo de Conteúdo 

Posts postados por [N]ARUTO_

    Memory Cleaner

    em Visual Basic

    Postado

    Memory Cleaner : Programa para diminuir consumo de memória dos programas

     

    j1VzMCf.png

    cdMnMTK.jpg

     

    File name Memory Cleaner.exe

    File size 335.5 KB

    Last analysis 2018-08-13 23:23:00 UTC

     

    SCAN: (

    É necessário se cadastrar para acessar o conteúdo.
    )

     

    SRC : (

    É necessário se cadastrar para acessar o conteúdo.
    )

     

    PROGRAMA EXE : (

    É necessário se cadastrar para acessar o conteúdo.
    )

     

    VIDEO : (

    É necessário se cadastrar para acessar o conteúdo.
    )

    • Curtir 6

    [DÚVIDA] Auto Divulgador

    em Dúvidas & Ajuda

    Postado

    [spoiler=Direto do programa]

    [spoiler=Direto do programa]

    Public Class Form1

    Private Script As New List(Of String)

    Sub New()

    InitializeComponent()

    Control.CheckForIllegalCrossThreadCalls = False

    Label1.Text = Nothing

    Script.AddRange({"Prepare-se para o enem isso irá poder te ajudar, tal tal tal tal",

    "Aqui vai algumas dicas que poderão ser úteis",

    "E assim continuaria no looping, até o fim do meu texto."})

    Dim X As New Threading.Thread(AddressOf ShowText)

    X.Start()

    End Sub

    Private Sub ShowText()

    For P = 0 To Script.Count - 1

    Label1.Text += Script.Item(P) & vbNewLine

    Threading.Thread.Sleep(5000)

    Next

    Label1.Text += "- Texto completo -"

    End Sub

    End Class

     

    [spoiler=Usando texto de um arquivo txt]

     

    [spoiler=Usando texto de um arquivo txt]

    Public Class Form1

    Sub New()

    InitializeComponent()

    Control.CheckForIllegalCrossThreadCalls = False

    Label1.Text = Nothing

    Dim X As New Threading.Thread(AddressOf ShowText)

    X.Start()

    End Sub

    Private Sub ShowText()

    Dim F As IO.StreamReader = New IO.StreamReader("C:\Users\???\Desktop\Script.txt")

    Do While Not F.EndOfStream

    Label1.Text += F.ReadLine & vbNewLine

    Threading.Thread.Sleep(5000)

    Loop

    End Sub

    End Class

     

     

    • Curtir 1

    Sistema Trial (FTP)

    em Visual Basic

    Postado

    Sistema de login com trial sem bug de data

     

    Site para pegar a data correta:

    É necessário se cadastrar para acessar o conteúdo.

    Site para criar ftp :

    É necessário se cadastrar para acessar o conteúdo.

     

    'Login

    SZjS9tV.png

     

    'Criar conta

    6upCZCx.png

     

    'Acabou vip

    755x8qJ.png

     

    'Video

    É necessário se cadastrar para acessar o conteúdo.

     

    'Scan

    É necessário se cadastrar para acessar o conteúdo.

     

    'Download

    É necessário se cadastrar para acessar o conteúdo.

    • Curtir 2

    Ajuda aqui !

    em Dúvidas & Ajuda

    Postado

    Eu queria por uma função no meu programa que ele feche se outro processo for fechado...

     

    Por exemplo:

     

    O anti cheat de qualquer jogo fecha junto se o jogador fechar o jogo...

    tipo o XIGNCODE, se vc estiver com o PB aberto e fechar o PointBlank o anti cheat vai fechar também.

     

    Alguem pode me ajudar ? preciso muito desse comando.

    Tenta usar esse codigo:

     

    [spoiler=Codigo]

    Sub New()

    InitializeComponent()

    Process.Start("Aqui voce coloca o local do programa que irá abrir // exemplo o local do chrome")

    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

    Dim X() As Process = Process.GetProcessesByName("chrome")

    If Not X.Count > 0 Then

    'Se o chrome fechar seu programa tmb fecha

    End

    End If

    End Sub

     

     

    Ajuda ListBox

    em Dúvidas & Ajuda

    Postado

    tente utilizar o Select Case.

    exemplo:

    Select Case ListBox1.SelectedIndex

    Case 0

    'aqui coloca o codigo para injetar a dll do csgo

    MsgBox("csgo")

    Case 1

    'aqui coloca o codigo para injetar a dll do Team Fortress 2

    MsgBox("Team Fortress 2")

    End Select

    • Curtir 1

    RedeCanais for desktop

    em Visual Basic

    Postado

    Site usado :

    É necessário se cadastrar para acessar o conteúdo.

    Programa feito para assistir filmes (HD) sem precisar abrir o navegador

     

    SCFgLVT.png

    X3Qr3Mw.png

    lgIqZX5.png

    gBV3dW2.png

     

    É necessário se cadastrar para acessar o conteúdo.

     

    Esse video é antigo pois o programa tinha parado de funcionar ( o programa é o da print não do video )

     

    video é uma versão "antiga" do programa

     

    É necessário se cadastrar para acessar o conteúdo.

    É necessário se cadastrar para acessar o conteúdo.

     

    EDIT:

    RedeCanais Series (EM HD)

     

    hLfFMgA.png

    rCvaC6x.png

    Az9PPWw.png

     

    SCAN:

    É necessário se cadastrar para acessar o conteúdo.

     

    DOWNLOAD SRC:

    É necessário se cadastrar para acessar o conteúdo.

     

    • Curtir 5

    Dll Fixer 1.0

    em Visual Basic

    Postado

    Site Usado:

    É necessário se cadastrar para acessar o conteúdo.

     

    Algumas Print:

    3Bnq85B.png

    MTz3Mv2.png

    klSYF00.png

     

    Scan Visual Styler :

    É necessário se cadastrar para acessar o conteúdo.

    Scan LicenseGen :

    É necessário se cadastrar para acessar o conteúdo.

    Scan Dll Fixer 1.0

    É necessário se cadastrar para acessar o conteúdo.

     

    É necessário se cadastrar para acessar o conteúdo.

     

     

    • Curtir 4

    Proxy List

    em Visual Basic

    Postado

    Dependendo do projeto é muito útil isso ai em rsrsrs Parabéns pelo projeto... Não cheguei a analisar a source mas, é totalmente dinâmico ele ou foi colocado os valores de forma estática mesmo? De qualquer forma ficou ótimo. Abraços

    é totalmente dinâmico e o site usado é esse :

    É necessário se cadastrar para acessar o conteúdo.

    • Curtir 1

    4Devs for desktop

    em Visual Basic

    Postado

    Site usado:

    É necessário se cadastrar para acessar o conteúdo.

    -

    É necessário se cadastrar para acessar o conteúdo.

    -

    É necessário se cadastrar para acessar o conteúdo.

    -

    É necessário se cadastrar para acessar o conteúdo.

    -

    É necessário se cadastrar para acessar o conteúdo.

     

    -

     

    algumas print :

    RGVvIv6.png

    iakOSfN.png

    4RE47fV.png

    K1Wwrft.png

    DgOuvVe.png

     

    Scan:

    É necessário se cadastrar para acessar o conteúdo.

     

    Download:

    É necessário se cadastrar para acessar o conteúdo.

     

    Edit Versão 0.2 :

    vZ5YS3v.png

    qmK3MpB.png

    0NydY1A.png

    vZGjvLi.png

     

    VIDEO:

    É necessário se cadastrar para acessar o conteúdo.

    SCAN:

    É necessário se cadastrar para acessar o conteúdo.

    DOWNLOAD:

    É necessário se cadastrar para acessar o conteúdo.

     

    • Curtir 4

    Obter dados de pagina por regex

    em Visual Basic

    Postado

    Boa, mas tenho uma dúvida, se eu quiser pegar só depois do "href" por exemplo, utilizo apenas o que?

     

    Já pensou em pegar aqueles sites que fornecem Conta Bancária/CPF etc e puxar para um programa assim, tipo pra fazer contas NETFLIX entre outras coisas ..

     

    Muito bom, obrigado pelo conteúdo!

     

    Desculpe mas eu nao entendi sua duvida ._.

    tem como explicar melhor?

    • Curtir 1

    Obter dados de pagina por regex

    em Visual Basic

    Postado

    Tem 2 jeito de obter os dados da pagina por "REGEX"

     

    1• (Para obter varios 'links')

     

    'Baixar Codigo fonte da pagina

    Dim I As String = (New Net.WebClient).DownloadString("

    É necessário se cadastrar para acessar o conteúdo.
    ")

    'obter links do youtube 'varios link"

    For Each H As Match In New Regex("<a class=""([^<]*)"" dir=""([^<]*)"" title=""([^<]*)"" aria-describedby=""([^<]*)"" data-sessionlink=""([^<]*)"" href=""([^<]*)"" rel=""nofollow"">([^<]*)</a>").Matches(I)

    Next

    2•(Para obter apenas 1 'link/palavra')

    'Baixar Codigo fonte da pagina

    Dim I As String = (New Net.WebClient).DownloadString("http://www.webcheats.com.br/members/n-aruto_.4716347/")

    'Obter apenas o link da imagem do perfil do forum

    Dim T As Match = Regex.Match(I, "<img src=""http://www.webcheats.com.br/data/avatars/([^<]*)"" alt=""([^<]*)"" style=""([^<]*)"" itemprop=""([^<]*)")

    MsgBox("http://www.webcheats.com.br/data/avatars/" & T.Groups(1).Value)

     

    'Obter nome do perfil do forum

    T = Regex.Match(I, "<h1 itemprop=""name"" class=""username""><span class=""([^<]*)"">([^<]*)</span></h1>")

    MsgBox(T.Groups(2).Value)

    Video:

    É necessário se cadastrar para acessar o conteúdo.

     

    Scan:

    É necessário se cadastrar para acessar o conteúdo.

     

    Download :

    É necessário se cadastrar para acessar o conteúdo.

    • Curtir 4

    Ajuda: como criar um visualizador de videos no youtube, por web Browser.

    em Dúvidas & Ajuda

    Postado

    Até onde sei o chromium é um navegador parecido com o Chrome, por ser "Open source" foram criados componentes pra usar o motor dele em delphi,C# etc... Até onde eu sei ele não muda proxy que seria o mínimo para dar os views(Não sei se realmente funciona, nunca tentei criar algo do tipo). Nessa vídeo aula o cara apenas ensina como usar o componente. '-'

     

     

    Eu mostrei o video para ele fazer um visualizador de video em momento algum disse que era um bot de views

    Music Download

    em Visual Basic

    Postado

    Algumas Print

    Reproduzindo musica:

    ldUXCqv.png

    Opções de download:

    5TeWnaq.png

    baixando em mp4: (Video)

    kgUFCow.png

    Sistema de pesquisa:

    GTiG0bJ.png

    J0hPp8N.png

    aOZenq3.png

     

     

    Download da musica em mp3 é lento.

    (recomendo baixar em mp4)

     

    caso não aparecer as imagens ou o nome da musica deixe o delay em 1000+( 1seg)

    esqueci de mostrar a função de "pesquisa" no video

    pela as print ja devem saber como funciona.

    (Aperte CTRL+F)

    (Para mostrar todas musicas novamente aperte CTRL+F e dê enter sem escrever nada)

    2 Clique sobre a musica para reproduzir

     

     

    Scan: Music Desktop.exe

    É necessário se cadastrar para acessar o conteúdo.

     

    Scan: API_Youtube.dll

    É necessário se cadastrar para acessar o conteúdo.

     

    Video:

    É necessário se cadastrar para acessar o conteúdo.

     

    Source da dll e do programa :

    AevY6qG.png

     

    Sites usados:

    É necessário se cadastrar para acessar o conteúdo.

    É necessário se cadastrar para acessar o conteúdo.

     

    Download:

    É necessário se cadastrar para acessar o conteúdo.

     

     

    • Curtir 1

    help= me

    em Dúvidas & Ajuda

    Postado

    Imports System.Net, System.Text.RegularExpressions

    Public Class Form1

    Dim I As String = (New Net.WebClient).DownloadString("

    É necessário se cadastrar para acessar o conteúdo.
    )

    Dim XxX As New ArrayList

    Sub New()

    InitializeComponent()

    For Each H As Match In New Regex("<li class=""li1""><div class=""de1"">(.*?)</div></li>").Matches(I)

    XxX.Add(H.Groups(1).Value)

    Next

    End Sub

     

    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged

    Select Case ComboBox1.SelectedIndex

    Case 0

    Verify(Label1, 0)

    Case 1

    Verify(Label1, 1)

    Case 2

    Verify(Label1, 2)

    End Select

    End Sub

    Public Sub Verify(ByVal NJ As Label, ByVal Index As Integer)

    Dim X As String() = Split(XxX.Item(Index), " : ")

    NJ.Text = X(1)

    If X(1).Contains("Online") Then

    Button1.Enabled = True

    NJ.ForeColor = Color.Green

    Else

    Button1.Enabled = False

    NJ.ForeColor = Color.Red

    End If

    End Sub

     

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

    If ComboBox1.SelectedIndex = 0 Then

    'form2.show

    MsgBox("0")

    ElseIf ComboBox1.SelectedIndex = 1 Then

    'form3.show

    MsgBox("1")

    ElseIf ComboBox1.SelectedIndex = 1 Then

    'form4.show

    MsgBox("2")

    End If

    End Sub

    End Class

     

     

    Source :

    É necessário se cadastrar para acessar o conteúdo.

    • Curtir 1

    DeckShop Clash Royale VB.NET

    em Visual Basic

    Postado

    Site Usado:

    É necessário se cadastrar para acessar o conteúdo.

     

    Algumas Print : "DECK"

    Ao abrir :

    NxFDPQd.png

    Opções para "Deck"

    mRSWX4A.png

    Gerar Deck

    2syrx8F.png

    r5tpwCW.png

    Informações dos Deck

    zWuKLsh.png

     

    Algumas Print : "CLÃ"

    Ao abrir:

    wMC0qXV.png

    Buscando clã pelo nome

    hyimEzB.png

    Informações do clã

    I8AA0cE.png

    Informação Player

    eHwJHvj.png

    SfCc8Xn.png

     

    Scan: DeckShop Clash Royale.exe

    É necessário se cadastrar para acessar o conteúdo.

     

    Scan: DeckShop Clear Memory.exe

    É necessário se cadastrar para acessar o conteúdo.

     

    Video:

    É necessário se cadastrar para acessar o conteúdo.

     

    Download:

    É necessário se cadastrar para acessar o conteúdo.

    • Curtir 5

    WebCheats Login

    em Visual Basic

    Postado

    Print do Projeto :

    hNcHmZa.png

    YNIQxu7.png

     

    Print da tela de login e suas "funções" :

    Aguardando Login

    gZnmHl1.png

     

    Usuário Não Encontrado

    iejWsx3.png

     

    Senha Incorreta

    H0ejeF7.png

     

    Logado Com Sucesso

    UtdekuD.png

     

    Algumas Configurações do Perfil

    GTfv6fQ.png

     

    Não garanto que o projeto está 100% funcional

     

    Porem o Sistema de login está funcionando Normalmente

     

    Download :

    É necessário se cadastrar para acessar o conteúdo.

    Scan:

    É necessário se cadastrar para acessar o conteúdo.

    • Curtir 9

    Pesquisar Itens na ListView

    em Visual Basic

    Postado

    Video:

    É necessário se cadastrar para acessar o conteúdo.

     

    Code:

    Public Class Form1

    Dim S As New ArrayList

     

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

    S.Add(TextBox2.Text & " # " & TextBox3.Text & " # " & TextBox4.Text)

    End Sub

     

    Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged

    ListView1.Items.Clear()

    For Each H In S.ToArray

    If H.StartsWith(TextBox1.Text.ToString().ToLower()) = True Then

    Dim X As String() = Split(H, " # ")

    Dim I As New ListViewItem

    I.Text = X(0)

    I.SubItems.Add(X(1))

    I.SubItems.Add(X(2))

    ListView1.Items.Add(I)

    End If

    Next

    End Sub

    End Class

     

    Scan:

    É necessário se cadastrar para acessar o conteúdo.

    Download SRC:

    É necessário se cadastrar para acessar o conteúdo.

    Animes Desktop 2018

    em Criações

    Postado

    Animes desktop: é um programa para assistir qualquer tipo de animes e desenhos

    Site usado para criar o programa:

    É necessário se cadastrar para acessar o conteúdo.

    EXECUTE O PROGRAMA COMO ADMINISTRADOR PARA NÃO OCORRER ERRO

     

    Algumas Funções :

    Assistir todos episódios do anime escolhido

    Buscar por gênero do anime

    Assistir desenhos

    Adicionar episódios em uma playlist

    Bate-papo para se divertir

     

    Algumas Print :

     

    Print da tela de busca :

    D6Qzdz0.png

    Print das configurações :

     

    VLGJTVF.png

     

    Print do chat :

     

    Y0sXqYj.png

     

    Print das informações do anime :

     

    OPT21ux.png

     

    Print do player :

     

    mqNZGwh.png

     

    Listando desenhos :

     

    gnea0k5.png

     

    Print "PERFIL 2"

     

    4opE6nv.png

    5FFByDF.png

     

    Sobre as configurações :

     

    "Reduzir consumo de memoria ram"

    Reduz o consumo de memoria ram utilizada pelo programa

    print com essa opção desativada e listando todos desenhos :

    A2MhOr6.png

    print com essa opção ativada e listando todos desenhos :

    3zsesVM.png

     

    "Mostrar todos episódios do anime no player de video"

    essa opção ja é marcada como padrão

    a função dela é listar todos episódios do anime escolhido na aba "Episódios" no player de video

     

    "Tempo de buffer media player"

    O armazenamento em buffer refere-se ao tempo que um player (Windows Media Player, Winamp ou Real Player etc) leva para preencher o buffer antes de começar a reproduzir o conteúdo. Ou seja, é a diferença entre o momento em que o usuário abre uma conexão com um servidor de mídia de transmissão e o momento em que o conteúdo começa a ser reproduzido(peguei do google)

     

    "Buscar por gênero"

    Ao selecionar essa opção você poderá pesquisar animes pelo gênero(ex: Aventura , ação, etc..)

    "Desativar animações ao abrir"

    Quando o programa é aberto ele tem uma animação caso você queira desativa-la ative essa opção

     

    "Alto Desempenho"

    essa opção ja é marcada como padrão

    quando abrir o programa ele automaticamente desativa o "tema" do windows

    "Skin"

    No programa tem uma lista para mudar a skin do programa

    "Animes na blacklist"

    os animes que não funcionam são adicionados na blacklist

    "Playlist"

    você pode adicionar episódios de qualquer anime para assistir em uma playlist

    ( Só funciona com a versão de 32bits )

    "Ao iniciar pesquisar por:"

    ex:digite Naruto,Dragon ball,Death note (Necessário usar virgulas para separar) clique em confirmar

    ai na proxima vez que abrir o programa irá listar os animes que foram digitados

     

    Scan instalador 64bits :

    É necessário se cadastrar para acessar o conteúdo.

     

    Scan instalador 32bits:

    É necessário se cadastrar para acessar o conteúdo.

     

    Scan executaval 64bits:

    É necessário se cadastrar para acessar o conteúdo.

     

    Scan executavel 32bits:

    É necessário se cadastrar para acessar o conteúdo.

     

    Download Instalador 64bits:

    É necessário se cadastrar para acessar o conteúdo.

     

    Download Instalador 32bits:

    É necessário se cadastrar para acessar o conteúdo.

     

    Caso der erro de "skin" baixe essas skin e coloque ela na mesma pasta do programa

    É necessário se cadastrar para acessar o conteúdo.

     

    • Curtir 4
×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.

 Accept Cookies  Reject Cookies