Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: QB: kokeilkaas tätä!

Sivun loppuun

mamaze [24.02.2004 14:30:42]

#

kokeilkaa ja olkaa sanattomia.
QB: play "FADCGGCAFDFDGAC"
tein sen täysin sattumalta

rndprogy [24.02.2004 15:28:50]

#

Tuotaa... mistä erikoisesta tuosta pitäisi olla kyse?

mamaze [24.02.2004 15:51:10]

#

no kun tuota hermomusiikkia soittaa tarpeeksi...

Heikki [24.02.2004 15:51:40]

#

piip piip piiip pip piiiip

Onpa hienoa...

kenkku [24.02.2004 15:51:45]

#

Hei haloo, mä leikin samalla tavalla kännykän säv(/h)eltimen kanssa ja saan aikaseks samanlaisia :D
Eli ihan turha niitä tänne laittaa

Meitsi [24.02.2004 18:13:58]

#

Kun ei ole qbtä niin mitä miltä toi kuulostais??

kenkku [24.02.2004 19:49:06]

#

lainaus:

Kun ei ole qbtä niin mitä miltä toi kuulostais??

Kauheelta

hunajavohveli [25.02.2004 13:53:06]

#

Öööh... en nyt oikein tajunnut, mikä tuosa niin ihmeellistä oli. Vai oliko niin, ettet itse tiennyt tuollaista käskyä QB:ssä olevan? Itse, ja luulisin, että miltei kaikki QB-koodaajat ovat tuon käskyn tienneet. Ymmärrän toki, että tuo käsky on kuitenkin joiltakin voinut jäädä oppimatta/huomaamatta. Mutta sinänsä siinä ei ole mitään ihmeellistä, vaikka olin kyllä itsekin kolme vuotta sitten aika innoissani, kun tuon opin. :)

hunajavohveli [25.02.2004 13:59:17]

#

Mutta jos nyt haluat enemmänkin oppia, niin kokeiles vaikka tuota itse tekemääni pätkää. Siis, en tietenkään ole säveltänyt sitä itse vaan tuo musiikki on yhdestä riippuliitopelistä kopioitu. Yritin kuunnella miten se menee ja sitten samalla koodasin ja kokeilin väissä, kuulostaako samalta kuin alkuperäinen. Ja näin se mielestäni menee:

CLS
PLAY "o2 t220"

PLAY "g8f8"

FOR a = 1 TO 3

REM Eka osa
PLAY "d8g8g8a8a+4g8a+8a8f8f4c8f8c8f8"
PLAY "d8g8g8a8a+4.a+8a+8a8g8a8a+8g8a8f8"
PLAY "d8g8g8a8a+8a8g8a+8a8f4.c8f8c8f8"
PLAY "d8g8g8a8a+4. > d8c8 < a8 > f8c8 < a8g8g8f8"

REM Kertaus
PLAY "d8g8g8a8a+4g8a+8a8f8f4c8f8c8f8"
PLAY "d8g8g8a8a+4.a+8a+8a8g8a8a+8g8a8f8"
PLAY "d8g8g8a8a+8a8g8a+8a8f4.c8f8c8f8"
PLAY "d8g8g8a8a+4. > d8c8 < a8 > f8c8 < a8g8g8a8"

REM Toka osa
PLAY "a+4 > d8 < a+8 f4 > d8 < a+8 f4"
PLAY "> d8 < a+8 > c8 < a+8 a8 > c8 <"'< a+8g8g8a8"
PLAY "a+8 > c8 d8 < a+8 f4"
PLAY "> d8 < a+8 > c8 < a+8 a8 > c8 < a+8g8g8a8"
PLAY "a+4a+8 > d8c8 < a+8 > c8d8 < a+4a+8 > d8c8 < a8f8d8"
PLAY "g8a+8a8 > c8 < a+8 > d8f8d8c8 < a8 > f8c8 < a8 g8g8a8"

REM Kertaus
PLAY "a+4 > d8 < a+8 f4 > d8 < a+8 f4"
PLAY "> d8 < a+8 > c8 < a+8 a8 > c8 <"'< a+8g8g8a8"
PLAY "a+8 > c8 d8 < a+8 f4"
PLAY "> d8 < a+8 > c8 < a+8 a8 > c8 < a+8g8g8a8"
PLAY "a+4a+8 > d8c8 < a+8 > c8d8 < a+4a+8 > d8c8 < a8f8d8"
PLAY "g8a+8a8 > c8 < a+8 > d8f8d8c8 < a8 > f8c8 < a8 g8g4"

REM Kolmas osa
PLAY "> g4d12d12d12g8a+8a8g8 f4c12c12c12f8g8a8f8"
PLAY "g4d12d12d12g8a+8a8g8 f8d8c8d8 < a+8g8g4"
PLAY "> g4d12d12d12g8a+8a8g8 f4c12c12c12f8g8a8"
PLAY "< a+3a+8a8a+8 > a+8a8g8f8d8c8d8 < a+8g8g4"

REM Kertaus
PLAY "> g4d12d12d12g8a+8a8g8 f4c12c12c12f8g8a8f8"
PLAY "g4d12d12d12g8a+8a8g8 f8d8c8d8 < a+8g8g4"
PLAY "> g4d12d12d12g8a+8a8g8 f4c12c12c12f8g8a8"
PLAY "< a+3a+8a8a+8 > a+8a8g8f8d8c8d8c+8d8 < a+8g8 < ms"

IF a = 2 THEN PLAY "> mn"

NEXT a

Ja tänhän voi tarvittaessa pysäyttää Ctrl + Break yhdistelmällä.


Sivun alkuun

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta