Xhack

Un forum dedicato all'hacking
 
IndiceIndice  PortalePortale  CalendarioCalendario  FAQFAQ  CercaCerca  RegistratiRegistrati  Lista UtentiLista Utenti  GruppiGruppi  Accedi  

Condividi | 
 

 mandate i vostri programmi!

Andare in basso 
Vai alla pagina : 1, 2, 3  Seguente
AutoreMessaggio
darkjoker
Admin
Admin
avatar

Numero di messaggi : 813
Data d'iscrizione : 30.07.07

MessaggioTitolo: mandate i vostri programmi!   Gio Set 06, 2007 6:35 pm

ora che avete appreso qualcosina su autoit perche non cominciate a inviarci le sorgnti dei vostri primi programmi con le relative spiegazioni Wink Question

postate i vostri script in modo da far conoscere anche agli altri alcune funzioni che magari non conoscono di autoit.
postate anche programmi banali (magari non che facciano una msgbox bounce ).
se non riuscite a far funzionare qualcosa postate! sarò contento (se potrò) di aiutarvi a risolvere i problemi Very Happy ciaooo

darkjoker

_________________
L'unico computer sicuro, è un computer spento.

Nel software esiste sempre almeno un bug, generalmente è localizzabile tra la tastiera e la sedia

Torna in alto Andare in basso
Visualizza il profilo dell'utente
darkphantom
hack-member
hack-member
avatar

Numero di messaggi : 398
Data d'iscrizione : 03.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Mer Set 19, 2007 7:15 pm

ke ne dite di questa mia "calcolatrice"? so che è inutile, però mi sono divertito a farla Wink
Codice:

While 1
$a = MsgBox(4, " ", "Vuoi addizionare?")
If $a = 6 Then
$ad = InputBox(" ", "1° addendo")
$add = InputBox(" ", "2° addendo")
$s = $ad + $add
MsgBox(0, " ", $s)
Else
$b = MsgBox(4, " ", "Vuoi moltiplicare?")
If $b = 6 Then
$fa = InputBox(" ", "1° fattore")
$fat = InputBox(" ", "2° fattore")
$p = $fa * $fat
MsgBox(0, " ", $p)
Else
$c = MsgBox(4, " ", "Vuoi sottrarre?")
If $c = 6 Then
$mi = InputBox(" ", "minuendo")
$so = InputBox(" ", "sottraendo")
$di = $mi - $so
MsgBox(0, " ", $di)
Else
$d = MsgBox(4, " ", "Vuoi dividere?")
If $d = 6 Then
$div = InputBox(" ", "dividendo")
$div2 = InputBox(" ", "divisore")
$q = $div / $div2
MsgBox(0, " ", $q)
Else
$f = MsgBox(4, " ", "Vuoi elevare a potenza?")
If $f = 6 Then
$ba = InputBox(" ", "base")
$es = InputBox(" ", "esponente")
$r = $ba ^ $es
MsgBox(0, " ", $r)
Else
$g = MsgBox(4, " ", "Vuoi estrarre una radice?")
If $g = 6 Then
$bas = InputBox(" ", "base")
$esp = InputBox(" ", "esponente")
$ri = $bas ^ (1/$esp)
MsgBox(0, " ", $ri)
Else
$e = MsgBox(4, " ", "Vuoi uscire?")
If $e = 6 Then
ExitLoop
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
WEnd
Torna in alto Andare in basso
Visualizza il profilo dell'utente
certaindeath
Admin
Admin
avatar

Numero di messaggi : 343
Data d'iscrizione : 30.07.07

MessaggioTitolo: Re: mandate i vostri programmi!   Gio Set 20, 2007 5:31 pm

aaaaaaaaaaaaaaaaaahhhhh
che è sta roba???? affraid Very Happy
potresti migliorarlo inserendo una semlice InputBox che chiede l'operazione(invece che 3000 MsgBox).
Comunque il modo migliore è usare le GUI,
ma questo argomento non è ancora stato trattato su questo forum.

