Welcome, Guest. Please login or register.


Author Topic: BASIC (Read 220235 times)

Offline szipucsu

  • EP addict
  • *
  • Posts: 8615
  • Country: hu
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #1470 on: 2020.August.25. 15:17:54 »
Csak ennyi a módosítás, hogy átmenetesen pakolja ki.
Köszi! :smt041
100 SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
110 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
120 SOUND PITCH 25,SYNC 2
Videos

Offline szipucsu

  • EP addict
  • *
  • Posts: 8615
  • Country: hu
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #1471 on: 2020.August.25. 23:03:03 »
Azt korlátozza valami, hogy a videolap függőleges mérete mekkora lehet? A SET VIDEO Y után régebben "csak" 170 körüli értéket fogadott még el. Most megint próbálgattam, 210-et is elfogad. Ravasz, mert akkor jelzi a hibát, ha utána az OPEN #csat:"video:"-hoz ér, hogy nem jó a paraméter.
Lehetséges, hogy a basic program mérete vagy valami más dolog meghatározza, mekkora videolapot nyithatunk meg? Azért lenne fontos, mert ahogy a programot bővítgetem, toldozgatom, nehogy valami beleköpjön a levesbe, és a korábbi érték túl nagy legyen, amikor ahhoz az értékhez igazítottam már sok minden mást.
100 SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
110 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
120 SOUND PITCH 25,SYNC 2
Videos

Offline geco

  • EP addict
  • *
  • Posts: 5763
  • Country: hu
  • OS:
  • Linux Linux
  • Browser:
  • Chrome 84.0.4147.111 Chrome 84.0.4147.111
    • View Profile
Re: BASIC
« Reply #1472 on: 2020.August.25. 23:06:35 »
A szabad videomemoria merete szab korlatot neki, vagy a max 255 sor.

Offline szipucsu

  • EP addict
  • *
  • Posts: 8615
  • Country: hu
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #1473 on: 2020.August.25. 23:43:28 »
A szabad videomemoria merete szab korlatot neki
Mi fogyaszthatja el a szabad videomemóriát? Csak a videolapok? Tehát ha beállítom az összes szükséges videolap méretét és megnyitom őket, és utána már nem nyitok újabb videolapokat, akkor már nem csökkenhet a szabad videomemória mérete?
100 SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
110 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
120 SOUND PITCH 25,SYNC 2
Videos

Offline geco

  • EP addict
  • *
  • Posts: 5763
  • Country: hu
  • OS:
  • Linux Linux
  • Browser:
  • Firefox 68.0 Firefox 68.0
    • View Profile
Re: BASIC
« Reply #1474 on: 2020.August.26. 08:27:42 »
Elméletileg csak te :D , igen ha megnyitod őket, akkor tovább már nem csökken.

Offline szipucsu

  • EP addict
  • *
  • Posts: 8615
  • Country: hu
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #1475 on: 2020.August.26. 11:27:04 »
Mostanában a "szipucsu kérdez" topik ez. Újabb ravasz kérdés: A status sor videolapját meg lehet változtatni, pl. kétszínű karakteres lapról négyszínű karakteres lapra? Betöltésnél-kimentésnél jó, ha látszik magnós gépen, viszont ha át vannak definiálva a karakterek négyszínű karakterekre, akkor krixkraxok vannak ott.
100 SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
110 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
120 SOUND PITCH 25,SYNC 2
Videos

Offline geco

  • EP addict
  • *
  • Posts: 5763
  • Country: hu
  • OS:
  • Linux Linux
  • Browser:
  • Firefox 68.0 Firefox 68.0
    • View Profile
Re: BASIC
« Reply #1476 on: 2020.August.26. 11:40:24 »
Nincs rá Basic parancs, csak SPOKE-olással tudod lecserélni, megvan egy változódban hol kezdődik az LPT, a változó +1 címre kell 40-et írni, ez akkor érvényes, ha a változód értéke nem az képernyő 1. sorának LPB-jére mutat, hanem a Státusz sorának LPB-jére, ha a képernyő 1. sorának LPB-jére, akkor változó-15 -ös helyére kell SPOKE-olni a 40-et.

Online gflorez

  • EP addict
  • *
  • Posts: 3010
  • Country: es
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
Re: BASIC
« Reply #1477 on: 2020.August.26. 17:59:53 »
Szia, szipucsu. Ez a program, amelyet Zzzip-re akarok konvertálni.

----------

Hello, szipucsu. This is the program I want to Zzzip.

----------

Hola szipucsu. Este es el programa que quiero convertir a Zzzip.

Offline szipucsu

  • EP addict
  • *
  • Posts: 8615
  • Country: hu
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #1478 on: 2020.August.26. 21:49:14 »
Hola szipucsu. Este es el programa que quiero convertir a Zzzip.
I have tried both the original and the compiled program on the emulator (I have only the emulator). I know it doesn't work without the hardware. However, the original and the compiled programs do the same. "Initialising USB device.." is in progress but nothing happens. Does it do the same with the hardware? Or does it hang up earlier?
* SEPLAY ZZZIP.zip (6.46 kB - downloaded 47 times.)
I suggest deleting all the "'!" signs and comments. It can also cause problems for the Zzzip. But I haven't found anything that should affect running the compiled program...
100 SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
110 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
120 SOUND PITCH 25,SYNC 2
Videos

Online gflorez

  • EP addict
  • *
  • Posts: 3010
  • Country: es
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
Re: BASIC
« Reply #1479 on: 2020.August.27. 06:30:59 »
Great! Now it works correctly with some minor errors that I will fix.

The program has three screens.  The first brief one is when the USB is initialized and an intro song is played while the other two screens are drawn in the background. The second one is the file-manager/directory-navigator, that now works very fast.



And the third one is the playing screen, that launches a song but stops with a "*** Not understood." message.



There is some way to know the offending line number?

Offline szipucsu

  • EP addict
  • *
  • Posts: 8615
  • Country: hu
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #1480 on: 2020.August.27. 09:46:27 »
There is some way to know the offending line number?
Unfortunately no. Zzzip forgets the line numbers of the original program.
As I see line  4390 returns  (4390 RETURN) to the line 510 and this line might be guilty:

Code: [Select]
510 IF (IN(35) BAND 8)<>8 THEN GOTO 510
It is easier this way (without brackets):

Code: [Select]
510 IF IN(35) BAND 8<>8 THEN GOTO 510
I have compiled it this way. Is it working now?
* SEPLAY ZZZIP 2.zip (11.54 kB - downloaded 47 times.)

If not, you could find out something else instead of BAND. Or maybe:

Code: [Select]
510 LET GUSTAVO=IN(35)
515 IF GUSTAVO AND 8<>8 THEN GOTO 510
100 SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
110 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
120 SOUND PITCH 25,SYNC 2
Videos

Online gflorez

  • EP addict
  • *
  • Posts: 3010
  • Country: es
  • OS:
  • Unknown Unknown
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
Re: BASIC
« Reply #1481 on: 2020.August.27. 10:23:20 »


I only can use BAND , as I am managing bits. I can search other ways, with arithmetic.

What version of Zzzip do you use? I have to fix it by myself...

Thanks.

Offline geco

  • EP addict
  • *
  • Posts: 5763
  • Country: hu
  • OS:
  • Linux Linux
  • Browser:
  • Firefox 68.0 Firefox 68.0
    • View Profile
Re: BASIC
« Reply #1482 on: 2020.August.27. 10:29:20 »
If you use

V=IN(35)
IF V/8-V/16*2=0 GOTO 510

should work, since ZZZIP works only with integers :D :D
« Last Edit: 2020.August.27. 10:45:00 by geco »

Offline szipucsu

  • EP addict
  • *
  • Posts: 8615
  • Country: hu
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #1483 on: 2020.August.27. 10:47:10 »
What version of Zzzip do you use? I have to fix it by myself...
Zzzip 1.2. It can be downloaded here, scroll down to the bottom of the page. Hay que ir abajo en la página.

Anyway, the simplest way is to use this snapshot if you have enabled virtual file I/O and have a working directory on your hard drive (set by alt+F in the EP128Emu):
* Zzzip.ep128s (53.05 kB - downloaded 48 times.)
100 SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
110 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
120 SOUND PITCH 25,SYNC 2
Videos

Online gflorez

  • EP addict
  • *
  • Posts: 3010
  • Country: es
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 79.0 Firefox 79.0
    • View Profile
Re: BASIC
« Reply #1484 on: 2020.August.27. 14:36:43 »
Thanks both. Later I will try it.