Heres a couple of dll functions for everyone. Including Username, computername, mouse information and processor power(fast or slow)
load dll "User32.dll", 1
CleanBoot = call dll(1, "GetSystemMetrics", 67)
MouseWheel = call dll(1, "GetSystemMetrics", 19)
MouseButtonsCount = call dll(1, "GetSystemMetrics", 43)
MouseButtonsInverted = call dll(1, "GetSystemMetrics", 23)
SlowProcessor = call dll(1, "GetSystemMetrics", 73)
delete dll 1
load dll "advapi32.dll", 1
NameSize = make memory(4)
*NameSize = 255
UserName$ = space$( *NameSize )
result = call dll(1, "GetUserNameA", UserName$, NameSize)
delete memory NameSize
delete dll 1
load dll "Kernel32.dll", 1
NameSize = make memory(4)
*NameSize = 255
ComputerName$ = space$( *NameSize )
result = call dll(1, "GetComputerNameA", ComputerName$, NameSize)
WindowsDir$ = space$( *NameSize )
result = call dll(1, "GetWindowsDirectoryA", WindowsDir$, NameSize)
delete memory NameSize
delete dll 1
print "Username: ";UserName$
print "Computername: ";ComputerName$
print "Windows Directory: ";WindowsDir$
`print "Local Time: ";LocalTime$
if SlowProcessor = 0 then print "Computer has a fast processor"
if SlowProcessor <> 0 then print "Computer has a slow processor"
if CleanBoot = 0 then print "The computer booted normally"
if CleanBoot = 1 then print "The computer booted into Safe mode"
if CleanBoot = 2 then print "The computer booted into Safe mode with networking"
if MouseButtonsInverted = 0 then print "Mouse Buttons Inverted: false"
if MouseButtonsInverted = 1 then print "Mouse Buttons Inverted: true"
if MouseWheel = 0 then print "Mouse Wheel Detected: false"
if MouseWheel = 1 then print "Mouse Wheel Detected: true"
print "Mouse Buttons Count: ";MouseButtonsCount
wait key
Post any useful functions that you use in your games and apps.