Bè, dai, non ti deprimere...
Infondo funziona... Very Happy

P.S. la prossima volta che hai un lampo di genio(che ti viene un programma)
apri un nuovo topic
Torna in alto Andare in basso
Visualizza il profilo dell'utente
jackhack
spammer
spammer
avatar

Numero di messaggi : 89
Localizzazione : TORINO
Data d'iscrizione : 18.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Lun Set 24, 2007 6:57 pm

ciao raga ho fatto questo virus che automaticamente sposta il mouse per spegnere il computer, ecco lo script:

while 1 = 1
MouseMove( 45, 755 )
sleep ( 500 )
MouseClick("left")
MouseClick("left")
MouseMove( 280, 713 )
sleep ( 500 )
mouseclick("left")
mouseclick("left")
MouseMove( 501, 281 )
mouseclick("left")
WEnd


ciao fatemi sapere jackhack Very Happy Exclamation Exclamation Exclamation
Torna in alto Andare in basso
Visualizza il profilo dell'utente
jackhack
spammer
spammer
avatar

Numero di messaggi : 89
Localizzazione : TORINO
Data d'iscrizione : 18.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Lun Set 24, 2007 7:00 pm

se ve ne interessa un altro eccolo lo chiamato mouse ballerino:

while 1 = 1
mousemove( 345, 567 )
mousemove( 456, 456 )
mousemove( 783, 123 )
mousemove( 463, 345 )
mousemove( 345, 567 )
mousemove( 456, 456 )
mousemove( 783, 123 )
mousemove( 463, 345 )
mousemove( 345, 567 )
WEND


ciao jackhack Very Happy Exclamation Exclamation
Torna in alto Andare in basso
Visualizza il profilo dell'utente
jackhack
spammer
spammer
avatar

Numero di messaggi : 89
Localizzazione : TORINO
Data d'iscrizione : 18.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Lun Set 24, 2007 7:02 pm

questo è semplice si chiama lettore CD :

While 1
CDTray( "E:", "open")
WEnd


ciao jackhack Very Happy Exclamation Exclamation
Torna in alto Andare in basso
Visualizza il profilo dell'utente
darkphantom
hack-member
hack-member
avatar

Numero di messaggi : 398
Data d'iscrizione : 03.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Lun Set 24, 2007 10:24 pm

molto belli, però, nel primo, il while 1 è inutile, in quanto il ciclo basta che sia compiuto una sola volta
Torna in alto Andare in basso
Visualizza il profilo dell'utente
certaindeath
Admin
Admin
avatar

Numero di messaggi : 343
Data d'iscrizione : 30.07.07

MessaggioTitolo: Re: mandate i vostri programmi!   Mar Set 25, 2007 4:44 pm

Se togli while 1,
ti consigio di mettere BlockInput(1) così il mouse si muoverà esattamente
come dovrebbe( per quanto possa smanettare col mouse chi si è beccato il virus...)
Torna in alto Andare in basso
Visualizza il profilo dell'utente
jackhack
spammer
spammer
avatar

Numero di messaggi : 89
Localizzazione : TORINO
Data d'iscrizione : 18.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Mar Set 25, 2007 5:01 pm

grazie per i vostri consigli ciao jackhack Very Happy Exclamation Exclamation Exclamation Exclamation Exclamation Exclamation Exclamation lol! Exclamation Exclamation Exclamation
Torna in alto Andare in basso
Visualizza il profilo dell'utente
jackhack
spammer
spammer
avatar

Numero di messaggi : 89
Localizzazione : TORINO
Data d'iscrizione : 18.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Mar Set 25, 2007 5:23 pm

Darkphantom devo dire che senza while però è possibile fermare il movimento della freccia; è meglio come di certaindeath mettere il blockinput, ecco come verrebbe:

