ENTERPRISE KLUB
2024. március 2.,  14-19 óráig
1074 Budapest, Károly krt. 3/A.
Részletek
Welcome, Guest. Please login or register.


Author Topic: HiSoft Pascal (Read 87219 times)

Online geco

  • EP addict
  • *
  • Posts: 7022
  • Country: hu
    • Támogató Támogató
Re: HiSoft Pascal
« Reply #255 on: 2016.April.16. 00:42:34 »
Kezd tetszeni az attribútum üzemmód. Most, hogy már kezdem érteni... ;-)
jó lett :) ,mennyivel gyorsabb, mint a basic verzió?

Offline Lacika

  • EP addict
  • *
  • Posts: 3182
  • Country: hu
    • http://www.ep128.hu
Re: HiSoft Pascal
« Reply #256 on: 2016.April.16. 07:45:00 »
Ez jó kérdés...
A 9. "sebességi fokozatot" választva fut várakozási ciklusok nélkül, abban a fokozatban lehet összemérni a BASIC változattal.

Offline Lacika

  • EP addict
  • *
  • Posts: 3182
  • Country: hu
    • http://www.ep128.hu
Re: HiSoft Pascal
« Reply #257 on: 2016.April.16. 11:10:50 »
Ez már ki van egészítve néhány grafikai elemmel. "Cheat" 'A'-'E' billentyűkkel.


Offline szipucsu

  • Global Moderator
  • EP addict
  • *
  • Posts: 9845
  • Country: hu
    • Támogató Támogató
    • Webnyelv.hu - Tanuljunk nyelveket!
Re: HiSoft Pascal
« Reply #258 on: 2016.April.16. 13:44:18 »
Ez már ki van egészítve néhány grafikai elemmel. "Cheat" 'A'-'E' billentyűkkel.
Nem rossz!
Az a két fajta repcsi/bomba változat van? Azokat te tervezted?
A csúcsos háztetődet ellopom szerintem a basic változatomba.
Illetve nem lopom ki sem a háztetőt, sem a másik repcsi/bomba alakját, mert nem tudom. Ezeknek a set character formátumát fel tudnád tenni?
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: 14685
  • Country: hu
    • http://enterprise.iko.hu/
Re: HiSoft Pascal
« Reply #259 on: 2016.April.16. 13:53:19 »
A csúcsos háztetődet ellopom szerintem a basic változatomba.
Illetve nem lopom ki sem a háztetőt, sem a másik repcsi/bomba alakját, mert nem tudom. Ezeknek a set character formátumát fel tudnád tenni?
Ha belenézel a PAS-ba, szerintem elég egyértelmű :-)

Offline Lacika

  • EP addict
  • *
  • Posts: 3182
  • Country: hu
    • http://www.ep128.hu
Re: HiSoft Pascal
« Reply #260 on: 2016.April.16. 14:08:28 »
Nem rossz!
Az a két fajta repcsi/bomba változat van? Azokat te tervezted?
A csúcsos háztetődet ellopom szerintem a basic változatomba.
Illetve nem lopom ki sem a háztetőt, sem a másik repcsi/bomba alakját, mert nem tudom. Ezeknek a set character formátumát fel tudnád tenni?

Nem csak két fajta van, hanem A, B, C, D, E. Csak egyet rajzoltam, a többi ismerős lesz Szipucsunak... :oops:
A karakterek adatait könnyű kinézni, a BASIC "SET CHARACTER char,x1,x2,x3,x4,x5,x6,x7,x8,x9" parancs szinonim a "CHARACTER(char,x1,x2,x3,x4,x5,x6,x7,x8,x9)" paranccsal. A háztetők ASCII kódjai sorban követik egymást, így nincs szükség az IF-szerkezetre a karakterek kirajzolásához. Ugyanígy a romos háztető kirajzolásához felesleges tárolni a házak színeit tömbben és újra kiválasztani a megfelelő színt, mert az a képernyőn már tárolva van. Életemben először használtam a SET ATTRIBUTES parancsot, illetve tegnap derült ki, hogy kifelejtettük a Hisoft Pascal grafikai rutingyűjteményéből... Szerencsére rövidke escape-szekvencia.
Esetleg ha megkérjük Povit, hátha berakja, illteve szükség lenne SPOKE, SPEEK-re.
« Last Edit: 2016.April.16. 14:16:08 by Lacika »

