Welcome, Guest. Please login or register.


Author Topic: Turbo Pascal 3 (Read 11347 times)

Offline Povi

  • EP addict
  • *
  • Posts: 1873
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 25.0 Firefox 25.0
    • View Profile
    • 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: 2929
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 26.0 Firefox 26.0
    • View Profile
    • 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

  • EP addict
  • *
  • Posts: 13519
  • Country: hu
  • OS:
  • Windows 7/Server 2008 R2 Windows 7/Server 2008 R2
  • Browser:
  • Firefox 28.0 Firefox 28.0
    • View Profile
    • 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

  • EP addict
  • *
  • Posts: 13519
  • Country: hu
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 46.0 Firefox 46.0
    • View Profile
    • 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
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 51.0 Firefox 51.0
    • View Profile
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: 1873
  • Country: hu
  • OS:
  • Linux Linux
  • Browser:
  • Chrome 64.0.3282.119 Chrome 64.0.3282.119
    • View Profile
    • 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
  • OS:
  • Windows XP Windows XP
  • Browser:
  • Firefox 51.0 Firefox 51.0
    • View Profile
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: 1873
  • Country: hu
  • OS:
  • Windows NT 10.0 Windows NT 10.0
  • Browser:
  • Chrome 63.0.3239.132 Chrome 63.0.3239.132
    • View Profile
    • 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