Welcome, Guest. Please login or register.


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

Offline Ferro73

  • EP addict
  • *
  • Posts: 1013
  • Country: hu
Re: Általános BASIC Kérdések
« Reply #1350 on: 2019.July.27. 17:47:29 »
Most már függetlenül vizsgálhatjuk billentyűt.

Az EXOS megkerülésével.

Offline Tuby128

  • EP addict
  • *
  • Posts: 1482
  • Country: hu
Re: Általános BASIC Kérdések
« Reply #1351 on: 2019.August.05. 15:06:19 »
Lányommal ma játszottunk az Enterprise-on. Csináltam neki kis programocskát, amiben jól kiélte nyomkodási kedvét.
A gond az, hogy ha több SOUND parancs várakozik, akkor várni kell amíg véget nem ér. Erre volt valami flush parancs, amivel a hangpuffert lehet üríteni. Vajon ez az amit keresek a célomra?
És ha igen, akkor mi a szintaxisa?

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14775
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #1352 on: 2019.August.05. 15:11:17 »
És ha igen, akkor mi a szintaxisa?
CLEAR SOUND

Online szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 10082
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: Általános BASIC Kérdések
« Reply #1353 on: 2019.August.05. 16:13:14 »
CLEAR SOUND
Vagy az is jó, ha a SOUND paraméterébe beírod, hogy INTERRUPT, és megszakítja az előző hangot. Pl.:

SOUND PITCH SQR(87),DURATION 10,INTERRUPT

De ez mindig csak az adott csatornán szakítja meg a hangot.
100 SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 1
110 SOUND PITCH 25,SYNC 1
120 ! Videos

Offline Tuby128

  • EP addict
  • *
  • Posts: 1482
  • Country: hu
Re: Általános BASIC Kérdések
« Reply #1354 on: 2019.August.05. 16:23:49 »
A Flush parancsot mikor használjuk? Ha a "TAPE:" csatorna pufferét nem írtuk még tele, de szeretnénk kiíratni a fájl végét a kazettára?

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 #1355 on: 2019.August.24. 19:59:54 »
hú ez most kicsit meglepett: egy sorban ha gosub van, utána kettősponttal bármit írhatunk, még rem vagy ! se kell, nem veszi figyelebe, hibát se ír.
ez gagyi :)

pl.
10 gosub 100: BLABLABLA
Vigyázat! Szektás vagyok! :)

Offline Lacika

  • EP addict
  • *
  • Posts: 3211
  • Country: hu
    • http://www.ep128.hu
Re: Általános BASIC Kérdések
« Reply #1356 on: 2019.August.25. 12:52:42 »
Zozo, menjünk le egy kicsit dedóba, elakadtam az első lépésnél... :oops:

Beírom ASMON-ba próbaképp (szorzunk 256-tal):
Code: [Select]
M1  LD H,L
    LD L,00
    RET

Assemble options:
Memory assemly NO
Object file name: P.BAS
EXOS module header YES
EXOS module type: 4

Ha lefordítom, a P.BAS-t nem tudom betölteni. :smt017
« Last Edit: 2019.August.25. 18:16:31 by Lacika »

Offline Ferro73

  • EP addict
  • *
  • Posts: 1013
  • Country: hu
Re: Általános BASIC Kérdések
« Reply #1357 on: 2019.August.25. 13:52:11 »
Na erre én is kíváncsi vagyok.
Én
Code: [Select]
   org 1000h
M1  LD H,L
    LD L,00
    RET
Assemble options:
Memeory assemly Yes
Object file name:
EXOS module header
EXOS module type:
PASS2.... YES

majd M 1000
ki jegyzetelem 00,01,02

Aztán basic ALOCATE CODE szorz=HEX$("00,01,02")

PRINT usr(szorz,4)
 1024

valami ilyesmit csinálok én
« Last Edit: 2019.August.25. 13:58:09 by Ferro73 »

Offline Ferro73

  • EP addict
  • *
  • Posts: 1013
  • Country: hu
Re: Általános BASIC Kérdések
« Reply #1358 on: 2019.August.25. 18:28:07 »
Nem lehet máshogy kinyerni a video: buffer kezdő címét.
Csak akkor lehet ha DISPLAY-t kiadjuk?
Pedig szerintem az EXOS már az OPEN parancsra lefoglalja azt a mennyiségű (X*Y) bájtót.

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14775
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #1359 on: 2019.August.25. 18:59:28 »
Zozo, menjünk le egy kicsit dedóba, elakadtam az első lépésnél... :oops:
Nekem működik.
[ Guests cannot view attachments ] [ Guests cannot view attachments ] [ Guests cannot view attachments ]

De van már EP-s SJASM-ünk, az is tud már BASIC-et:
Code: [Select]
HEADER 4
ld h,l
ld l,0
ret
end


Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14775
  • Country: hu
    • http://enterprise.iko.hu/
Re: Általános BASIC Kérdések
« Reply #1360 on: 2019.August.25. 19:05:46 »
Nem lehet máshogy kinyerni a video: buffer kezdő címét.
EXOS 11, 3-as alfunkció.
De ti pókolni szerettek :twisted:

Offline Ferro73

  • EP addict
  • *
  • Posts: 1013
  • Country: hu
Re: Általános BASIC Kérdések
« Reply #1361 on: 2019.August.25. 19:22:58 »
Igen de a scrollnál sokat kellet keresgélni  mire rá leltem a pontos címre.
Mivel nem a puffer elejéről indul ezért a PRINT AT 15... DISPLAY AT 1 FROM 15 TO ....
nem azt eredményezi.
Meg így rá érünk később bedobni képet,


Ugyan így kilehet kérni pl ATTRIBUTUM csatorna PIXEL cím és ATTRIB címet is ez kettő különböző cím lenne szerintem.
Érhető a kérdés?
Köszönöm.

Offline Lacika

  • EP addict
  • *
  • Posts: 3211
  • Country: hu
    • http://www.ep128.hu
Re: Általános BASIC Kérdések
« Reply #1362 on: 2019.August.25. 19:50:20 »
Ááá! Most látom, hogy lehagytam az END-et! Az hiányzott neki. Fordításnál viszont nem jelzett hibát...

Offline Ferro73

  • EP addict
  • *
  • Posts: 1013
  • Country: hu
Re: Általános BASIC Kérdések
« Reply #1363 on: 2019.August.25. 20:09:03 »
Nekem működik.
(Attachment Link) (Attachment Link) (Attachment Link)


Bakker.
Ezzel a trükkel fel lesz turbózva a BASIC gépi kóddal.
Nem kell annyit pötyögnöm.


Offline Ferro73

  • EP addict
  • *
  • Posts: 1013
  • Country: hu
Re: Általános BASIC Kérdések
« Reply #1364 on: 2019.August.30. 18:56:15 »
pl:
csinálok
Code: [Select]
  SET VIDEO X 40
  SET VIDEO Y 64
  SET VIDEO COLOR 0
  SET VIDEO MODE  karakteres
  OPEN #1:"VIDEO:"
Lekérem a videó buffer címét és akkor van 40x64 bájt lefoglalt bármire használható tömböm memoriám.
Elég bekottázni:
buffercím  memória mérete, hossza
buffercím+02,03  HL érték ALLOCATE visszatérésből
...

Elméletem helyes?