Welcome, Guest. Please login or register.


Author Topic: Általános BASIC Kérdések (Read 423799 times)

Offline Lacika

  • EP addict
  • *
  • Posts: 3191
  • Country: hu
    • http://www.ep128.hu
Re: Általános BASIC Kérdések
« Reply #315 on: 2012.July.07. 22:17:50 »
Azt gondolom mindenki tudja, hogy a 0-ás BASIC program max. 42K lehet, a többi pedig max 32k.
Az viszont nekem új, hogy ezen kívül semmilyen korlátozás nincs a láncolt program méretére! Memóriabõvítõs gépen tehát fantasztikus távlatok nyílnak... Eddig egy 160K-s BASIC programmal próbáltam ki. Ez tetszik!  :ds_icon_cheesygrin:

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Általános BASIC Kérdések
« Reply #316 on: 2012.August.05. 12:26:11 »
A hang nem változik, pont ezért állítgatja a 191-es portot.
De, szerintem tuti, hogy változik. Ha megjelenik az OK, akkor kicsit amúgy is begyorsul a lejátszás, és ha még OUT 191,12-vel gyorsítva van, ez még inkább érezhetõ. Majd ha ráérek, töltök fel snapshotot vagy mp3-at ilyenrõl.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline Lacika

  • EP addict
  • *
  • Posts: 3191
  • Country: hu
    • http://www.ep128.hu
Re: Általános BASIC Kérdések
« Reply #317 on: 2012.August.05. 13:42:45 »
De, szerintem tuti, hogy változik. Ha megjelenik az OK, akkor kicsit amúgy is begyorsul a lejátszás, és ha még OUT 191,12-vel gyorsítva van, ez még inkább érezhetõ. Majd ha ráérek, töltök fel snapshotot vagy mp3-at ilyenrõl.

Várjál, 7.12MHz-b biztos változik a hang, a DAVE-et csak a 6 MHz-re készítették fel.
6 MHz- nem változhat (?) Zozo?

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Általános BASIC Kérdések
« Reply #318 on: 2012.August.05. 21:59:41 »
De, szerintem tuti, hogy változik. Ha megjelenik az OK, akkor kicsit amúgy is begyorsul a lejátszás, és ha még OUT 191,12-vel gyorsítva van, ez még inkább érezhetõ. Majd ha ráérek, töltök fel snapshotot vagy mp3-at ilyenrõl.
Lehet, hogy elbeszéltünk egymás mellett, és én másra gondoltam. Nem értek ezekhez az EXOS-os dolgokhoz.
Itt egy "hangminta", az elsõ lejátszásnál nem volt OUT 191,12, a második lejátszásnál volt. Mindkét lejátszás végén begyorsul a lejátszás az utolsó taktusokra, az OUT 191,12-es lejátszásnál még elõbb kezdõdik a begyorsulás és talán a gyorsulás mértéke is nagyobb, ezt nem tudom.
Snapshot is mellékelve, ahol (nálam legalábbis) reprodukálható a jelenség.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14723
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #319 on: 2012.August.05. 22:32:50 »
Mindkét lejátszás végén begyorsul a lejátszás az utolsó taktusokra
Ez jelzi, hogy alapvetõen a programban van a hiba, amire a ZZZIP nyilván csak rátesz egy lapáttal  :oops:
Az EXOS SOUND-ja 50Hz-es megszakítással van idõzítve, így ha jól van etetve, nem szabadna ilyennek elõfordulni!
Kéne látni az eredeti programot, hogy kitaláljuk, mi lehet a gond. Eleve miért kell ezt a nem túl bonyolultnak hangzó dolgot Zzzippelni?

Offline Lacika

  • EP addict
  • *
  • Posts: 3191
  • Country: hu
    • http://www.ep128.hu
Re: Általános BASIC Kérdések
« Reply #320 on: 2012.August.05. 22:46:13 »
Én is épp ezt próbáltam ki. A SOUND hangja ugyanaz 4 és 6 MHz-n is.

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Általános BASIC Kérdések
« Reply #321 on: 2012.August.05. 22:59:46 »
Kéne látni az eredeti programot
Valami pofonegyszerû. RESTORE, DO, READ IF MISSING EXIT DO X,Y,Z, SOUND PITCH X,DURATION Z (meg ilyesmik), LOOP, DATA hangok.
Kb. így néz ki, de ha fontos, elõkereshetem.
Zzzip nélkül már 2-es tempóval is akadozik, úgy emlékszem, mert sokcsatornás, envelope is van benne, meg a hangerõt is változtatja, és basic-ben ez már akadozást okoz.
De basic programoknál is gyakran tapasztaltam ezt, amikor restore, data, stb. megoldással szólt a zene.

UI: Így néz ki a basic program eleje:

Code: [Select]
    1 INPUT PROMPT "Tempo:":T
  100 CLEAR SOUND
  110 ENVELOPE NUMBER 1;0,63,63,1;0,-5,-10,1;0,-53,-23,3;0,10,-40,60
  111 ENVELOPE NUMBER 2;0,63,63,1;0,-63,-63,5
  112 ENVELOPE NUMBER 3;0,63,63,1;-10,-63,-63,10
  120 RESTORE
  130 DO
  140   READ IF MISSING EXIT DO:G,H,J
  150   LET G=G+24:LET H=H/T
  160   SOUND PITCH G,DURATION H,ENVELOPE 1,SYNC 3
  170   SOUND PITCH G-36,DURATION H,ENVELOPE 1,SYNC 3,SOURCE 2,STYLE 0
  180   SOUND SOURCE 3,SYNC 3,ENVELOPE 2,DURATION H,LEFT J,RIGHT J
  185   SOUND SOURCE 1,ENVELOPE 3,SYNC 3,PITCH 30,DURATION H,LEFT J,RIGHT J
  190   LET J=0
  200 LOOP
  210 DATA 127,200,0
  220 DATA 32,20,0,37,10,255,37,20,0,36,20,0,37,10,127,37,20,0,41,20,0,37,10,255,37,20,0,36,20,0,37,30,127
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14723
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #322 on: 2012.August.06. 11:51:12 »
Zzzip nélkül már 2-es tempóval is akadozik, úgy emlékszem, mert sokcsatornás, envelope is van benne, meg a hangerõt is változtatja, és basic-ben ez már akadozást okoz.
Itt akkor az a baj, hogy a BASIC nem tudja elég gyorsan etetni a SOUND eszközt, és így a BASIC lassúság is beépül a "kottába", ami nem éppen ideális megoldás.
Áthidaló megoldás lehet esetleg a végére egy csomó "csendhangot" rakni, hogy annak kiküldözgetése lassítson a zene adatok kiküldése után is.

A jobb megoldás az valami célzott gyorsítás, esetleg némi CODE-val.
Felraksz egy teljes programot, amivel lehet próbálkozni?

Offline endi

  • EP addict
  • *
  • Posts: 7298
  • Country: hu
  • grafikus, játékfejlesztõ, programozás, scifi, tudományok, vallás
    • Honlapom
Re: Általános BASIC Kérdések
« Reply #323 on: 2012.August.06. 12:19:18 »
na most én hogyan csináltam hogy a dizzy lord zenéje nem rimushibás? azaz a basic lassúsága nem zavart be.
ugyanis az a zene egy basic zeneszerkesztõ programmal van csinálva és a dizzy lordban escape szekvenciákkal van lejátszva

nem emlékszem hogy volt :) pedig a zeneszerkesztõt is én csináltam :)
Vigyázat! Szektás vagyok! :)

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14723
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #324 on: 2012.August.06. 12:30:18 »
Becsukod a 103-as csatornát, és megnyitod fájlnak, akkor elég egyszerûen össze lehet gyûjteni az escape szekvenciákat.  :)

Lehet az is az egyik kipróbálandó gyorsítási ötlet, hogy a bonyolult SOUND utasítások helyett PRINT #103-al írni escape szekvenciákat, a megfelelõ helyen belerakva a paramétereket.

Offline endi

  • EP addict
  • *
  • Posts: 7298
  • Country: hu
  • grafikus, játékfejlesztõ, programozás, scifi, tudományok, vallás
    • Honlapom
Re: Általános BASIC Kérdések
« Reply #325 on: 2012.August.06. 12:41:29 »
persze, így lett kimentve és lejátszva a DL gépi kódjából

de akkor rá is jöttem. lehet hogy az escape lejátszó mivel ügye rendszer szintû, nem lassú mint a basic!
Vigyázat! Szektás vagyok! :)

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Általános BASIC Kérdések
« Reply #326 on: 2012.August.06. 23:22:22 »
Felraksz egy teljes programot, amivel lehet próbálkozni?
Itt a music.bas lenne az.

Ha jól emlékszem egyébként, egy- és kétszólamú zenéknél nem volt ilyen gyorsulás, tehát ahol kevesebb paramétert kellett DATA sorokban megadni.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline Lacika

  • EP addict
  • *
  • Posts: 3191
  • Country: hu
    • http://www.ep128.hu
Re: Általános BASIC Kérdések
« Reply #327 on: 2012.August.27. 10:35:42 »
Mostanában fraktálok rajzolásával múlatom az idõmet, sutyiban kiegészítettem ezt. Érez kedvet valaki bõvíteni a fraktál-kollekciót?
Konkrétan pl. Sierpinski-háromszögekre érdekelne elegáns, teknõc grafikás megoldás. A csomagban arra csak egy gagyi, Turbo Pascal-os megoldás van átültetve. Vagy egy "jó kis" Gosper-görbe is pofás.  :cool:
« Last Edit: 2012.August.27. 10:45:11 by Lacika »

Offline Lacika

  • EP addict
  • *
  • Posts: 3191
  • Country: hu
    • http://www.ep128.hu
Re: Általános BASIC Kérdések
« Reply #328 on: 2012.September.04. 00:58:53 »
Abszolút hiánypótló program...
 :ds_icon_cheesygrin:

Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 9898
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Általános BASIC Kérdések
« Reply #329 on: 2012.September.04. 13:05:22 »
Abszolút hiánypótló program...
 :ds_icon_cheesygrin:
Ügyes!
Ezt magadtól csináltad, vagy átírtad valahonnan?
Próbálgattam mindenféle számokkal, jól mûködik.

Nem lett volna egyszerûbb a "tíz" és "húsz" szót is a DATA sorokba tenni, mint ott külön CASE ágban megnézegetni, hogy az-e? Bár nem néztem át a program mûködését, lehet, hogy valami ezt indokolja.

Itt nem szerepel a decilliárd, de biztos létezik attól még olyan is.
Amúgy tudtátok, hogy a googol nagyon nagy számot jelent (10 a 100-adikon), és a google is innen kapta a nevét?
« Last Edit: 2012.September.04. 13:10:09 by szipucsu »
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos