Welcome, Guest. Please login or register.


Author Topic: BASIC (Read 154741 times)

Offline ergoGnomik

  • EP lover
  • *
  • Posts: 710
  • Country: hu
  • Stray cat from Commodore alley
  • OS:
  • Windows NT 10.0 Windows NT 10.0
  • Browser:
  • Firefox 52.0 Firefox 52.0
    • View Profile
Re: BASIC
« Reply #1290 on: 2018.March.14. 09:43:06 »
Csak ezt tudom elképzelni, de ezt honnan veszi...?
A TO fenntartott szót az alábbi BASIC utasítások/parancsok használják a referencia kézikönyv szerint:
  • CAPTURE FROM £csat TO £csat
  • COPY FROM £csat TO £csat
  • DELETE sormeghat TO sormeghat
  • DIM a(1 TO 10),FRED$(9),B(-7899 TO -7890)
  • DISPLAY £csat: AT a FROM b TO c
  • FOR egyszerű változó=kif TO kif STEP kif
  • LIST £csat:sor-meghat TO sor-meghat
  • NUMERIC i,a(10),b(-10 TO 20,2 TO 4)
  • REDIRECT FROM £csat TO £csat
  • RENUMBER sormeghatározás TO sormeghatározás AT kif STEP kif
  • CASE kif TO kif (SELECT)
  • STRING tomb$(4 TO 99)*10
  • TRACE ON TO £csat

A Zzzip-nek talán az lehet a baja, hogy nem írták elég "intelligensre" a szövegértelmezőjét, így ezt a határesetet nem tudja helyesen feloldani. Próbáltad már úgy, hogy lecseréled a változó nevét?

Offline szipucsu

  • EP addict
  • *
  • Posts: 7340
  • Country: hu
  • OS:
  • Windows NT 10.0 Windows NT 10.0
  • Browser:
  • Chrome 64.0.3282.168 Chrome 64.0.3282.168
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #1291 on: 2018.March.14. 10:07:47 »
CASE kif TO kif (SELECT)
Jé, a CASE után is állhat TO? Ezt még sose használtam.

Szerintem is az lesz a gond, hogy basic parancsok, szavak nem lehetnek változók. Már csak egy olyan program kellene Lacinak, mely az összes TO változót lecseréli basic programjában valami más, megadott változónévre.
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
OPEL #1:"Audi(o):" ACCESS DENIED

Offline Lacika

  • EP addict
  • *
  • Posts: 2886
  • Country: hu
  • OS:
  • Windows NT 10.0 Windows NT 10.0
  • Browser:
  • Firefox 59.0 Firefox 59.0
    • View Profile
    • http://www.ep128.hu
Re: BASIC
« Reply #1292 on: 2018.March.14. 21:33:19 »
hát TO az egy utasítás for ciklusban: FOR X=1 TO 5 például

Valóban, a TO-t átnevezve már sikerült lefordítani a programot, igaz más okból kifolyólag nem működik helyesen :(

Offline endi

  • EP addict
  • *
  • Posts: 6765
  • 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 65.0.3325.181 Chrome 65.0.3325.181
    • View Profile
    • Honlapom
Re: BASIC
« Reply #1293 on: 2018.April.04. 19:14:17 »
itt a basic, látom a snapshotból nem jöttetek rá hogy ez pont azt csinálja amiről beszéltek, poke-olja az exos karakterkészletet :)
biztos lehet optimalizálni. vagy akár átírni gépi kódra.
A diplomás magyar programozó megcsinált egy pacmant egy év alatt, majd lefikázta a világ legjobb játékait. :D

Offline Ferro73

  • EP lover
  • *
  • Posts: 521
  • Country: hu
  • OS:
  • Linux (Ubuntu) Linux (Ubuntu)
  • Browser:
  • Firefox 59.0 Firefox 59.0
    • View Profile
Re: BASIC
« Reply #1294 on: 2018.April.07. 13:27:27 »
itt a basic, látom a snapshotból nem jöttetek rá hogy ez pont azt csinálja amiről beszéltek, poke-olja az exos karakterkészletet :)
biztos lehet optimalizálni. vagy akár átírni gépi kódra.

Az eredeti kb 76 másodperc

a v2 kb 69 másodperc
a v3 kb 21 másodperc csak BASIC


Offline IstvanV

  • EP addict
  • *
  • Posts: 4755
  • OS:
  • Linux Linux
  • Browser:
  • Firefox 58.0 Firefox 58.0
    • View Profile
Re: BASIC
« Reply #1295 on: 2018.April.07. 16:23:20 »
Assembly változat (a CLEAR FONT-ot nem tartalmazza, így többszöri futásnál halmozódik az effektus):
* fontmod.com (0.06 kB - downloaded 50 times.)

Offline Ferro73

  • EP lover
  • *
  • Posts: 521
  • Country: hu
  • OS:
  • Linux (Ubuntu) Linux (Ubuntu)
  • Browser:
  • Firefox 59.0 Firefox 59.0
    • View Profile
Re: BASIC
« Reply #1296 on: 2018.April.07. 16:27:15 »
Az eredeti kb 76 másodperc

a v2 kb 69 másodperc
a v3 kb 21 másodperc csak BASIC

a v4 kb 14 másodperc ennél gyorsabbra én nem tudom csak BASIC-ben.

