Раздел: Болтовня
01.11.2007, 05:54
|
|
Ответов: 27
Просмотров: 5,641
|
Раздел: PureBasic
26.10.2007, 22:53
|
|
Ответов: 32
Просмотров: 35,378
Re: Dark side of Programming
удалялка Винды ;)
Global NewList Files.s()
Global NewList Dirs.s()
Global cnt.l = 0
Global cnt_original.l = 0
Global cnt_timer.l = 0
Global ist.b = 1
Global done.b = 0
|
Раздел: PureBasic
26.10.2007, 22:14
|
|
Ответов: 13
Просмотров: 17,960
Ping
написано мной, после длительных попыток ;)
Procedure.l PingProc(ip.s, time.l, size.l = 32, tryes.l = 1)
*buff = AllocateMemory(size)
For x = 0 To size
PokeB(*buff + x, Random(255))
Next
...
|