Offline Lacika

  • EP addict
  • *
  • Posts: 3182
  • Country: hu
    • http://www.ep128.hu
Re: HiSoft Pascal
« Reply #261 on: 2016.April.16. 14:09:58 »
Ezeknek a set character formátumát fel tudnád tenni?

Csúcsos háztető:
Character(146,0,1,3,7,14,30,63,127,255);
Character(147,0,128,192,224,112,120,252,254,255)

Repcsi, bomba:
Character(37,0,48,56,60,63,127,127,7,7);
Character(38,0,0,0,56,230,255,248,128,0);
Character(132,34,42,62,28,28,28,28,8,8)
« Last Edit: 2016.April.16. 14:29:58 by Lacika »

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14685
  • Country: hu
    • http://enterprise.iko.hu/
Re: HiSoft Pascal
« Reply #262 on: 2016.October.12. 12:07:55 »
Povi! Az 1.2-ből nem tudnál ROM verziót csinálni?

Offline IstvanV

  • EP addict
  • *
  • Posts: 4822
Re: HiSoft Pascal
« Reply #263 on: 2016.October.25. 23:59:45 »
Az 1.1-es ROM és az 1.2-es .com verzió alapján:
[ Guests cannot view attachments ]
[ Guests cannot view attachments ]
[ Guests cannot view attachments ]
[ Guests cannot view attachments ]

Szerk.: epcompress -m3 változat, ez néhány száz byte-al kevesebb (kihasználatlan) szabad helyet hagy a ROM végén, viszont néhány tizedmásodperccel gyorsabban indul: :)
[ Guests cannot view attachments ]
[ Guests cannot view attachments ]
[ Guests cannot view attachments ]
[ Guests cannot view attachments ]
A decompress_m3.s-ben található decompressProgram rutin ROM-ból fix 100h kezdőcímre való kitömörítéshez készült és csak 114 byte méretű, talán hasznos lehet más ROM-okban is.

Esetleg a :HELP HP a copyright szövegnél említhetné Povi módosításait is az 1.2 verzióban?
« Last Edit: 2016.October.26. 11:22:53 by IstvanV »

Offline RetroJátékos

  • Newbie
  • Posts: 8
Re: HiSoft Pascal
« Reply #264 on: 2017.January.21. 21:30:57 »
Sziasztok!
Ha nem probléma, lenne pár kezdő szintű kérdésem a Hisoft Pascallal kapcsolatban.

Elsősorban a grafikával kapcsolatban.
A GRAFON utasításnál az első paraméternek, a csatorna számának mit kell megadni? Ha jól tudom, 101-es a grafikus képernyő csatornája, de láttam programokat, amiben más csatornaszámok voltak. Olyankor ez hogy működik?
Továbbá: két csatornával megvalósítható, hogy pl. az egyik lap látszik, közben a másikra rajzolok?
Ha nem az alapértelmezett csatornát használom grafikához, akkor ezt kell külön jelezni a rendszernek? Vagy ilyenkor a szükséges memória lefoglalása, meg hasonlók automatikusan történnek?

Szintén GRAFON, a második és harmadik paraméter (mód és színmód) mely értékei mit jelentenek?
Valamint az X- és Y-méretet pixelekben kell megadni?

Más dolog: a Hisoft Pascal kézikönyvében ez áll a fordításról: "Lefordítja a forrásszöveget, de nem futtatható formában"
Hogy érti, hogy nem futtatható formában? És hogy lehet akkor rendes futtatható állományt létrehozni?

Előre is köszönöm a segítséget!

Offline gflorez

  • EP addict
  • *
  • Posts: 3594
  • Country: es
    • Támogató Támogató