BlockInput
while 1 = 1
MouseMove( 45, 755 )
sleep ( 500 )
MouseClick("left")
MouseClick("left")
MouseMove( 280, 713 )
sleep ( 500 )
mouseclick("left")
MouseMove( 501, 281 )
mouseclick("left")
WEnd


ciao jackhack
Torna in alto Andare in basso
Visualizza il profilo dell'utente
darkphantom
hack-member
hack-member
avatar

Numero di messaggi : 398
Data d'iscrizione : 03.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Mar Set 25, 2007 6:35 pm

e vero, però ricordati che devi fare
Codice:

BlockInput(1)
Torna in alto Andare in basso
Visualizza il profilo dell'utente
jackhack
spammer
spammer
avatar

Numero di messaggi : 89
Localizzazione : TORINO
Data d'iscrizione : 18.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Mar Set 25, 2007 6:52 pm

lo so quello sopra serviva per sintetizzare la nuova "versione" del mio virus-scherzo ciao jackhack
Torna in alto Andare in basso
Visualizza il profilo dell'utente
certaindeath
Admin
Admin
avatar

Numero di messaggi : 343
Data d'iscrizione : 30.07.07

MessaggioTitolo: Re: mandate i vostri programmi!   Mer Set 26, 2007 4:59 pm

Bè, (1) non è poi così tanto...
Comunque bravo!!!
continua a mandarci programmi...
Torna in alto Andare in basso
Visualizza il profilo dell'utente
jackhack
spammer
spammer
avatar

Numero di messaggi : 89
Localizzazione : TORINO
Data d'iscrizione : 18.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Mer Set 26, 2007 5:03 pm

va bene ne sto programmando uno nuovo appene lo finito velomando
Torna in alto Andare in basso
Visualizza il profilo dell'utente
darkjoker
Admin
Admin
avatar

Numero di messaggi : 813
Data d'iscrizione : 30.07.07

MessaggioTitolo: Re: mandate i vostri programmi!   Mer Set 26, 2007 5:38 pm

per favore, mandateli su un nuovo topic, ok?

_________________
L'unico computer sicuro, è un computer spento.

Nel software esiste sempre almeno un bug, generalmente è localizzabile tra la tastiera e la sedia

Torna in alto Andare in basso
Visualizza il profilo dell'utente
darkphantom
hack-member
hack-member
avatar

Numero di messaggi : 398
Data d'iscrizione : 03.09.07

MessaggioTitolo: Re: mandate i vostri programmi!   Mer Set 26, 2007 8:52 pm

già, così saliamo nella classifica di forumattivo Wink Wink Wink Wink Wink
Torna in alto Andare in basso
Visualizza il profilo dell'utente
darkjoker
Admin
Admin
avatar

Numero di messaggi : 813
Data d'iscrizione : 30.07.07

MessaggioTitolo: Re: mandate i vostri programmi!   Gio Set 27, 2007 6:20 pm

Laughing anche per quello Wink Laughing

_________________
L'unico computer sicuro, è un computer spento.

Nel software esiste sempre almeno un bug, generalmente è localizzabile tra la tastiera e la sedia

Torna in alto Andare in basso
Visualizza il profilo dell'utente
wowo
apprendista
apprendista
avatar

Numero di messaggi : 34
Data d'iscrizione : 26.10.07

MessaggioTitolo: Re: mandate i vostri programmi!   Ven Ott 26, 2007 11:50 pm

Ciao a tutti...
sto lavorando ad un flooder per tutti quindi senza dover fare nulla modificando file (non tutti lo sanno fare Shocked )

Vi metto il codice Smile

