Welcome, Guest. Please login or register.


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

Offline Lacika

  • EP addict
  • *
  • Posts: 3191
  • Country: hu
    • http://www.ep128.hu
Re: Általános BASIC Kérdések
« Reply #405 on: 2012.December.15. 18:28:24 »
Quote from: Zozosoft
Nekünk úgy tanították, hogy az a régebbi verzió.
A program az "aktuális szabványoknak" megfelelően dolgozik, ahogy a böngészős átváltók.
A wiki ezt írja: "Az idők folyamán egyes számértékek jelölése eltérő lehetett. Így találhatunk 4 értékben IIII-t és IV-t is, hasonlóan 8 értékben VIII-t és IIX-et is – még furcsább eset a 99 jelölésére az XCIX helyett az IC –, előfordult, hogy ugyanabban a dokumentumban ugyanazokat a számértékeket más-más formában jegyezték le."

Offline Pgyuri

  • EP fan
  • *
  • Posts: 156
Re: Általános BASIC Kérdések
« Reply #406 on: 2012.December.15. 19:50:59 »
Üdv,

No, megbutam negyedikes matematikából :)  Tényleg XCIX-ként kell írni, kicsit összekevertem magam. Szép baleset :)

Pgyuri

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 #407 on: 2012.December.16. 00:03:15 »
Milyen durva lenne, ha a hexadecimális számokat római számokkal próbálnák leírni! :D Akkor talán X lenne a 16, IX a 15... Viszont akkor a V a 8 kéne, hogy legyen.
Végülis tetszőleges számrendszerbeli számokat is leírhatnánk római számokkal, ha a legnagyobb számjegy utáni szám lenne az X, annak a fele meg a V.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

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 #408 on: 2012.December.31. 16:28:16 »
Van valami pofonegyszerű módszer, ami ellenőrzi, van-e EXDOS a gépben? És pl. az EXD változó értékét 0-ra állítja, ha nincs, és 1-re, ha van. Megoldható persze WHEN-HANDLER módszerrel is, ha kiadunk egy EXDOS parancsot (pl. :DIR vagy :VOL) és EXDOS híján hibaüzenetet ad, de egyszerűbb módszer létezik?
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 #409 on: 2012.December.31. 16:30:49 »
EXOS változó lekérdezéssel is lehet, de azt is WHEN blokkba kell rakni.

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 #410 on: 2012.December.31. 17:08:02 »
Quote from: Zozosoft
EXOS változó lekérdezéssel is lehet, de azt is WHEN blokkba kell rakni.
Ezt hogyan kell pontosabban? Én csak a VER$ és a VERNUM változóról hallottam.
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 #411 on: 2012.December.31. 17:27:12 »
ASK 64 A
Ha van EXDOS, akkor A-ban a szegmensszáma lesz, ha nincs, akkor ismeretlen EXOS változó hiba lesz, ezért kell a WHEN blokk.

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 #412 on: 2012.December.31. 19:18:18 »
Hogy a program címében szereplő évszámhoz hűek legyünk még az utolsó pillanatban, itt vagy egy elvileg minden konfigurációval jól működő verzió: [ Guests cannot view attachments ]
Persze lehetne még finomítani rajta, pl. directoryból választani betölthető karakterkészletet, és magnós gépnél betölthesse az első adódó fájlt, de az még a "jövő" zenéje.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

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 #413 on: 2013.January.01. 12:39:39 »
Laci mindenképpen EP-s kitüntetést érdemelne, mert rögtön EP-s programozással kezdte az újévet, megcsinálta, hogy a karakterdefiniáló program felismerje, ha FILE bővítés (Zozotools) van a gépben, és font betöltésekor onnan lehet választani: [ Guests cannot view attachments ]
Arra jöttünk rá, hogy ha Zozotools van a gépben, az picit "megkavarja" a basic lelkivilágát, és ha WHEN utáni sorban OPEN utasítás áll, akkor nem tudja normálisan végrehajtani az OPEN-t, ezért is nem tudta betölteni ebben a konfigurációban a karakterkészleteket. Ha a WHEN és az OPEN közé beteszünk egy GOTO-t (mint ami még a basic 2.1-es EXT bug kiküszöböléséhez hasonló módszer), akkor rendesen működik. Laci szerint tehát a basic verem kuszálódott össze WHEN hatására, ez a probléma alap konfigurációval nem jelentkezett.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

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 #414 on: 2013.January.07. 13:47:26 »
Most találtam egy kb. 20 éves programomat, ami szavakat tárol és kérdez ki. Bug az van benne pár, de használható. Sok olasz lecke szószedetét is be lehet tölteni, meg egy spanyol és egy svéd szószedetet is.
(SWB a Super Word Book rövidítése lenne.)
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 #415 on: 2013.January.12. 15:12:30 »
Azt egyébként tudtátok, hogy a strukturált programozás valamennyi eleme szintaktikailag TELJES mértékben megegyezik az IS-BASIC-ben és a VISUAL BASIC-ben? (beleértve az IF THEN ELSE, SELECT CASE, FOR-NEXT DO-LOOP szerkezetet. Igaz, Visual BASIC-ben a DO-LOOP mellett még pluszban van WHILE WEND, WITH END WITH szerkezet, ami igazából ugyanaz, mint a DO WHILE / LOOP WHILE, DO UNTIL / LOOP UNTIL)