Re: HiSoft Pascal
« Reply #265 on: 2017.January.21. 22:19:25 »
Az emulátor, ha betölti a EPDOS.Rom, akkor használja a ":CHANS" parancsot Basic, Pascal tudni, hogy melyik a csatornákat.

Csak azt, hogy meg kell fordítani őket decimális. 255, FF az alapértelmezett csatorna, amely általában arra utal, hogy az editor csatorna.

A Basic az alapértelmezett szöveg csatorna 102, grafikák a 101, de Pascal az alapértelmezett szöveg csatorna 120.

Szintén EXDOS, ISDOS, LISP vagy negyedik különböző alapértelmezett csatornát a szöveg vagy grafika.

------------------------

On the emulator, if you load the EPDOS.Rom, you can use the ":CHANS" command on Basic or Pascal to know which are the channels.

Only that you must translate them to decimal. 255, FF is the default channel that usually points to the editor channel.

On Basic the default video text channel is 102, graphics the 101, but on Pascal the default video text channel is 120.

Also EXDOS, ISDOS, LISP or FORTH use different default channels for text or graphics.
« Last Edit: 2017.January.21. 23:38:57 by gflorez »

Offline Povi

  • EP addict
  • *
  • Posts: 2270
  • Country: hu
    • http://povi.fw.hu
Re: HiSoft Pascal
« Reply #266 on: 2017.January.22. 21:24:34 »
Szintén GRAFON, a második és harmadik paraméter (mód és színmód) mely értékei mit jelentenek?
Valamint az X- és Y-méretet pixelekben kell megadni?

A GRAFON-nal hozod létre a grafikus videolapot. A csatorna szám bármi lehet (amennyiben nem foglalt), teljesen jó a 101-es is.
A mód lehet 1, 5, vagy 15. Az 1 = nagyfelbontású, 5 = kisfelbontású, 15 = attribútum mód.
A színmód:
0 : 2 szín
1 : 4 szín
2 : 16 szín
3 : 256 szín
az attribútum módot  a 0 színmóddal (2 szín) kell megnyitni, annak ellenére, hogy valójában 16 színed lesz

az x és az y a kép szélessége és magassága karakterben megadott mértékegységben

tehán a BASIC GRAPHICS parancshoz (ami ugye alapból 4 színű mód lesz) hasonló módot így tudsz létrehozni:
Code: [Select]
GRAFON(101,1,3,40,20);
DISPLAY(101,1,1,20);
*** Speicherplatz zu klein

Offline Povi

  • EP addict
  • *
  • Posts: 2270
  • Country: hu
    • http://povi.fw.hu
Re: HiSoft Pascal
« Reply #267 on: 2017.January.22. 21:29:59 »
Más dolog: a Hisoft Pascal kézikönyvében ez áll a fordításról: "Lefordítja a forrásszöveget, de nem futtatható formában"
Hogy érti, hogy nem futtatható formában? És hogy lehet akkor rendes futtatható állományt létrehozni?

A Translate paranccsal tudsz önnálóat futtatható fájlba fordítani a programot:
pl.:
T,,valami.com

*** Speicherplatz zu klein

Offline RetroJátékos

  • Newbie
  • Posts: 8
Re: HiSoft Pascal
« Reply #268 on: 2017.February.14. 12:22:19 »
Köszönöm a segítséget! :-)

Offline Povi

  • EP addict
  • *
  • Posts: 2270
  • Country: hu
    • http://povi.fw.hu
Re: HiSoft Pascal
« Reply #269 on: 2017.April.25. 13:30:14 »
Találtam egy súlyos bug-ot a HiSoft Pascalban.

Az < összehasonlító operátor hibás eredményt ad, ha a két oldal különbsége nagyobb, mint 32768.

Tehát:
-1 < 32767 = TRUE
-2 < 32767 = FALSE

Az > összehasonlító operátor hibás eredményt ad, ha a két oldal különbsége nagyobb, mint 32767.

Tehát:
0 > 32767 = FALSE
-1 > 32767 = TRUE
*** Speicherplatz zu klein