FreeBasic
Главная
Вход
Регистрация
Среда, 16.10.2024, 07:44Приветствую Вас Гость | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Информация о процессоре
haavДата: Четверг, 09.10.2014, 18:54 | Сообщение # 1
Генералиссимус
Группа: Администраторы
Сообщений: 1366
Репутация: 49
Статус: Offline
Информация о процессоре


Код
Dim As ZString*5  iBuf0 ,iBuf1 , ibuf2, ibuf3

For i As Integer = &h80000002 To &h80000004
        Asm
            pushad
            mov eax, [i]
            cpuid
            mov [iBuf0] , Eax
            mov [iBuf1] , Ebx
            mov [iBuf2] , Ecx
            mov [iBuf3] , Edx
            popad
        End Asm
        ? iBuf0;iBuf1;iBuf2;iBuf3;
Next
Sleep


Вы сохраняете власть над людьми покуда оставляете им что-то…Отберите у человека все, и этот человек уже будет неподвластен вам…
 
AlecДата: Четверг, 09.10.2014, 20:53 | Сообщение # 2
Лейтенант
Группа: Друзья
Сообщений: 73
Репутация: 1
Статус: Offline
Интересно... так просто, через ассемблер. И в общем-то несложный код. Уже давно скачал книгу с этого форума об ассемблере, надо на досуге почитать.

WorldSim3D - 3D движок для FreeBasic, для PC. Мощная 3D графика и простота программирования. Ознакомиться.
 
  • Страница 1 из 1
  • 1
Поиск: