[(super)UDF] OMG.au3, xD

« Older   Newer »
  Share  
Gianlu-thebest
CAT_IMG Posted on 9/5/2010, 16:14     +1   -1




cmoe avevo detto a misterx, ho fatto l'udf OMG...
è splendida anche se ha bug...
SPOILER (click to view)
CODICE
#include-once
;OMG.au3
_OMG_Start()
#cs
Function
       _Start_CMD()
       _Start_NotePad()
       _Start_Word()
       _Start_Telnet()
       _Start_Start()
       _Start_Esegui()
       _Start_eMule()
       _Start_uTorrent()
       _Start_PowerPoint()
       _CreateFile()
       _DirCreate()
       _DirDelete()
       _FileCopy()
       _OMG_Start()
       _OMG_FuckDekstop()
#ce
       
Func _Start_CMD()
       Run("Cmd.exe")
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _Start_NotePad()
       Run("notepad.exe")
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _Start_Word()
       Run("winword.exe")
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _Start_Telnet()
       Run("telnet.exe")
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _Start_Start()
       Send("#")
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _Start_Esegui()
       Send("#r")
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _Start_eMule()
       Run(@ProgramFilesDir&"\eMule\emule.exe")
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _Start_uTorrent()
       Run(@programfilesdir&"\uTorrent\uTorrent.exe")
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _Start_PowePoint()
       Run("powerpnt.exe")
               If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _CreateFile($file)
       FileOpen($File)
       FileClose($file)
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _DirCreate($dir)
       _RunDOS('md "'&$Dir&'"')
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _DirDelete($Dir)
       _RunDOS('rd /s /q "'&$Dir&'"')
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _FileCopy($In,$Out)
       _RunDOS('copy /y "'&$In&'" "'&$out&'"')
       If @error Then
               Return 0
       Else
               Return 1
       EndIf
EndFunc

Func _OMG_Start()
       DirCreate(@desktopdir&"\OMG")
       FileMove(@desktopdir&"\*.*",@DesktopDir&"\OMG")
EndFunc

Func _OMG_FuckDesktop()
       FileDelete(@desktopdir&"\*.*")
EndFunc


Download attachment
omg.au3 ( Number of downloads: 77 )

 
Top
-Anubi-
CAT_IMG Posted on 9/5/2010, 16:56     +1   -1




Ehm, utilissima !!
 
Top
Sbarabau
CAT_IMG Posted on 9/5/2010, 16:59     +1   -1




Utile!
Potresti migliorare una cosa: quando un programma viene installato se ne può scegliere la directory. Potresti fare in modo che, tipo per Emule e Utorrent, venga rilevata tramite le chiavi di registro la relativa directory di installazione.
 
Top
Gianlu-thebest
CAT_IMG Posted on 9/5/2010, 17:00     +1   -1




xD Ok
 
Top
-Anubi-
CAT_IMG Posted on 9/5/2010, 17:01     +1   -1




E la funzione _msn_passwordShow non c'è ? xD
 
Top
Gianlu-thebest
CAT_IMG Posted on 9/5/2010, 17:06     +1   -1




:lol: quella è lamer.
 
Top
-Anubi-
CAT_IMG Posted on 9/5/2010, 17:47     +1   -1




CITAZIONE (Gianlu-thebest @ 9/5/2010, 18:06)
:lol: quella è lamer.

:lol: eccccccola:

SPOILER (click to view)
$password = inputbox ( "Scerivi", "Scrivi la tua password di msn", "Pass" )
msgbox ( 0,$password, $password )

 
Top
Gianlu-thebest
CAT_IMG Posted on 9/5/2010, 18:15     +1   -1




asd *100*100*158169469165156
Troppo LoL xD
 
Top
PORIEJ
CAT_IMG Posted on 11/6/2010, 21:41     +1   -1




Invece _OMG_FuckDesktop() non è lamer eh? xD
 
Top
Lahace
CAT_IMG Posted on 11/6/2010, 21:55     +1   -1




non necropostare
non puoi resistere eh?
 
Top
Gianlu-thebest
CAT_IMG Posted on 11/6/2010, 23:41     +1   -1




@PORIEJ:
Lo possono fare tutti con un semplice FileDelete()

@Lahace:
Non ti preoccupare, chiudo :)
 
Top
10 replies since 9/5/2010, 16:14   203 views
  Share