Welcome, Guest. Please login or register.


Author Topic: BASIC (Read 179182 times)

Offline szipucsu

  • EP addict
  • *
  • Posts: 8094
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 33.0 Firefox 33.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #660 on: 2014.November.05. 22:26:07 »
SPOKE/SPEEK, abban csak 16383 a max ami kell.
Akkora számot még meg tud enni a Zzzip?
És egy adott POKE-t hogyan lehet helyettesíteni egy SPOKE-kal? Hogyan kell "átváltani"?
Egyébként Endinek volt egy programjában az a POKE, ami megrázza a képernyőt, az LPT-vel csinál valamit ütközéskor, az tetszik nagyon.
Vagy assembly rutin? Az az allocate, USR, HEX-féle módszer? Na, ahhoz nem értek. Csak annyit tudok, hogy C9=RET, ezzel kimerültek az ismereteim.
SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
SOUND PITCH 25,SYNC 2
Videos

Offline Povi

  • EP addict
  • *
  • Posts: 1875
  • Country: hu
  • OS:
  • Linux (Ubuntu) Linux (Ubuntu)
  • Browser:
  • Firefox 33.0 Firefox 33.0
    • View Profile
    • http://povi.fw.hu
Re: BASIC
« Reply #661 on: 2014.November.06. 09:20:31 »
nem próbáltam, de lehet, hogy negatív számot kéne megadni POKE-nál, ha 32767-nál nagyobb értéket akarnánk megadni. Vagyis: -1 = 65535, -2 = 65534 stb.
*** Speicherplatz zu klein

Offline Zozosoft

  • EP addict
  • *
  • Posts: 13531
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 33.0 Firefox 33.0
    • View Profile
    • http://enterprise.iko.hu/
Re: BASIC
« Reply #662 on: 2014.November.06. 09:45:37 »
És egy adott POKE-t hogyan lehet helyettesíteni egy SPOKE-kal? Hogyan kell "átváltani"?
Ha jól sejtem a rendszerszegmenst akarod tönkretenni :ds_icon_cheesygrin:
Akkor 32768-at kell kivonni, és SPOKE(255,cím,adat)

Offline endi

  • EP addict
  • *
  • Posts: 7305
  • Country: hu
  • grafikus, játékfejlesztõ, programozás, scifi, tudományok, vallás
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Chrome 38.0.2125.111 Chrome 38.0.2125.111
    • View Profile
    • Honlapom
Re: BASIC
« Reply #663 on: 2014.November.06. 09:55:10 »
nem próbáltam, de lehet, hogy negatív számot kéne megadni POKE-nál, ha 32767-nál nagyobb értéket akarnánk megadni. Vagyis: -1 = 65535, -2 = 65534 stb.

mint írtam, a megoldás az hogy össze kell adni két 32k-nál kisebb számot, és műxik :)
nyilván a zzzip a poke lefordításánál átadja a számot, az 1 bit előjel pedig ilyenkor nem előjel
Vigyázat! Szektás vagyok! :)

Offline szipucsu

  • EP addict
  • *
  • Posts: 8094
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 33.0 Firefox 33.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #664 on: 2014.November.06. 12:16:11 »
Ha jól sejtem a rendszerszegmenst akarod tönkretenni :ds_icon_cheesygrin:
Akkor 32768-at kell kivonni, és SPOKE(255,cím,adat)
Ugyan, mosom kezeimet, nem akarok én tönkretenni semmit! :D
De miből kell kivonni 32768-at?

Volt Endinek ez a cuki kis programrésze, ami jól megrázza a képernyőt:

(Segítség, hogyan lehet ide szúrni be a képet a szövegbe?)

Ezt hogyan kellene SPOKE-kal átírni?
SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
SOUND PITCH 25,SYNC 2
Videos

Offline szipucsu

  • EP addict
  • *
  • Posts: 8094
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 33.0 Firefox 33.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #665 on: 2014.November.06. 12:21:52 »
Na jó, nem leszek lusta, berakom szövegként is. Ebben már mindenféle művelet van, sok címen sok értéket kell összeadni. Ebből hogyan lehet SPOKE?

Code: [Select]
  100 LET SHA=PEEK(49140)+PEEK(49141)*256
  110 FOR SHAX=0 TO 200
  120   POKE SHA,244+RND(6)
  130 NEXT SHAX
  140 POKE SHA,247
SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
SOUND PITCH 25,SYNC 2
Videos

Offline endi

  • EP addict
  • *
  • Posts: 7305
  • Country: hu
  • grafikus, játékfejlesztõ, programozás, scifi, tudományok, vallás
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Chrome 38.0.2125.111 Chrome 38.0.2125.111
    • View Profile
    • Honlapom
Re: BASIC
« Reply #666 on: 2014.November.06. 12:48:26 »
ha megnézel más programomat, ami zzzip kompatibilissé lett téve, ott az ilyet úgy oldottam meg amit írtam, hogy összeadok két 32k-nál kisebb számot
Vigyázat! Szektás vagyok! :)

