Page 1 of 1

YM test

PostPosted: 07 Mar 2009, 01:03
by KOE
Есть ли сабж? Нужна очень программа для отладки и калибровки. Типа чтоб можно было разные звуки и эффекты выводить, частоты подстраивать. Всякие pro-trackerы мне предлягать бесполезно, я ими пользоваться не умею и не хочу учиться.

Re: YM test

PostPosted: 07 Mar 2009, 09:34
by нолька
нет таких прог

Re: YM test

PostPosted: 07 Mar 2009, 14:35
by deathsoft
Попробуй на бейсике 128 напиши простенькую прогу, там же есть операторы какието по выводу звука на AY. Ну или на асме прогу напиши, которая выводит все что надо и управляется с клавиатуры.

Re: YM test

PostPosted: 07 Mar 2009, 17:50
by нолька
проще уж протрекер чем асм biggrin

Re: YM test

PostPosted: 07 Mar 2009, 18:53
by DDp
zx-васик рулит :-D
Code: Select all
    10 INK 0:PAPER 7:BRIGHT 0:BORDER 7:CLS
         30 LET R=65533:LET D=49149
         40 OUT r,7:OUT d,62
         50 LET G=1750000/16
         60 REM  F(clock AY)=1.75 MHz
         70 INPUT "F(Hz)=";F:IF F>G OR F<g/4095 THEN GO TO 70
         80 LET a=INT (G/f+.5):LET a1=INT (a/256):LET a0=(a-a1*256)
         90 OUT r,0:OUT d,a0
        100 OUT r,1:OUT d,a1
        110 OUT r,8:OUT d,15
        120 PRINT "  ";G/(a-1)'"F=";G/a;" Hz"'"  ";G/(a+1)
        130 PRINT ''''a;"  -  ";a1;" , ";a0
        140 PAUSE 0:CLS
        150 OUT r,8:OUT d,0
        160 GO TO 70

Вводим частоту,
AY пищит в канал A ближайшую, какую может.
Показываются "соседние" возможные частоты.
Показывается значение делителя целиком и по-байтам.

Если тактовая AY не 1.75 МГц изменить строчку 50.