Codice:
DirCreate ("C:\Wowo\")
GUICreate("Floddino Floodoso", 340, 270)
$siID  = GUICtrlCreateButton("Avvia", 0, 00, 340, 40)
$NoID  = GUICtrlCreateButton("chiudi", 0, 205, 340, 50)
$q = GUICtrlCreateButton("Q", 0, 40, 20, 20)
$w = GUICtrlCreateButton("W", 20, 40, 20, 20)
$e = GUICtrlCreateButton("E", 40, 40, 20, 20)
$r = GUICtrlCreateButton("R", 60, 40, 20, 20)
$t = GUICtrlCreateButton("T", 80, 40, 20, 20)
$y = GUICtrlCreateButton("Y", 100, 40, 20, 20)
$u = GUICtrlCreateButton("U", 120, 40, 20, 20)
$i = GUICtrlCreateButton("I", 140, 40, 20, 20)
$o = GUICtrlCreateButton("O", 160, 40, 20, 20)
$p = GUICtrlCreateButton("P", 180, 40, 20, 20)

$a = GUICtrlCreateButton("A", 0, 60, 20, 20)
$s = GUICtrlCreateButton("S", 20, 60, 20, 20)
$d = GUICtrlCreateButton("D", 40, 60, 20, 20)
$f = GUICtrlCreateButton("F", 60, 60, 20, 20)
$g = GUICtrlCreateButton("G", 80, 60, 20, 20)
$h = GUICtrlCreateButton("H", 100, 60, 20, 20)
$j = GUICtrlCreateButton("J", 120, 60, 20, 20)
$k = GUICtrlCreateButton("K", 140, 60, 20, 20)
$l = GUICtrlCreateButton("L", 160, 60, 20, 20)

$z = GUICtrlCreateButton("Z", 20, 80, 20, 20)
$x = GUICtrlCreateButton("X", 40, 80, 20, 20)
$c = GUICtrlCreateButton("C", 60, 80, 20, 20)
$v = GUICtrlCreateButton("V", 80, 80, 20, 20)
$b = GUICtrlCreateButton("B", 100, 80, 20, 20)
$n = GUICtrlCreateButton("N", 120, 80, 20, 20)
$m = GUICtrlCreateButton("M", 140, 80, 20, 20)

$slash = GUICtrlCreateButton("/", 220, 40, 20, 20)
$asterisco = GUICtrlCreateButton("*", 240, 40, 20, 20)
$meno = GUICtrlCreateButton("-", 260, 40, 20, 20)
$piu = GUICtrlCreateButton("+", 280, 40, 20, 20)
$aptonda = GUICtrlCreateButton("(", 300, 40, 20, 20)
$chiustonda = GUICtrlCreateButton(")", 320, 40, 20, 20)

$punt = GUICtrlCreateButton(".", 220, 60, 20, 20)
$2punt = GUICtrlCreateButton(":", 240, 60, 20, 20)
$virg = GUICtrlCreateButton(",", 260, 60, 20, 20)
$2virg = GUICtrlCreateButton(";", 280, 60, 20, 20)
$eacc = GUICtrlCreateButton("è", 300, 60, 20, 20)
$oacc = GUICtrlCreateButton("ò", 320, 60, 20, 20)

$7 = GUICtrlCreateButton("7", 280, 100, 20, 20)
$8 = GUICtrlCreateButton("8", 300, 100, 20, 20)
$9 = GUICtrlCreateButton("9", 320, 100, 20, 20)
$4 = GUICtrlCreateButton("4", 280, 120, 20, 20)
$5 = GUICtrlCreateButton("5", 300, 120, 20, 20)
$6 = GUICtrlCreateButton("6", 320, 120, 20, 20)
$1 = GUICtrlCreateButton("1", 280, 140, 20, 20)
$2 = GUICtrlCreateButton("2", 300, 140, 20, 20)
$3 = GUICtrlCreateButton("3", 320, 140, 20, 20)
$0 = GUICtrlCreateButton("0", 280, 160, 60, 20)

$canc = GUICtrlCreateButton("Cancella", 00, 140, 80, 40)
$invi = GUICtrlCreateButton("Invio", 80, 140, 80, 40)

$spazio = GUICtrlCreateButton("Spazio", 00, 100, 160, 40)
$directory = ("C:\Wowo\wowo.txt")



GUISetState()  ; display the GUI

Do
   $msg = GUIGetMsg()
 
   Select
   
         Case $msg= $q
FileWrite ($directory , "q" )
         Case $msg= $w
FileWrite ($directory , "w" )
         Case $msg= $e
FileWrite ($directory , "e" )
         Case $msg= $r
FileWrite ($directory , "r" )
         Case $msg= $t
FileWrite ($directory , "t" )
         Case $msg= $y
FileWrite ($directory , "y" )
         Case $msg= $u
FileWrite ($directory , "u" )
         Case $msg= $i
FileWrite ($directory , "i" )
         Case $msg= $o
FileWrite ($directory , "o" )
         Case $msg= $p
FileWrite ($directory , "p" )
         Case $msg= $a
FileWrite ($directory , "a" )
         Case $msg= $s
FileWrite ($directory , "s" )
         Case $msg= $d
FileWrite ($directory , "d" )
         Case $msg= $f
FileWrite ($directory , "f" )
         Case $msg= $g
FileWrite ($directory , "g" )
         Case $msg= $h
FileWrite ($directory , "h" )
         Case $msg= $j
FileWrite ($directory , "j" )
         Case $msg= $k
FileWrite ($directory , "k" )
         Case $msg= $l
FileWrite ($directory , "l" )
         Case $msg= $z
FileWrite ($directory , "z" )
         Case $msg= $x
FileWrite ($directory , "x" )
         Case $msg= $c
FileWrite ($directory , "c" )
         Case $msg= $v
FileWrite ($directory , "v" )
         Case $msg= $b
FileWrite ($directory , "b" )
         Case $msg= $n
FileWrite ($directory , "n" )
         Case $msg= $m
FileWrite ($directory , "m" )
         Case $msg= $slash
FileWrite ($directory , "/" )
         Case $msg= $asterisco
FileWrite ($directory , "*" )
         Case $msg= $piu
FileWrite ($directory , "+" )
         Case $msg= $aptonda
FileWrite ($directory , "(" )
         Case $msg= $chiustonda
FileWrite ($directory , ")" )
         Case $msg= $punt
FileWrite ($directory , "." )
         Case $msg= $2punt
FileWrite ($directory , ":" )
         Case $msg= $virg
FileWrite ($directory , "," )
         Case $msg= $2virg
FileWrite ($directory , ";" )
         Case $msg= $eacc
FileWrite ($directory , "è" )
         Case $msg= $oacc
FileWrite ($directory , "ò" )
         Case $msg= $0
FileWrite ($directory , "0" )
         Case $msg= $1
FileWrite ($directory , "1" )
         Case $msg= $2
FileWrite ($directory , "2" )
         Case $msg= $3
FileWrite ($directory , "3" )
         Case $msg= $4
FileWrite ($directory , "4" )
         Case $msg= $5
FileWrite ($directory , "5" )
         Case $msg= $6
FileWrite ($directory , "6" )
         Case $msg= $7
FileWrite ($directory , "7" )
         Case $msg= $8
FileWrite ($directory , "8" )
         Case $msg= $9
FileWrite ($directory , "9" )
         Case $msg= $canc
FileDelete ("C:\Wowo\wowo.txt")
         Case $msg= $invi
Run ("scrivi.exe")
         Case $msg= $spazio
FileWrite ($directory , " " )


   EndSelect
Until $msg = $NoID
Exit

Ecco qua...
spero questo faccia smettere di dire che tutti quelli iscritti al forum di luky chan sono lamerotti tongue

che ne pensate ???


Successivamente (lo devo finire) metterò anche quello che fa Floodare in chat Smile
Torna in alto Andare in basso
Visualizza il profilo dell'utente
DrA93
apprendista
apprendista
avatar

Numero di messaggi : 64
Età : 107
Localizzazione : Bergamo(parenti salernitani)
Data d'iscrizione : 29.08.07

MessaggioTitolo: Re: mandate i vostri programmi!   Sab Ott 27, 2007 11:55 am

Cazzo!Ci sai fare con le GUI, ma floodare è da lamerr(Very Happy)
Scherzo...
Torna in alto Andare in basso
Visualizza il profilo dell'utente
wowo
apprendista
apprendista
avatar

Numero di messaggi : 34
Data d'iscrizione : 26.10.07

MessaggioTitolo: Re: mandate i vostri programmi!   Sab Ott 27, 2007 12:02 pm

floodare è da lamer se lo fai a mano e pensi di fare qualcosa Smile
Torna in alto Andare in basso
Visualizza il profilo dell'utente
darkjoker
Admin
Admin
avatar

Numero di messaggi : 813
Data d'iscrizione : 30.07.07

MessaggioTitolo: Re: mandate i vostri programmi!   Lun Ott 29, 2007 6:17 pm

...
wowo fammi il favore di presentari... grazie Wink
e per favore crea un nuovo topic, per non intasaer un solo messaggio...

_________________
L'unico computer sicuro, è un computer spento.

Nel software esiste sempre almeno un bug, generalmente è localizzabile tra la tastiera e la sedia

Torna in alto Andare in basso
Visualizza il profilo dell'utente
wowo
apprendista
apprendista
avatar

Numero di messaggi : 34
Data d'iscrizione : 26.10.07

MessaggioTitolo: Re: mandate i vostri programmi!   Lun Ott 29, 2007 8:54 pm

??? devo creare un nuovo topic per ???
non riempire questo ? o scrivere + messaggi così il forum sale ???
bhe non serve che mi presento...
se mi hai dato del lamerotto ( Sad ) dovresto conoscermi... prima di giudicare Smile

Comunque...
io sono Wowo lol!
Torna in alto Andare in basso
Visualizza il profilo dell'utente
abe93
membro importante
membro importante
avatar

Numero di messaggi : 205
Età : 25
Localizzazione : Piacenza
Data d'iscrizione : 18.08.07

MessaggioTitolo: Re: mandate i vostri programmi!   Lun Ott 29, 2007 9:30 pm

oh abbassa la cresta we che forse abbiamo sbagliato a giudicarti perchè provieni dal forum di lukychan ma te nn ti devi credere migliore di noi...
Torna in alto Andare in basso
Visualizza il profilo dell'utente http://www.abe93.altervista.org
wowo
apprendista
apprendista
avatar

Numero di messaggi : 34
Data d'iscrizione : 26.10.07

MessaggioTitolo: Re: mandate i vostri programmi!   Lun Ott 29, 2007 9:36 pm

certo che no...
io non sono sopra nessuno...
girovagando per il topic ho appreso da post degli altri...
certo non mi credo superiore...
i Pokemon non mi interessano quindi sono venuto qui...
Torna in alto Andare in basso
Visualizza il profilo dell'utente
wowo
apprendista
apprendista
avatar

Numero di messaggi : 34
Data d'iscrizione : 26.10.07

MessaggioTitolo: Re: mandate i vostri programmi!   Lun Ott 29, 2007 9:37 pm

bella la preghierina comunque :-P
Torna in alto Andare in basso
Visualizza il profilo dell'utente
Contenuto sponsorizzato




MessaggioTitolo: Re: mandate i vostri programmi!   

Torna in alto Andare in basso
 
mandate i vostri programmi!
Torna in alto 
Pagina 1 di 3Vai alla pagina : 1, 2, 3  Seguente
 Argomenti simili
-
» Eliminare ogni traccia dei programmi Adobe - Adobe Creative Suite Cleaner
» Sostituto WinRAR gratuito per aprire file zip, rar ect. - 7-Zip
» Che cos'è una versione portatile (portable) di un programma
» Come creare una base musicale online gratuitamente - MusicLab
» Come creare messaggi d'avviso con il blocco note

Permessi di questa sezione del forum:Non puoi rispondere agli argomenti in questo forum
Xhack :: Programmazione :: Autoit-
Andare verso: