Welcome, Guest. Please login or register.


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

Offline Lacika

  • EP addict
  • *
  • Posts: 3191
  • Country: hu
    • http://www.ep128.hu
Re: Általános BASIC Kérdések
« Reply #255 on: 2012.March.26. 17:03:34 »
Szerintem Laci nem a "FILE:"-re gondol, hanem a ":FILE"-re  :oops:

Igaza van Zozo-nak, nem az  eszközre, hanem a rendszerbõvítõre gondolok.

Offline Lacika

  • EP addict
  • *
  • Posts: 3191
  • Country: hu
    • http://www.ep128.hu

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 #257 on: 2012.March.26. 21:33:20 »
Arra van valami utasítás, hogy a PRINT ne a 0-ás, hanem a 102-es csatornára írjon alapértelmezésként?
Van valami SET DEFAULT CHANNEL, de hogy az mit csinál pontosan, arra nem jöttem rá, pedig elolvastam a gépkönyvben is.  :oops:
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: 14722
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #258 on: 2012.March.26. 21:43:26 »
Arra van valami utasítás, hogy a PRINT ne a 0-ás, hanem a 102-es csatornára írjon alapértelmezésként?
Nincs.

Quote
Van valami SET DEFAULT CHANNEL, de hogy az mit csinál pontosan, arra nem jöttem rá, pedig elolvastam a gépkönyvben is.  :oops:
Azt adja meg, hogyha a 255-ös csatornára írsz, az melyik csatornára menjen. Ezt a 255-ös csatornát kell használnia pl a rendszerbõvítõknek.
Ha átállítod pl 101-re, akkor utána a HELP, vagy DIR, stb a grafikus lapra fog írni (csak elõtte plotolj fel a bal felsõ sarokba, hogy látszódjon :-) ).

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 #259 on: 2012.March.26. 22:06:15 »
Ha átállítod pl 101-re, akkor utána a HELP, vagy DIR, stb a grafikus lapra fog írni (csak elõtte plotolj fel a bal felsõ sarokba, hogy látszódjon :-) ).
Köszi! Tényleg mûködik! Amit leírtál, az mondjuk a gépkönyvbõl meg az Ismerkedés az Enterprise-szal könyvbõl sem derül ki. Példának beírják, hogy SET DEFAULT CHANNEL akármennyi, ebbõl nem derül ki semmi, legalább egy HELP-et kiadhatnának utána a példában.
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 #260 on: 2012.March.29. 21:19:25 »
A nemrég a Régészeti leletek topikba betett Hajtóvadászatot kicsit továbbfejlesztettem, a hibákat is kijavítottam. A digi hangokat mindig floppyról tölti be lejátszás elõtt, de szerintem így is élvezhetõ, próbáltam igazi gépen is. Lehet EPfileio.rommal is játszani, de akkor is kell, hogy legyen EXDOS is az emulátorban, máshogy nem indul el. A toplistát mindig elmenti. Magnós géppel használhatatlan. Winchesteres géppel bizonyára még élvezhetõbb, mint floppyval.
Meg lehetne csinálni, hogy a digi hangok is a memóriában legyenek, ne floppyzzon állandóan? Az egész cucc mérete összesen 128 KB alatt van. De lehet, csak én vagyok naív, hogy azt gondolom, a 128 kilót úgy pakolhatja tele az ember a saját cókmókjaival, ahogy akarja... A Sample player 12 KB körül van, ebbõl kb. 10 KB egy beépített hangminta, ami nem kerül lejátszásra. Ha ezt ki lehetne szedni belõle, kisebb lenne az egész mérete.

Jó így, vagy még lehetne rajta tökéletesíteni?
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: 14722
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #261 on: 2012.March.29. 21:58:47 »
A sorbarendezõs kérdések hova tüntek innen?

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 #262 on: 2012.March.29. 22:09:23 »
A sorbarendezõs kérdések hova tüntek innen?
Töröltem, mert nagyon triviális kérdések voltak. A toplista sorba rendezéshez kellett, valami nagyon alap dolgot elnéztem és nem akart mûködni. Az összes kérdésre igen volt a válasz egyébként.
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: 14722
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #263 on: 2012.March.29. 22:15:17 »
Az összes kérdésre igen volt a válasz egyébként.
NUMERIC-re is?  :oops:

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 #264 on: 2012.March.29. 22:26:09 »
NUMERIC-re is?  :oops:
Na, azt a sort kivettem a programból, és ugyanúgy mûködött. Tényleg nem tudom, minek tették bele.
Na jó, akkor még egyszer berakom, a program a Felhasználói kézikönyvbõl van.

Szóval a 150-es sor felesleges, mégis beletették.
És a 260-as sorban is lehetne a 10 helyett inkább VEG. De kicsit késõbb levon a VEG értékébõl mindig 1-et (350-es sor), ez nem tudom, befolyásolja-e a ciklust, ami éppen "folyamatban van".
És ha csökkenõ sorrendbe akarjuk a számokat rendezni, akkor a 290-es sorban > helyett < jel kell, és a MAX értékének valami nagy számot kell megadni.
Akkor inkább ne törölgessem a hozzászólásaimat akkor se, ha olyat kérdeznék, amire egyértelmû a válasz, csak én nem jöttem rá? Látom, megtévesztõ voltam.  :oops:

Code: [Select]
100 PROGRAM "Rendez.bas"
110 ! Ez a program 10 szamot
120 ! rendez nagysag szerint sorba
130 ! ----------------------------
140 NUMERIC TOMB(1 TO 10)
150 NUMERIC VALT,SZAM,MAX
160 CLEAR SCREEN
170 PRINT AT 10,10:"SZAMRENDEZES"
180 FOR N=1 TO 10
190 PRINT AT 14,10:"Az ";N;"-ik szam";
200 INPUT PROMPT ":":TOMB(N)
210 PRINT AT 14,25:" "
220 NEXT N
230 CLEAR SCREEN
240 PRINT AT 20,20:"Rendezek..."
250 LET VEG=10
260 FOR X=1 TO 10
270 LET MAX=0
280 FOR Y=1 TO VEG
290 IF TOMB(Y)>MAX THEN LET MAX=TOMB(Y)
300 IF TOMB(Y)=MAX THEN LET SZAM=Y
310 NEXT Y
320 LET VALT=TOMB(VEG)
330 LET TOMB(VEG)=MAX
340 LET TOMB(SZAM)=VALT
350 LET VEG=VEG-1
360 NEXT X
370 FOR X=1 TO 10
380 PRINT TOMB(X)
390 NEXT X
400 END

Egyébként ezt a sorbarendezést stringekkel is meg lehet csinálni. Az arra jó, hogy játékokhoz toplistát csináljunk. Csak a toplistánál meg pont nem növekvõ, hanem csökkenõ sorrendbe kell rendezni, tehát a nagyobb számok (jobb eredmények) vannak elõl. Én meg belebonyolódtam, mert már egyszer megfordítottam a dolgot és azt hittem, nem fordítottam meg, és mikor újra meg akartam fordítani, pont fordítva mûködött, mint akartam és nem értettem. :D
« Last Edit: 2012.March.29. 22:30:46 by szipucsu »
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: 14722
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #265 on: 2012.March.30. 12:53:01 »
Na, azt a sort kivettem a programból, és ugyanúgy mûködött. Tényleg nem tudom, minek tették bele.
Na jó, akkor még egyszer berakom, a program a Felhasználói kézikönyvbõl van.

Szóval a 150-es sor felesleges, mégis beletették.
Nem felesleges, hanem a strukturált programozás része! Komolyabb program nyelvekben kötelezõ is elõre definiálni a változókat.
Így egy helyen át tudott tekinteni, milyen változókat is használsz. Esetleg REM-be oda is lehet írni melyik mire való.
Ez egy komolyabb programnál lesz igazán lényeges, elõfordulhat, hogy felülírsz egy már használt változó értékét. Ha tartod magad a rendhez, és minden használtat beírsz a program elejére, könnyen észreveszed, hogy az újonnan kitalált változóneved már használva van. Ha ugyan arra a névre másodszor adod ki a NUMERIC-et, akkor szólni is fog a gép, hogy már használt.
A sima LET A=1 féle Commodore-os stílusnál nem kapsz hibaüzenetet, csak simán felülírod az elõzõ értéket.

És végül pedig apróság, nem biztos, hogy mérhetõ, érezhetõ, de elvileg sok változóval dolgozó nagyobb programnál okozhat kis akadást, amikor újabb változót hozol létre, mert bele kell szúrnia a változó listába. Ha elején meg van mind, akkor egy várakozással le van tudva mind, közben nem lehet akadás emiatt.
 
Quote
Akkor inkább ne törölgessem a hozzászólásaimat akkor se, ha olyat kérdeznék, amire egyértelmû a válasz, csak én nem jöttem rá?
Szerintem ne, írd be inkább amire rájöttél, esetleg más is tanulhat belõle.

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 #266 on: 2012.March.31. 16:10:39 »
Ha ezt kiadjuk, egy resetre is úgy viselkedik a gép, mintha dupla resetet nyomtunk volna. (Hogy melyik a hideg, melyik a meleg, azt mindig összekeverem.)

Code: [Select]
SPOKE 255,49144,0
SPOKE 255,49145,0

EXOS 2.1-nél van hatása, EXOS 2.32-vel nem mûködik.
Van olyan utasítás, amivel minden EXOS változatnál be lehet állítani a csak dupla reset lehetõségét?

(Ezt a SPOKE-ot talán egy ENTERPRESS-ben olvastam, vagy valami újságban, régebben.)
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: 14722
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #267 on: 2012.March.31. 16:34:38 »
EXOS 2.1-nél van hatása, EXOS 2.32-vel nem mûködik.
Direkt lett így megoldva, hogy a trükkös programoknál se legyen felesleges reset  :twisted:

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 #268 on: 2012.March.31. 16:53:51 »
Direkt lett így megoldva, hogy a trükkös programoknál se legyen felesleges reset  :twisted:
Igazából arra lenne jó, hogy a továbbfejlesztett Hajtóvadászat programban ne lehessen azt csinálni, hogy egy resetet nyomunk és innen újraindítjuk a játékot. Mert minden egyes újraindításnál újra betölti a Wav Sample Playert, és ha ezt sokáig csináljuk, elfogy a memória. Ezért lenne jó, ha csak dupla reset mûködne.
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: 14722
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #269 on: 2012.March.31. 17:23:44 »
Kell kérni egy EXT "help sample"-t, és ha ismeretlen parancs, akkor kell betölteni.