Offline szipucsu

  • EP addict
  • *
  • Posts: 8094
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 33.0 Firefox 33.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #667 on: 2014.November.06. 13:30:42 »
ha megnézel más programomat, ami zzzip kompatibilissé lett téve, ott az ilyet úgy oldottam meg amit írtam, hogy összeadok két 32k-nál kisebb számot
Igen, olvastam, nem rossz ötlet, de kicsit jobban nézne ki, egyszerűbben, egyetlen SPOKE-kal. De aztán lehet, végül az összeadós módszert választom.
SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
SOUND PITCH 25,SYNC 2
Videos

Offline szipucsu

  • EP addict
  • *
  • Posts: 8094
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 33.0 Firefox 33.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #668 on: 2014.November.06. 13:36:18 »
Jó, közben felfogtam, hogy miből kell mit kivonni, kicsit nehéz eset vagyok. :ds_icon_cheesygrin:
Király, akkor most már két módszer is van a megoldásra. :smt041
SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
SOUND PITCH 25,SYNC 2
Videos

Offline endi

  • EP addict
  • *
  • Posts: 7305
  • Country: hu
  • grafikus, játékfejlesztõ, programozás, scifi, tudományok, vallás
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Chrome 38.0.2125.111 Chrome 38.0.2125.111
    • View Profile
    • Honlapom
Re: BASIC
« Reply #669 on: 2014.November.18. 21:44:20 »
Közben egy kis program.
Mindig is akartam ilyet csinálni, úgyhogy most végre kipróbáltam. De folytatni nem fogom, mert az ötlet nem túl jó.
A lényeg, hogy alul a figura paletta állítással mozog. Azaz 8 színnel ki van rajzolva és váltom a palettát.
Fent meg display-al van egy magas kép scrollozva.
Az lett volna az ötlet, hogy így talán gyorsabb mozgást lehet elérni mint rajzolással. De hát ez így gagyi, nem lehet többszínű a figura (bár jó nagy lehetne), csak 8 pozíciója lehet stb...
De azért egy próbát megért. :)

Vigyázat! Szektás vagyok! :)

Offline szipucsu

  • EP addict
  • *
  • Posts: 8094
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 33.0 Firefox 33.0
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #670 on: 2014.November.18. 22:40:53 »
Közben egy kis program.
Az elvet nem értem. Ha 8 színnel van kirajzolva a figura, hogyhogy csak egyszínű lehet?
SOUND SOURCE 3,STYLE 16,LEFT 16,RIGHT 64,SYNC 2
SOUND SOURCE 2,STYLE 128,PITCH 25.2,SYNC 2
SOUND PITCH 25,SYNC 2
Videos

Offline Lacika

  • EP addict
  • *
  • Posts: 2930
  • Country: hu
  • OS:
  • Windows NT 6.3 Windows NT 6.3
  • Browser:
  • Firefox 33.0 Firefox 33.0
    • View Profile
    • http://www.ep128.hu
Re: BASIC
« Reply #671 on: 2014.November.19. 09:32:47 »
Az elvet nem értem. Ha 8 színnel van kirajzolva a figura, hogyhogy csak egyszínű lehet?

A nyolc pozícióhoz nyolc palettaszín tartozik, amiből hét háttérszínre van állítva, a maradék egy a figura aktuális pozíciója.

Offline Z80System

  • EP addict
  • *
  • Posts: 3926
  • Country: hu
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Chrome 39.0.2171.65 Chrome 39.0.2171.65
    • View Profile
Re: BASIC
« Reply #672 on: 2014.November.20. 11:52:26 »
Hogyan lehet elérni hogy a standard editor (pld. basic editor) buffere nagyobb legyen ... pld. 10 képernyő visszafele, vagy ilyesmi ?

És azt, hogy a status sornak is átváltozzon a palettája ?

És egy (pld. 102) csatornának hogy lehet a palettáját lekérdezni ?
Z80 System

Offline Zozosoft

  • EP addict
  • *
  • Posts: 13531
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 33.0 Firefox 33.0
    • View Profile
    • http://enterprise.iko.hu/
Re: BASIC
« Reply #673 on: 2014.November.20. 12:27:47 »
Hogyan lehet elérni hogy a standard editor (pld. basic editor) buffere nagyobb legyen ... pld. 10 képernyő visszafele, vagy ilyesmi ?
10 CLOSE #0
20 SET 31,254
30 OPEN #0:"EDITOR:"

De így az FEh szegmens is foglalt lesz.

Quote
És azt, hogy a status sornak is átváltozzon a palettája ?
POKE :-)

Quote
És egy (pld. 102) csatornának hogy lehet a palettáját lekérdezni ?
PEEK :-D

Offline endi

  • EP addict
  • *
  • Posts: 7305
  • Country: hu
  • grafikus, játékfejlesztõ, programozás, scifi, tudományok, vallás
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Chrome 38.0.2125.122 Chrome 38.0.2125.122
    • View Profile
    • Honlapom
Re: BASIC
« Reply #674 on: 2014.November.20. 12:43:14 »
kéne írni egy jó kis függvénykönyvtárat ilyen lpt módosításra, lekérdezésre basicben :)
Vigyázat! Szektás vagyok! :)