Offline Lacika

  • EP addict
  • *
  • Posts: 3191
  • Country: hu
    • http://www.ep128.hu
Re: Általános BASIC Kérdések
« Reply #416 on: 2013.January.23. 19:02:42 »
Újabb "abszolút hiánypótló" program. (Rosetta Code-os feladat.)
Bár ennek talán még lett is volna értelme, ha 25 évvel korábban készül el...
Rögtön két változat van, a másodikban az ünnepnapok is benne vannak (ez persze a sok IF-től eléggé lassú). A Pünkösd még nincs benne.
Még nincs egyébként kész: a nyomtatás nem működik, úgy tűnik a VDUMP hozzá sem szagol a szöveges képernyőhöz. Ide txt-ben kimentést kellene berakni, ezt valami gépi kódú rutinnal lehetne megvalósítani.
« Last Edit: 2013.January.23. 19:06:07 by Lacika »

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14723
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #417 on: 2013.January.23. 21:20:16 »
Quote from: Lacika
ezt valami gépi kódú rutinnal lehetne megvalósítani.
Megy az BASIC-ből is, pl ilyesmi:
10 for i=1 to 80
20 for j=1 to 24
30 print #102,at i,j:;
40 get #102:a$
50 lprint a$;
60 next j
70 lprint
80 next i

Lprint helyett lehet fájlba 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 #418 on: 2013.January.24. 13:08:31 »
Quote from: Zozosoft
40 get #102:a$
Ezzel csak azokat a karaktereket tudja lekérdezni, mint amik file nevekben is előfordulhatnak, tehát az ékezetes, ALT-os billentyűkombinációra definiált karaktereket nem.
Amúgy biztos van valami SPEEK vagy PEEK érték, amin a karakteres képernyő tartalma van, nem? Vagy rosszul sejtem? Csak benne vannak már valahol ezek a memóriában is, ahonnan ki lehetne olvasni.

Lehetne még esetleg a nem az adott hónaphoz tartozó napokat is odaírni az adott hónaphoz (ahol kimaradnak a helyek elseje előtt), csak halványabb színnel. 80 karakteres módban talán van több szín is.
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 #419 on: 2013.January.24. 13:22:25 »
Ezzel csak azokat a karaktereket tudja lekérdezni, mint amik file nevekben is előfordulhatnak, tehát az ékezetes, ALT-os billentyűkombinációra definiált karaktereket nem.

Köszönöm, már épp akartam kérdezni, de így már érthető miért azt a zagyvaságot kaptam, amit - amikor ezt kipróbáltam.