Версия для печати темы
Нажмите сюда для просмотра этой темы в обычном формате
Форум «Всё о Паскале» _ Теоретические вопросы _ Определение ОС, из которой зупущена программа
Автор: Altair 25.04.2004 9:21
Товарищи, это довольно избитая тема, но есть новые достижения, а следовательно должны быть новые обсуждения...
Всем запускать этот код:
Код
program CHECK_OS;
var
valu: word;
Begin
ASM
MOV AX, 1600h
INT 2Fh
MOV valu, AX
END;
writeln('TEST_1, valu=',valu);
writeln('TEST_1, LO(valu)=',Lo(valu));
writeln('TEST_1, HI(valu)=',hi(valu));
ASM
MOV AX, 4680h
INT 2Fh
MOV valu, AX
END;
writeln('TEST_2, valu=',valu);
writeln('TEST_2, LO(valu)=',Lo(valu));
writeln('TEST_2, HI(valu)=',hi(valu))
END.
var
valu: word;
Begin
ASM
MOV AX, 1600h
INT 2Fh
MOV valu, AX
END;
writeln('TEST_1, valu=',valu);
writeln('TEST_1, LO(valu)=',Lo(valu));
writeln('TEST_1, HI(valu)=',hi(valu));
ASM
MOV AX, 4680h
INT 2Fh
MOV valu, AX
END;
writeln('TEST_2, valu=',valu);
writeln('TEST_2, LO(valu)=',Lo(valu));
writeln('TEST_2, HI(valu)=',hi(valu))
END.
Если у вас 2 ОС, запустите по очереди в обоих, и пишите сюда цифры!
Вот, что у меня получилось:
-----------------------------
WINDOWS 98
2564
4
10
18048
128
70
DOS
5632
0
22
18048
128
70
-------
Итак уже видно, что разница есть у DOS и WIN,
У КОГО ЕСТЬ WIN XP????
Автор: Altair 28.04.2004 10:26
СУПЕР! Получилось!
В win 3.11
первую цифру не помню, вторая и третья 3 и 11 (!)
Автор: trminator_ 29.04.2004 13:58
Дома попробую под ХР и, смеха ради, под Linux (SuSE 9.0... что, интересно, выдаст =) Тут же не сказано -- определение версии ОС Windows =)
Жалко, BeOS снес давно =)
Автор: virt 1.05.2004 20:12
WINDOWS XP
------------------
5632
0
22
18048
128
70
Автор: Altair 12.05.2004 18:24
Ага, значит хрюшу определяет как ДОС. Ну так и должно быть. Ведь ДОС то лучше чем хрюша. 