пищалка, точнее ее прога

[Ant1971on]

Я конечно не спец, но по моему у него что-то не так с организацией задержки. Повторил его программу, но задержку сделал таким образом:

	MOV CX,60000

EXTERN:

	PUSH CX
	MOV CX,50000

INNER:

	LOOP INNER
	POP CX
	LOOP EXTERN

Все работает, правда не стал вычислять точное значение параметров для
циклов задержки, они наверное для каждой машины должны быть свои, зависят от частоты процессора, у меня секунды 2-3 динамик пищит.

[my_sappho_story]

И куда это

MOV CX,60000

EXTERN:

PUSH CX
MOV CX,50000

INNER:

LOOP INNER
POP CX
LOOP EXTERN

в коде вставлять? Чтобы оно пищало и не надо было

1) или писать драйвер режима ядра
2) или запускать машину загрузив на нее DOS с дискетки или флешки и уже под чистым DOS твоя программа заработает

Программка должна же как то все таки издавать звуки в WinXP...

[Ant1971on]

Вместо вот этого:

mov ECX,200000000	           ;(10) Задержка ~ 4 с 
delay: db 67h 		           ;(11) Префикс изменения размера адреса 
loop delay

[my_sappho_story]

Эффект тот же. Првда, чуть дольше черный экранчик, а потом тоже окно

Terminated, exit code 48

Из-за чего оно не кричит? Что сделать?

[Ant1971on]

Вот полностью вариант, как я делал(com-файл):

CODE_SEG SEGMENT

ASSUME CS:CODE_SEG

	ORG 100h

START:

	MOV AL,0B6h
	OUT 43h,AL
		
	MOV AX,995
	OUT 42h,AL
	MOV AL,AH
	OUT 42h,AL
       	IN AL,61h
	OR AL,3
	OUT 61h,AL

	PUSH CX
	MOV CX,60000

_EXTERN:

	PUSH CX
	MOV CX,50000

INNER:

	LOOP INNER
	POP CX
	LOOP _EXTERN
	POP CX

	AND AL,11111100b
	OUT 61h,AL

	INT 20h

CODE_SEG ENDS

END START

Компилировал в MASM 6.11:

MASM SOUND.ASM
LINK SOUND;
EXE2BIN SOUND SOUND.COM

Если снова не получится, тогда сдаюсь

[my_sappho_story]

Не кричит. Может это связано с частотой моего компьютера?

[my_sappho_story]

TIME:  MOV ECX, 13Eh
MET:   DEC ECX
          JNZ MET
          RET

13Eh получили из уравнения
Td=Tcall+Tmov+X*(Tdec+Tjnz)+Tret,
где Tcall и Tret – время выполнения команд вызова подпрограммы и возврата в нее, а Tmov, Tdec и Tjnz – время на выполнение команд, входящих в подпрограмму TIME
Td=τ(17+7+X(5+10)+10+5)
Td=τ(39+15X)
X=(Td/τ-39)/15
τ=1/f=1/1200=0,000833c
X=(4/0,000833-39)/15=318=13Eh

Чтобы подпрограмма работа 4 секунды и издавала звуки с частотой 1200Гц как нужно еще дооформлять код программы?