Category : Pascal Source Code
Archive   : 3DLAB110.ZIP
Filename : VGA256.TPU

 
Output of file : VGA256.TPU contained in archive : 3DLAB110.ZIP
TPUQâ`ÃC»ÃÓÓô  q
Ð`~Œ²4Ùúâ
`õ:qÁCpŽSVGA256¡õ°SSystem
Ä°QMaxX>ÿQMaxY>ÿO NormWidthRÿO
ThickWidthRÿQ ThicknessÿYPBytePtr€ì
qÿR
InitVGA256
R CloseVGA256
R DefineScr
>ÿ>ÿ€ìR SetLineStyle 
ÿRClear(
ÿRGetPixel0
ÿ>ÿ>ÿ.RPutPixel8
*ÿ*ÿÿRLine@
*ÿ*ÿ*ÿ*ÿÿR
FillCircleH
*ÿ*ÿ*ÿÿREllipseP
*ÿ*ÿ*ÿ*ÿÿR FillEllipseX
*ÿ*ÿ*ÿ*ÿÿ`SAsmSysmðõÿÿÿÿ (H@0PXhp8` ÿÿÿÿÿÿ ÿÿÿÿ ÿÿB ÿÿáxÿÿ'ÿÿ
ÿÿÿ@ÿÿé ÿÿ_ ÿÿúÿÿl ÿÿVGA256AsmSysSystemÂDð
VGA256.PAS¶U‰å‹F £‹F
£‹F‹V£‰ÉÊ´ÍÃU‰å0äŠFÍÉÂU‰åÄ>W¡÷&PŠFPšÉÊU‰åè¢jèÉËU‰å PèÉËU‰åŠFP¡1ҋȋڋF™š‹È‹Ú¡1ÒÁӋȋڋF
™ÁӋ‰ÇŽÂX&ˆÉÊÈ <u>ŠFP¡1ҋȋڋF™š‹È‹Ú¡1ÒÁӋȋڋF™ÁӋ‰ÇŽÂX&ˆé”<t鍡1ҋȋڋF™š‹È‹Ú¡1ÒÁӋȋڋF™ÁӉFþŠN‹Fþ+‹‰ÇŽÂ&ˆ
ŠN‹FþH‹‰ÇŽÂ&ˆ
ŠN‹Fþ‹‰ÇŽÂ&ˆ
ŠN‹Fþ@‹‰ÇŽÂ&ˆ
ŠN‹Fþ‹‰ÇŽÂ&ˆ
ÉÂÈ‹F÷&F‹‰ÇŽÂ&ŠˆFÿŠFÿÉÊU‰åŠF¢ÉÊÈ‹F
+F™1Ð)ЉFö‹F
+FPš‰Fú‹F+F ™1Ð)ЉFô‹F+F Pš‰Fø‹Fô;Fö°~@ˆFñ€~ñt-~W~ Wš~öW~ôWš~úW~øWš‹FôÑà+Fö‰Fò‹Fö‰Fî¸;FîV‰FþëÿFþ€~ñtÿv ÿvŠFPèë
ÿvÿv ŠFPèƒ~ò|‹FøF ‹FöÑà)Fòëê‹FúF‹FôÑàFò‹Fþ;Fîu¯ÿv
ÿvŠFPèÉÊ
È‹F F À|>¡1ҋȋڋF +F™;Ó*|;Ás$‹F
F À|¡1ҋȋڋF
+F™;Ó|;Áré–¡‰Fø¡1ҋȋڋF
™š‹È‹Ú¡1ÒÁӉFö1À‰Fü‹F‰Fú¡1ҋȋڋFú™š‰Fô¡1ҋȋڋFü™š‰Fò‹FÑà‹Ð¸+‰Fþ‹Fü;Fú~é‹F +Fú‰Fð‹F Fú‰Fîƒ~ð}1À‰Fð¡1ҋȋڋFî™;Ó|
;Áv¡‰Fî‹Fî+Fð‰Fìƒ~ì馋F
+Fü À|I¡1ҋȋڋF
+Fü™;Ó|3;Ás/‹Fð™‹È‹Ú‹Fö+Fò1ÒÁӋVøRPÿvìŠFPXY_ˆÄüÑéó«Éóª‹F
Fü À|I¡1ҋȋڋF
Fü™;Ó|3;Ás/‹Fð™‹È‹Ú‹FöFò1ÒÁӋVøRPÿvìŠFPXY_ˆÄüÑéó«Éóªƒ~þ}é ‹F +Fü‰Fð‹F Fü‰Fîƒ~ð}1À‰Fð¡1ҋȋڋFî™;Ó|
;Áv¡‰Fî‹Fî+Fð‰Fìƒ~ì馋F
+Fú À|I¡1ҋȋڋF
+Fú™;Ó|3;Ás/‹Fð™‹È‹Ú‹Fö+Fô1ÒÁӋVøRPÿvìŠFPXY_ˆÄüÑéó«Éóª‹F
Fú À|I¡1ҋȋڋF
Fú™;Ó|3;Ás/‹Fð™‹È‹Ú‹FöFô1ÒÁӋVøRPÿvìŠFPXY_ˆÄüÑéó«Éóª‹Fü+FúÁà
FþÿNú¡)Fôë ‹FüÁàFþÿFü¡FòéÖýÉÊU‰å‹F FP‹F
FPŠFPè‹F FP‹F
+FPŠFPè‹F +FP‹F
FPŠFPè‹F +FP‹F
+FPŠFPèÉÂ
È‹F
÷f
‰Fþ‹F÷f‰Fü‹FþÑà‰Fú‹FüÑà‰Fø1À‰Fö‹F‰Fô1À‰Fò‹Fô÷fú‰Fð‹Fô÷Ø÷fþ‰Fî‹Fò;Fð<ÿvÿv ÿvöÿvôŠFPèÿFö‹FøFò‹Fò+FüFîƒ~î|ÿNô‹Fú)Fð‹Fð)Fî뼋F
‰Fö1À‰Fô‹Fö÷fø‰Fò1À‰Fð‹Fö÷Ø÷fü‰Fî‹Fò;Fð~<ÿvÿv ÿvöÿvôŠFPèÿFô‹FúFð‹Fð+FþFîƒ~î|ÿNö‹Fø)Fò‹Fò)Fîë¼ÉÊ
È‹FF
À|>¡1ҋȋڋF+F
™;Ó*|;Ás$‹F F À|¡1ҋȋڋF +F™;Ó|;Áré‹F
÷f
‰Fø‹F÷f‰Fö‹FøÑà‰Fô‹FöÑà‰Fò1À‰Fð‹F‰Fî1À‰Fì‹Fî÷fô‰Fê‹Fî÷Ø÷fø‰F衉Fþ¡1ҋȋڋF ™š‹È‹Ú¡1ÒÁӉFü¡1ҋȋڋF‰Fú‹Fì;Fê~é%ÿFð‹FòFì‹Fì+FöFèƒ~è}é‹F+Fð‰Fæ‹FFð‰Fäƒ~æ}1À‰Fæ¡1ҋȋڋFä™;Ó|
;Áv¡‰Fä‹Fä+Fæ‰Fâƒ~â馋F +Fî À|I¡1ҋȋڋF +Fî™;Ó|3;Ás/‹F晋ȋڋFü+Fú1ÒÁӋVþRPÿvâŠFPXY_ˆÄüÑéó«Éóª‹F Fî À|I¡1ҋȋڋF Fî™;Ó|3;Ás/‹F晋ȋڋFüFú1ÒÁӋVþRPÿvâŠFPXY_ˆÄüÑéó«ÉóªÿNî¡)Fú‹Fô)Fê‹Fê)FèéÐþ‹F
‰Fð1À‰Fî‹Fð÷fò‰Fì1À‰Fê‹Fð÷Ø÷fö‰Fè¡1ҋȋڋF‰Fú‹Fì;Fêé"‹F+Fð‰Fæ‹FFð‰Fäƒ~æ}1À‰Fæ¡1ҋȋڋFä™;Ó|
;Áv¡‰Fä‹Fä+Fæ‰Fâƒ~â馋F +Fî À|I¡1ҋȋڋF +Fî™;Ó|3;Ás/‹F晋ȋڋFü+Fú1ÒÁӋVþRPÿvâŠFPXY_ˆÄüÑéó«Éóª‹F Fî À|I¡1ҋȋڋF Fî™;Ó|3;Ás/‹F晋ȋڋFüFú1ÒÁӋVþRPÿvâŠFPXY_ˆÄüÑéó«ÉóªÿFî¡Fú‹FôFê‹Fê+FøFèƒ~è|ÿNð‹Fò)Fì‹Fì)FèéÓþÉÊ
@ÈÐÐ
Ð
Ð 0`h hÐ0(4ÐÐ0(&<ÐQ0(^gІŠœ­¿ÐАÔÐ 
Ð 0p 0p7 08] 08l 08{p±pÀpùÐÐ3PÐV0(clЃ0(Ð˜0(¥ÐäÐûÐÐpÐßÐöÐÐkÐÆÐÝ88-8C8YxcxËÐÐ3–Ðœ0(©²Ð¾0(ËÐÐ-ÐOТÐîÐ'0(4ÐdÐ{НÐðÐ<

  3 Responses to “Category : Pascal Source Code
Archive   : 3DLAB110.ZIP
Filename : VGA256.TPU

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/