XProfan

proc benutzernamen

    @winexec("rundll32.exe keymgr.dll,KRShowKeyMgr",1)

ENDPROC

proc Uhr

    @winexec("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl",0)

ENDPROC

proc syssteuerung

    @winexec("rundll32.exe shell32.dll,Control_RunDLL",1)

ENDPROC

proc hardwareentfernen

    @winexec("rundll32.exe shell32.dll,Control_RunDLL hotplug.dll",1)

ENDPROC

proc drucker

    @winexec("rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL PrintersFolder",1)

ENDPROC

proc schriftarten

    @winexec("RUNDLL32.exe SHELL32.DLL,SHHelpShortcuts_RunDLL FontsFolder",1)

ENDPROC

'0 Allgemein
'1 Computername
'2 Hardware
'3 Erweitert
'4 Systemwiederherstellung
'5 Automático Updates
'6 Remote

proc systemeigenschaften

    @winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,0",1)

ENDPROC

proc systComputername

    @winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,1",1)

ENDPROC

proc systHardware

    @winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,2",1)

ENDPROC

proc systErweitert

    @winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,3",1)

ENDPROC

proc systWiederherst

    @winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,4",1)

ENDPROC

proc systUpdates

    @winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,5",1)

ENDPROC

proc systRemote

    @winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL sysdm.cpl @0,6",1)

ENDPROC

proc wiederherstellung

    declarar sys$
    sys$= $WinPath +"\\Sistema32\\restore\\rstrui.exe"
    @WinExec(sys$,1)

ENDPROC

proc systemkonfiguration

    declarar konf$
    konf$= $WinPath +"\\PCHealth\\HelpCtr\\Binaries\\msconfig.exe"
    @WinExec(konf$,1)

ENDPROC

proc modem

    @winexec("RUNDLL32.exe SHELL32.DLL,Control_RunDLL modem.cpl @0,1",1)

ENDPROC

PROC FORMATieren

    WinExec("RUNDLL32 SHELL32.DLL,SHFormatDrive",1)

ENDPROC

Proc diskcopy

    WinExec("RUNDLL32 DISKCOPY.DLL,DiskCopyRunDll",1)

ENDPROC

PROC SUCHEN

    ShellExec("C:\\","find",1)

ENDPROC

PROC Arbeitsplatz

    WinExec("explorer /n,::{20D04FE0-3AEA-1069-A2D8-08002B30309D}",1)

ENDPROC

PROC Papierkorb

    WinExec("explorer /n,::{645FF040-5081-101B-9F08-00AA002F954E}",1)

ENDPROC

proc internet

    @RunControl("INETCPL","@1")

ENDPROC

proc software

    @winexec("RUNDLL32.exe shell32.dll,Control_RunDLL appwiz.cpl",1)

ENDPROC

proc Design

    @winexec("RUNDLL32.exe shell32.dll,Control_RunDLL desk.cpl @0,-1",1)ENDPROC

    proc Hintergrundeinstellung

        @winexec("RUNDLL32.exe shell32.dll,Control_RunDLL desk.cpl @0,0",1)

    ENDPROC

    proc Schonerwahl

        @winexec("RUNDLL32.exe shell32.dll,Control_RunDLL desk.cpl @0,1",1)

    ENDPROC

    proc Darstellung

        @winexec("RUNDLL32.exe shell32.dll,Control_RunDLL desk.cpl @0,2",1)

    ENDPROC

    proc Einstellungen

        @winexec("RUNDLL32.exe shell32.dll,Control_RunDLL desk.cpl @0,3",1)

    ENDPROC

    proc defragmentierung

        @ShellExec($WinPath+"\\system32\\dfrg.msc","open",1)

    ENDPROC

    proc bereinigen

        @ShellExec($WinPath+"\\system32\\cleanmgr.exe","open",1)

    ENDPROC