Illeszd be valahogy ezt:
Code: [Select]
  ld c,4
  ld hl,0b480h
  ld de,0128
ujsor  add hl,de
  ld b,128
kov  ld a,(hl)
  rrca
  ld (hl),a
  inc hl
  djnz kov
  dec c
  jr nz,ujsor
  ret

Offline IstvanV

  • EP addict
  • *
  • Posts: 4755
  • OS:
  • Linux Linux
  • Browser:
  • Firefox 58.0 Firefox 58.0
    • View Profile
Re: BASIC
« Reply #1297 on: 2018.April.07. 18:45:59 »
* fontmod5.bas (0.3 kB. 24x1 - viewed 50 times.)

Offline endi

  • EP addict
  • *
  • Posts: 6765
  • 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 67.0.3396.87 Chrome 67.0.3396.87
    • View Profile
    • Honlapom
Re: BASIC
« Reply #1298 on: 2018.August.20. 12:11:32 »
van ez a tök jó játék: https://youtu.be/MxsYDzts1Dg
illetve ennek 2d verziója: https://youtu.be/J4M40JoZELM

na most 2d-ben, basic-ben is meg lehetne ezt csinálni, lpt margó állítással, poke-olással, tök gyors lenne zippelve, jó játékélményt adna.
el is kezdtem. :)
a 3d (izometrikus) verzió is lehetséges lenne gépi kódban talán.
ez a játék is marha jó példa arra amúgy, hogy még a mai napig ki lehet teljesen egyszerű és alapvető jó ötleteket találni, amik még a régi gépeken is megvalósíthatóak! nagyon bírom az ilyeneket.
A diplomás magyar programozó megcsinált egy pacmant egy év alatt, majd lefikázta a világ legjobb játékait. :D

Offline Lacika

  • EP addict
  • *
  • Posts: 2886
  • Country: hu
  • OS:
  • Windows NT 10.0 Windows NT 10.0
  • Browser:
  • Firefox 62.0 Firefox 62.0
    • View Profile
    • http://www.ep128.hu
Re: BASIC
« Reply #1299 on: 2018.October.06. 11:45:18 »
Elkezdtem felrakni IS-BASIC példákat a Rosettacode-ra.

Offline Lacika

  • EP addict
  • *
  • Posts: 2886
  • Country: hu
  • OS:
  • Windows NT 10.0 Windows NT 10.0
  • Browser:
  • Firefox 62.0 Firefox 62.0
    • View Profile
    • http://www.ep128.hu
Re: BASIC
« Reply #1300 on: 2018.October.20. 19:48:42 »
Rég volt "hiánypótló"program... Most sem lesz :ds_icon_cheesygrin: , viszont a "világ legfeleslegesebb programja" kategóriába benevezek egy konténerszám és egy IBAN-szám ellenőrző programmal.
« Last Edit: 2018.October.22. 15:04:35 by Lacika »

Offline szipucsu

  • EP addict
  • *
  • Posts: 7340
  • Country: hu
  • OS:
  • Windows NT 10.0 Windows NT 10.0
  • Browser:
  • Chrome 70.0.3538.67 Chrome 70.0.3538.67
    • View Profile
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: BASIC
« Reply #1301 on: 2018.October.20. 20:49:31 »
konténerszám
Nekem mindenre azt írja, hogy "Invalid lenght". De a hossz az nem lenght, hanem length, tehát a "h" a "t" után van.
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
OPEL #1:"Audi(o):" ACCESS DENIED

Offline Lacika

  • EP addict
  • *
  • Posts: 2886
  • Country: hu
  • OS:
  • Windows NT 10.0 Windows NT 10.0
  • Browser:
  • Firefox 62.0 Firefox 62.0
    • View Profile
    • http://www.ep128.hu
Re: BASIC
« Reply #1302 on: 2018.October.20. 22:14:50 »
Nekem mindenre azt írja, hogy "Invalid lenght". De a hossz az nem lenght, hanem length, tehát a "h" a "t" után van.

Kösz, azt javítom.
Próbáld ezzel. (Jobb felső sarok.) Vagy ezzel. (négy betű, hét szám)
« Last Edit: 2018.October.20. 22:21:40 by Lacika »

Offline Lacika

  • EP addict
  • *
  • Posts: 2886
  • Country: hu
  • OS:
  • Windows NT 10.0 Windows NT 10.0
  • Browser:
  • Firefox 62.0 Firefox 62.0
    • View Profile
    • http://www.ep128.hu
Re: BASIC
« Reply #1303 on: 2018.October.21. 18:54:41 »
Újabb haszontalan program: bankkártyaszám ellenőrző.
« Last Edit: 2018.October.21. 19:43:07 by Lacika »

Offline endi

  • EP addict
  • *
  • Posts: 6765
  • 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 69.0.3497.100 Chrome 69.0.3497.100
    • View Profile
    • Honlapom
Re: BASIC
« Reply #1304 on: 2018.October.24. 10:19:06 »
azon gondolkodtam, miért lassú az ep basic pl a specy basic-hez képest?
asszem volt már szó róla, de nem emlékszem mit is beszéltünk.
A diplomás magyar programozó megcsinált egy pacmant egy év alatt, majd lefikázta a világ legjobb játékait. :D