XProfan

Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt:
Speicherbereich mit Nullbytes füllen
Def @Zeromemory(2) ! Kernel32,RtlZeroMemory
Declare Bereich#
Dim Bereich#,4
Long Bereich#,0=8672488
Print @Long(Bereich#,0)
@Zeromemory(Bereich#,4)
Print @Long(Bereich#,0)
Waitinput