Проблема с программой

[bboba]

Задача:

На языке ассемблер написать программу, обеспечивающую 10 цыклов поочередного включения по 1 секунде индикаторов Num, Caps, Scroll.

Программа писалась в турбо паскале. Но при компиляции пишет:

Error 10: Unexpected end of file.

Вот код программы:

begin
asm

@m: in AL, 64h
and AL, 2
JNZ @m

mov dx, 10

@m2: mov AL, 0edh
out 60h, AL
mov AL, 1
out 60h, AL

mov AX, 40h
mov ES, AX
mov AL, ES:[6ch]
add AL, 18

@m21: cmp AL, ES:[6ch]
JNZ @m21

mov AL, 0edh
out 60h, AL
mov AL, 2
out 60h, AL

mov AX, 40h
mov ES, AX
mov AL, ES:[6ch]
add AL, 18

@m22: cmp AL, ES:[6ch]
JNZ @m22

mov AL, 0edh
out 60h, AL
mov AL, 4
out 60h, AL

mov AX, 40h
mov ES, AX
mov AL, ES:[6ch]
add AL, 18
@m23: cmp AL, ES:[6ch]
JNZ @m23

dec dx
JNZ @m2

mov AL, 0edh
out 60h, AL
mov AL, 0
out 60h, AL

end
end

[MalCer]

mov EX, AX

Я не знал про регистр ex

Unexpected end of file

Вам даже компилятор подсказывает: неожиданный конец файла, значит(ИМХО!!!) где-то зациклились

[bboba]

ну а вот где?

З.Ы. EX - банальная опечатка уже тут, а не в паскале)

[bboba]

вобще разобрался почему на конец жалуется. теперь запускается..

Но на лицо следующая проблема - нифига клавиатура не мигает((

[MalCer]

Посмотри вот эту тему

[Goodwin98]

У себя на XP я ни одним програмным способом не заставил клаву мигать. Только под win98 и досом. Так что программа работает может и правильно, но виртуальная машина в XP это только эмулирует.

[bboba]

MalCer

Хм...сама суть мигания понятна... вот только не знаю как правильно сделать чтоб было 10 цыклов, а лампочки по секунде

[bboba]

Вобщем всем спасибо кто помогал) я разобрался... надо было просто через Virtual PC запускать)

[MagicChel]

Я тоже подумал о трамблере, но сняв крышку, увидел, что он не имеет ничего общего ни с Вазовскими ни с москвичевскими. Не видно ни датчика Холла ни прерывателя, не ясно где подшипнин, одним словом не знаю я этот трамблер. Может ти быть проблема в коммутаторе?