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

[my_sappho_story]

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

Там что-то связано с машинным циклом, тактом, нужно программно сформировать временный интервал, но как все это придумать полность и как записать программно?

[Stilet]

Для Win32 программа?

[bondik]

Что темы плодите http://programmersforum.ru/showthread.php?t=118159

#include <conio.h>
#include <dos.h>
#include <stdio.h>

#define do 261
#define re 293
#define mi 329
#define fa 349
#define sol 392
#define lya 440
#define si 493

void main()
{
clrscr();





int song[100] = {mi,sol,sol,mi,lya,sol,lya,sol,lya,sol,lya,sol,lya,si};
int dlit[100]=   {3, 4,   3, 4,  2, 2,  2 , 2  ,2   ,2 , 2 ,2,  2,  4};

for (int i=0;i<14;i++)
{
outp(0x43,0xb6); //101 101 10

unsigned int del=1193180/song[i];

outp(0x42,(del & 0x00FF)); //low

outp(0x42,(del >> 8)); //hi

unsigned int read=inp(0x61);
outp(0x61,(read | 3));

																for(int a=1;a<dlit[i];a++){
							 _asm {

				 MOV CX, 0002h
				 MOV DX, 80DEh
				 MOV AH, 86h
				 INT 15h
								 };

}

outp(0x61,(read & 252));
															 for(a=1;a<dlit[i];a++){
								 _asm {

				 MOV CX,0000h
				 MOV DX,5B8Dh
				 MOV AH, 86h
			   INT 15h
                          };

}

}


	
getch();
}

[my_sappho_story]

Почему для вот этого кода:

DOSSEG
.MODEL SMALL
.STACK 100h
.DATA 
.CODE
						;Установим режим таймера 
	mov AL,0B6h 		;(1) Какал 2, режим 3, вид операции 3 
	out 43h,AL 			;(2) B регистр команд 
						;Установим частоту канала 2 таймера 
	mov АХ, 995 		;(3) 193000 Гц/995=1200 Гц 
	out 42h,AL 			;(4) Младший байт константы в порт 
	mov AL,AH 			;(5) АL=старший байт константы 
	out 42h,AL 			;(6) Старший байт константы в порт 
						;Bключим динамик и разрешим таймер 
	in AL,61h 			;(7) Bведем содержимое порта 61h 
	or AL,3 			;(8) Установим биты 0 и 1 
	out 61h,AL 			;(9) Выведем в порт 
						;После задержки выключим динамик и запретим таймер 
	mov ECX,200000000	;(10) Задержка ~ 4 с 
	delay: db 67h 		;(11) Префикс изменения размера адреса 
	loop delay 			;(12) Цикл 
	and AL,11111100b	;(13) Сбросим в AL биты 0 и 1 
	out 61h,AL 			;(14) Выведем в порт 
	
MOV AH,4Ch
INT 21h
END

возникают ошибки

mov АХ, 995 ;(3) 193000 Гц/995=1200 Гц
**Error** stgz.asm(10) Too few operands to instruction
mov АХ, 995 ;(3) 193000 Гц/995=1200 Гц
*Warning* stgz.asm(10) Argument needs type override
mov ECX,200000000 ;(10) Задержка ~ 4 с
**Error** stgz.asm(19) Undefined symbol: ECX

Как исправить? Кто-то может подсказать?

[my_sappho_story]

Почему для вот этого кода:

