Welcome, Guest. Please login or register.


Author Topic: Turbo Pascal 3 (Read 18730 times)

Offline Povi

  • EP addict
  • *
  • Posts: 2297
  • Country: hu
    • http://povi.fw.hu
Re: Turbo Pascal 3
« Reply #60 on: 2013.December.17. 17:58:51 »
ez érdekes:
http://prog.hu/hirek/3347/JavaScript-ben+irtak+ujra+a+Borland+Turbo+Pascal+forditojat.html
Javascript-ben megírták a 3-as TP-t, vannak példaprogramok (köztük egy Mandelbrot rajzoló is), azokat át lehetne hozni EP-re is :-)
kíváncsi vagyok, az mennyi idő alatt rajzolná ki, elvileg valami optimalizált algoritmus alapján rajzol, de még csak futtában néztem rá, egyedül egy Bar() eljárást kéne még csinálni, hogy fusson de azt meg lehet vízszintesen egymás alá rajzolt vonalakkal is :-)
azért a Floodfill számomra még elég misztikus dolog... :-)
*** Speicherplatz zu klein

Offline Lacika

  • EP addict
  • *
  • Posts: 3197
  • Country: hu
    • http://www.ep128.hu
Re: Turbo Pascal 3
« Reply #61 on: 2014.January.16. 21:22:00 »
A BASIC topic-ba becsatolt, Logo-ból konvertált programokat Pascal-ba már kicsit nyögvenyelősebb "átírni" (típuskonverzió, szögfüggvények csak radiánban) de legalább gyorsabb...
« Last Edit: 2014.January.16. 21:29:52 by Lacika »

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14731
  • Country: hu
    • http://enterprise.iko.hu/
Re: Turbo Pascal 3
« Reply #62 on: 2014.April.26. 15:36:17 »
Egy adag Turbo Pascal leírás.

Offline Zozosoft

  • Global Moderator
  • EP addict
  • *
  • Posts: 14731
  • Country: hu
    • http://enterprise.iko.hu/
Re: Turbo Pascal 3
« Reply #63 on: 2016.May.19. 13:47:34 »
Valaki volt olyan elszánt, hogy visszafejtette a CP/M Turbo Pascal-t!

Érdekes projekt lenne átírni CP/M-ről EXOS-ra, vagy legalább azt, hogy rendes EP programot fordítson.

Offline RetroJátékos

  • Newbie
  • Posts: 8
Re: Turbo Pascal 3
« Reply #64 on: 2018.January.30. 21:50:30 »
Sziasztok!
Kicsit felkavarom az állóvizet. ;-)
Jól sejtem, hogy a TP3 a lefordított programot a fordítást végző gép memóriakonfigurációjához igazítja?
Egyelőre pusztán csak tesztelési céllal kipróbáltam, hogy az Enterprise-on, IS-DOS alatt TP3-mal lefordított programok futnak-e TVC-n, VT-DOS alatt. Az eredmény pedig "Not enough memory/Program aborted" lett. Ha 96k-ra csökkentettem az EP emulátor RAM-ját, és úgy fordítotam le ugyanazt a forrást, az viszont lefutott TVC/VT-DOS alatt. Illetve ugyanazt a forrást VT-DOS alatt, ugyanazzal a TP3-mal lefordítva működött EP-n is.
Erre nincs esetleg valami bevett megoldás, ha már a CP/M-es világnak épp az lenne az egyik előnye, hogy egyszer lefordítva a program minden más CP/M-es gépen fusson?

Offline Povi

  • EP addict
  • *
  • Posts: 2297
  • Country: hu
    • http://povi.fw.hu
Re: Turbo Pascal 3
« Reply #65 on: 2018.January.30. 21:55:19 »
Sziasztok!
Kicsit felkavarom az állóvizet. ;-)
Jól sejtem, hogy a TP3 a lefordított programot a fordítást végző gép memóriakonfigurációjához igazítja?
Egyelőre pusztán csak tesztelési céllal kipróbáltam, hogy az Enterprise-on, IS-DOS alatt TP3-mal lefordított programok futnak-e TVC-n, VT-DOS alatt. Az eredmény pedig "Not enough memory/Program aborted" lett. Ha 96k-ra csökkentettem az EP emulátor RAM-ját, és úgy fordítotam le ugyanazt a forrást, az viszont lefutott TVC/VT-DOS alatt. Illetve ugyanazt a forrást VT-DOS alatt, ugyanazzal a TP3-mal lefordítva működött EP-n is.
Erre nincs esetleg valami bevett megoldás, ha már a CP/M-es világnak épp az lenne az egyik előnye, hogy egyszer lefordítva a program minden más CP/M-es gépen fusson?
Ez érdekes, én úgy tudtam, hogy a CP/M nem kezel 64K-nál nagyobb memóriát...
*** Speicherplatz zu klein

Offline RetroJátékos

  • Newbie
  • Posts: 8
Re: Turbo Pascal 3
« Reply #66 on: 2018.January.30. 23:11:52 »
Nem tűnik úgy, hogy többet használna... lehet, hogy pl. TVC-n valami miatt kevesebbet ér el?
Lefordítottam egy egyetlen writeln-t tartalmazó forrást, 128k-s konfiguráció esetén fordításkor a következő adatokat kaptam:
Code: 46 bytes
Free: 48297 bytes
Data: 135 bytes.
Ugyanezt kaptam 128k-nál nagyobb (konkrétan 3,5M) RAM esetén.
96k RAM-nál viszont ez a következőként alakult:
Code: 46 bytes
Free: 31913 bytes
Data: 135 bytes.
64k-val el sem indult a fordító.
TVC-n (VT-DOS) pedig ezeket az adatokat kaptam:
Code: 46 bytes
Free: 45993 bytes
Data: 135 bytes.
FC-vel ellenőriztem, az egyes .com-ok is különbözőek lettek, méretre ugyanakkorák, de van bennük pár eltérő bájt.

Offline Povi

  • EP addict
  • *
  • Posts: 2297
  • Country: hu
    • http://povi.fw.hu
Re: Turbo Pascal 3
« Reply #67 on: 2018.January.31. 11:50:20 »
Nem tűnik úgy, hogy többet használna... lehet, hogy pl. TVC-n valami miatt kevesebbet ér el?
Lefordítottam egy egyetlen writeln-t tartalmazó forrást, 128k-s konfiguráció esetén fordításkor a következő adatokat kaptam:
Code: 46 bytes
Free: 48297 bytes
Data: 135 bytes.
Ugyanezt kaptam 128k-nál nagyobb (konkrétan 3,5M) RAM esetén.
96k RAM-nál viszont ez a következőként alakult:
Code: 46 bytes
Free: 31913 bytes
Data: 135 bytes.
64k-val el sem indult a fordító.
TVC-n (VT-DOS) pedig ezeket az adatokat kaptam:
Code: 46 bytes
Free: 45993 bytes
Data: 135 bytes.
FC-vel ellenőriztem, az egyes .com-ok is különbözőek lettek, méretre ugyanakkorák, de van bennük pár eltérő bájt.
Akkor itt inkább olyasmi lehet a probléma, hogy az EP-n a ISDOS több szabad memóriát hagy a Pascal számára, mint a VT-DOS.
Magyarul az IS-DOS is "csak" 64k-t "lát", de abból több marad szabad, mint a VT-DOS-on.
*** Speicherplatz zu klein