Как получить адрес kernel32.dll

Как-то так, например

HMODULE FindKernel32Base() {
  auto teb = (PTEB)__readfsdword(0x18);
  auto link = teb->ProcessEnvironmentBlock->Ldr->InMemoryOrderModuleList.Flink;
  for (;;) {
    auto entry = PLDR_DATA_TABLE_ENTRY((char*)link - offsetof(LDR_DATA_TABLE_ENTRY, InMemoryOrderLinks));
    auto expected = "kernel32.dll";
    auto name = entry->FullDllName.Buffer + entry->FullDllName.Length / 2 - strlen(expected);
    while ((*name++ | 32) == *expected++ && *expected);  // strcasecmp
    if (*expected == '\0') {
      return (HMODULE)entry->DllBase;
    }
    link = entry->InMemoryOrderLinks.Flink;
  }
}

Вместо того, чтобы полагаться на индекс, следует сделать полноценный поиск по InLoadOrderModuleList. Поле FullDllName в LDR_DATA_TABLE_ENTRY содержит имя модуля. Вместо всяких strcmp достаточно сравнить 1-2 DWORD'а.