DOSSEG
.MODEL SMALL
.STACK 100h
.DATA 
.CODE
						;Установим режим таймера 
	mov AL,0B6h 		;(1) Какал 2, режим 3, вид операции 3 
	out 43h,AL 			;(2) B регистр команд 
						;Установим частоту канала 2 таймера 
	mov АХ, 995 		;(3) 193000 Гц/995=1200 Гц 
	out 42h,AL 			;(4) Младший байт константы в порт 
	mov AL,AH 			;(5) АL=старший байт константы 
	out 42h,AL 			;(6) Старший байт константы в порт 
						;Bключим динамик и разрешим таймер 
	in AL,61h 			;(7) Bведем содержимое порта 61h 
	or AL,3 			;(8) Установим биты 0 и 1 
	out 61h,AL 			;(9) Выведем в порт 
						;После задержки выключим динамик и запретим таймер 
	mov ECX,200000000	;(10) Задержка ~ 4 с 
	delay: db 67h 		;(11) Префикс изменения размера адреса 
	loop delay 			;(12) Цикл 
	and AL,11111100b	;(13) Сбросим в AL биты 0 и 1 
	out 61h,AL 			;(14) Выведем в порт 
	
MOV AH,4Ch
INT 21h
END

возникают ошибки

mov АХ, 995 ;(3) 193000 Гц/995=1200 Гц
**Error** stgz.asm(10) Too few operands to instruction
mov АХ, 995 ;(3) 193000 Гц/995=1200 Гц
*Warning* stgz.asm(10) Argument needs type override
mov ECX,200000000 ;(10) Задержка ~ 4 с
**Error** stgz.asm(19) Undefined symbol: ECX

Как исправить? Кто-то может подсказать?

[airyashov]

mov ECX,200000000 ;(10) Задержка ~ 4 с

добавить директиву здесь

.CODE
.386

в др случае AX набрано не на английском ASCII

[my_sappho_story]

DOSSEG
.MODEL SMALL
.STACK 100h
.DATA 
.CODE
.386 

;Установим режим таймера 
mov AL,0B6h 		           ;(1) Какал 2, режим 3, вид операции 3 
out 43h,AL 			;(2) B регистр команд 
;Установим частоту канала 2 таймера 
mov AX, 995 		           ;(3) 193000 Гц/995=1200 Гц 
out 42h,AL 			;(4) Младший байт константы в порт 
mov AL,AH 			;(5) АL=старший байт константы 
out 42h,AL 			;(6) Старший байт константы в порт 
;Bключим динамик и разрешим таймер 
in AL,61h 			;(7) Bведем содержимое порта 61h 
or AL,3 			           ;(8) Установим биты 0 и 1 
out 61h,AL 			;(9) Выведем в порт 
;После задержки выключим динамик и запретим таймер 
mov ECX,200000000	           ;(10) Задержка ~ 4 с 
delay: db 67h 		           ;(11) Префикс изменения размера адреса 
loop delay 			;(12) Цикл 
and AL,11111100b	           ;(13) Сбросим в AL биты 0 и 1 
out 61h,AL 			;(14) Выведем в порт 

MOV AH,4Ch
INT 21h
END

Почему-то не кричит!! Ошибок уже не находит, но через несколько мгновений появляется окно с надписью

Terminated, exit code 48

Я уже и не знаю, что с этим делать. Получаю EXE-файл с помощью командной строки. Потом его на TD перетаскиваю. А он не издает ни звука :"(
Что не так делаю?

[Mikl___]

my_sappho_story
На вопрос Stilet "Для Win32 программа?" ты не соизволил ответить, а зря... Далее, программа написана для DOS с использованием портов 42h, 43h, 61h, но запускается эта программа наверняка или под WinXP или под Vista а здесь даже в режиме эмуляции DOS порты работать не будут
решение проблемы:
1) или писать драйвер режима ядра
2) или запускать машину загрузив на нее DOS с дискетки или флешки и уже под чистым DOS твоя программа заработает

[Ant1971on]

Сообщение от Mikl___

в режиме эмуляции DOS порты работать не будут

Странно. У меня в командной строке почему-то пищит.

[Mikl___]

Ant1971on
Под Win95/98 будет работать, а вот my_sappho_story написал:

Получаю EXE-файл с помощью командной строки. Потом его на TD перетаскиваю. А он не издает ни звука :"( Что не так делаю?

Что еще можно посоветовать для дистанционной проверки программы? Откуда я могу знать, что на самом деле происходит у my_sappho_story?