Category : Pascal Source Code
Archive   : VPAL10.ZIP
Filename : VGAPAL60.TPU

 
Output of file : VGAPAL60.TPU contained in archive : VPAL10.ZIP
TPU9ÒPô ¤ T
T
d
d
x
™
æ&
hf ~¼6R©x«ŽÙaæIøþ`3†YVGAPAL60fæøYSYSTEMs“øYDOSK{æÒQCOLTYPE(Þ ðÞðÞRSCOLOR(ÞR PCXFILENAMEŠÿS SETPALBLACKj
S SETPALWHITE‚
S
SAVECOLORFROMš
ððS FADECOLORTO Á
ððððSFADEINPALBLACK(†
ððSFADEINPALWHITE0ß
ððSFADEOUTPALBLACK88 
ððSFADEOUTPALWHITE@ 
ððSSAVEPALHâ 
SRESTPALPì 
×S SWITCHCOLXö 
ððððS
CYCLEPALAHEAD`h

S CYCLEPALBACKh¼

ÝS
CYCLECOLAHEADp 
ðððð+S CYCLECOLBACKx‚ 
ððððS
READ256PCX€
Šÿ~*m¼6œV©x«²Ž„ÙaæIøþóÆ?ûã3Ë…QPALTYPE¥Þ ÿðÞð“Þ`R SAVEPALETTE¥ÞR TEMPPALETTE¥ÞR COLRPALETTE¥Þ³R SETCPALETTE ¥ކR
TEMPPALPTR –ðRSCRATCH –ðR REPEATCOUNT ÞðRR
DATALENGTH
ðR VIDEO_INDEX ð>R
FILE_ERROR 0ðR PAGE_ADDR ðPBUFFSIZEðñÿS COPYRIGHT€ˆé
SDEPCX€
ÚèÆRPFN"°ÿÙŠÿRX¯ÿÙÞð6RGUN®ÿÙÞðDRPCXCODE­ÿÙÞðRPCXFILE,ÿÙxðTR
PALETTE_START(ÿÙð&R
TOTAL_READ$ÿÙðhR PALETTE_FLAG#ÿÙÞð|RVERSION ÿÙð­RYÿÙðð–SBAILOUT˜Ù 
SWRITEPAL 5
SREADPAL¨`
tRXþÿaððŒRXþÿ†ðð¤³ROC"«ððRXþÿ«ððxFXjROC"×ððËRSPEED"×ððQBTYPE Þ ðÞðùÞìQRTYPE8Þ ðÆð&ÞRTEMPXüÿ× ÞRSTEPSêÿ×8ÞRXèÿ×ððÚRYæÿ×ðð;¢RSPEED"ððRXþÿððRYüÿððRSPöÿÆð°RCOUNTðÿÆð&  ûRSPEED"3ððRXþÿ3ððéRYüÿ3ððRSPöÿ3Æð RCOUNTðÿ3Æðb ~ T RSPEED"`ððRXþÿ`ððB RYüÿ`ððRZúÿ`ððp RSPôÿ`Æð· Ó © RSPEED"ŽððRXþÿŽðð— RYüÿŽððRZúÿŽððÅ RSPôÿŽÆð
K
Z
RAA"þððRBB"þððQBTYPE=
Þ ðÞð+
Þ
RTXüÿþ=
Þ
RXúÿþððŸ
®
QBTYPE‘
Þ ðÞð
ÞRTXüÿ+‘
Þr
RXúÿ+ððó
 QBTYPEå
Þ ðÞðÓ
ÞRTXüÿRå
ÞÆ
RXúÿRðð e t RAA"xððRBB"xððQBTYPEW Þ ðÞðE Þ) RTXüÿxW Þ8 RXúÿxððŒ × æ RAA"©ððRBB"©ððQBTYPEÉ Þ ðÞð· ޛ RTXüÿ©É Þª RXúÿ©ðð¨08@HPX`hpx€ˆ˜  (P?820<`J=@®H8ßH8òF °°ÂP7÷`N®`ið€"(ž"(¬~8º’xЏxêéxæx!=H=T VGAPAL60SYSTEM#MC:\TP\VGAPAL\VGAPAL60.PAS4M<#èj
Ùo+"

 
-
 œ%
?Ã'
aî 
†û 
«
×
#!7 
IG  4
$
* 3F$

7 `\

*Žo


* ¼„
ÝŠ
þ• 
+¨
R¿x× 

©ð 


 ëM
Portions copyright (c) 1993 RAM Software Development All rights reserved.΋>1Ɋ‹Å6óü9Þt¬€ù
<Àr4ÀˆÁëìªëéóªëå‰>ˆÃU‰å1Àš‹~Ç,ÿWššÿ6ÿ6¸ñÿPš]ÂU‰å¸âšìâÄ~W~°W¸OPšÇ ¾,ÿW~°Wš¾,ÿW¸Pšš À°t@¢€>t鶸ñÿPš£‰¾,ÿW¾ ÿW¸P1ÀPPšš€¾!ÿ°s@¢€>tUèém¾,ÿWšš-ƒÚ‰†(ÿ‰–*ÿ¾,ÿW¸€1ÒRPššÇ†$ÿ€Ç†&ÿÆ1À£¾,ÿWÄ>W¸ñÿP¿Wšš¡1Ò†$ÿ–&ÿ‹†$ÿ‹–&ÿ;–*ÿ|;†(ÿv‹†$ÿ‹–&ÿ+†(ÿ–*ÿ)荾,ÿWššÀu‹†$ÿ‹–&ÿ;–*ÿ |ƒ;†(ÿsézÿ¾,ÿWÿ¶*ÿÿ¶(ÿšš¾,ÿW¾#ÿW¸P1ÀPPšš€¾#ÿ °t@¢€>tUèëL¾,ÿW¿W¸P1ÀPPšš1À‰†ÿëÿ†ÿ‹¾ÿŠ…0ä¹Ó苾ÿˆ…¾ÿÿuÝUè‰ì]ÊU‰å1ÀšU‰åVúºÚì¨uûì¨tû‹6ºÈ°îB¹ŠîFŠîFŠîFâòû^]]ÃU‰å1ÀšU‰åVúºÚì¨uûì¨tû‹6ºÈ°îB¹ƒîˆìFˆìFˆìFâòû^]]ÃU‰å¸šƒìè1À‰FþëÿFþ‹~þŠ…‹~þˆ…~þÿuè¿W¸P°Pšè‰ì]ËU‰å¸šƒìè1À‰FþëÿFþ‹~þŠ…‹~þˆ…~þÿuè¿W¸P°?Pšè‰ì]ËU‰å¸šƒìè‹F‹ðÑàð‰F1À‰FþëÿFþ‹FFþ‹øŠ…‹~þˆ…ƒ~þuä‰ì]ÊU‰å¸šƒìè‹F‹ðÑàð‰F1À‰FèëÿFè‹FèF‹øŠ…‹~è:…v#‹~芅0ä‹Ð‹FèF‹øŠ…0ä+‹~èˆCüë!‹FèF‹øŠ…0ä‹Ð‹~芅0ä+‹~èˆCü‹F™šRSP‹~èŠCü0ä1ҚY^_š‹~èÑç‹÷Ñç÷‰Cê‰[ì‰Sî‹FèF‹øŠ…‹~èˆCüƒ~ètéRÿ‹F‰Fä1À;Fä~éȉFèëÿFè1À‰FæëÿFæ‹~æŠCü‹~æ:…vI‹F虚‹~æÑç‹÷Ñç÷‹Kê‹sì‹{‹È‹Ú‹~æŠCü0ä1Ò+ÁӊЋFæF‹øˆ•ëG‹F虚‹~æÑç‹÷Ñç÷‹Kê‹sì‹{‹È‹Ú‹~æŠCü0ä1ÒÁӊЋFæF‹øˆ•ƒ~ætéUÿè‹Fè;Fäté=ÿ‰ì]ÊU‰å¸šƒì‹F™šRSP¸1Û1ÒY^_š‰Fð‰^ò‰VôÇFöÇFøÇFú‹F‰Fî1À;Fîn‰FüëÿFü1À‰FþëÿFþ‹~þŠ…0ä1Қ‹Nö‹vø‹~úšš‹~þˆ…~þÿuÌè‹Fö‹^ø‹Vú‹Nð‹vò‹~ôš‰Fö‰^ø‰Vú‹Fü;Fîu—‰ì]ÊU‰å¸šƒì‹F™šRSP¸1Û1ÒY^_š‰Fð‰^ò‰VôÇFöÇFøÇFú1À‰FþëÿFþ‹~þŠ…0ä‹Ð¸?+‹~þˆ…~þÿuߋF‰Fî1À;Fî{‰FüëÿFü1À‰FþëÿFþ‹~þŠ…0ä1Қ‹Nö‹vø‹~úšš‹È‹Ú¸?1Ò+ÁӋ~þˆ…~þÿu¿è‹Fö‹^ø‹Vú‹Nð‹vò‹~ôš‰Fö‰^ø‰Vú‹Fü;FîuŠ‰ì]ÊU‰å¸ šƒì ÇFú?‹F™š¹zq¾=
¿×#š‰Fô‰^ö‰Vø1À‰FüëÿFü‹Fú™š‹Nô‹vö‹~øšš‰Fúƒ~úëD1À‰FþëÿFþ‹~þŠ…0ä1Қ‹Nô‹vö‹~øšš‹~þˆ…~þÿuÌèƒ~ü?u’‰ì]ÊU‰å¸ šƒì ÇFú?‹F™š¹zq¾=
¿×#š‰Fô‰^ö‰Vø1À‰FþëÿFþ‹~þŠ…0ä‹Ð¸?+‹~þˆ…~þÿuß1À‰FüëÿFü‹Fú™š‹Nô‹vö‹~øšš‰Fúƒ~ú}ë^1À‰FþëÿFþ‹~þŠ…0ä1Қ‹Nô‹vö‹~øšš‹~þˆ…‹~þŠ…0ä‹Ð¸?+‹~þˆ…~þÿuµèƒ~ü?téxÿ‰ì]ÊU‰å1Àšè¿W¿W¸Pš]ËU‰å1Àš¿W¿W¸Pšè]ËU‰å¸šƒìè‹F‹ðÑàð‰F‹F‹ðÑàð‰F1À‰FúëÿFú‹FFú‹øŠ…‹~úˆCü‹FFú‹øŠ•‹FFú‹øˆ•‹~úŠSü‹FFú‹øˆ•ƒ~úu»è‰ì]ÊU‰å¸šƒì蠈Fü ˆFý ˆFþ1À‰FúëÿFú‹Fú‹øŠ•‹Fú‹øˆ•‹Fú‹øŠ•‹Fú@‹øˆ•‹Fú‹øŠ•‹Fú@@‹øˆ•~úüu±ŠFü¢ŠFý¢ŠFþ¢è‰ì]ËU‰å¸šƒì蠈Fü ˆFý ˆFþÇFúÿ‹Fú-‹øŠ•‹Fú-‹øˆ•‹Fú-‹øŠ•‹FúH‹øˆ•‹Fú-‹øŠ•‹FúHH‹øˆ•ÿNúƒ~úu²ŠFü¢ŠFý¢ŠFþ¢è‰ì]ËU‰å¸šƒì‹F‹ðÑàð‰F‹F‹ðÑàð‰Fè‹F‹øŠ…ˆFü‹F@‹øŠ…ˆFý‹F@@‹øŠ…ˆFþ‹F‰Fø‹F;FøU‰FúëÿFú‹Fú‹øŠ•‹Fú‹øˆ•‹Fú‹øŠ•‹Fú@‹øˆ•‹Fú‹øŠ•‹Fú@@‹øˆ•‹Fú;Føu°ŠVü‹F‹øˆ•ŠVý‹F@‹øˆ•ŠVþ‹F@@‹øˆ•è‰ì]ÊU‰å¸šƒì‹F‹ðÑàð‰F‹F‹ðÑàð‰Fè‹F‹øŠ…ˆFü‹F@‹øŠ…ˆFý‹F@@‹øŠ…ˆFþ‹F‰Fø‹F;Fø|R‰FúëÿNú‹Fú-‹øŠ•‹Fú‹øˆ•‹FúHH‹øŠ•‹Fú@‹øˆ•‹FúH‹øŠ•‹Fú@@‹øˆ•‹Fú;Føu³ŠVü‹F‹øˆ•ŠVý‹F@‹øˆ•ŠVþ‹F@@‹øˆ•è‰ì]ÊU‰å1Àšè¸ŒÚ£‰¿W¸P°Pš¿W¸P°Pš]ː   
  8 < 0  0` 0  # 0* 0  0` $ 0H4 0PC 0ˆH T X 0e j n 0˜… 0Š ™ ˜¤ 0¸° 0µ 0¨Õ 0ڐ ì ò ü
 0˜
 0

HK 0ÀT 0Y 0¨‰ 0Ž 0˜§ 0¬ » ¿˜Æ Ñ 0˜Þ 0ã ù ˜ 0   0   0 ¨  '1 0à= B 0 ¨  '1 0à= B 0 ¨18 0 ¨18AQit 0˜… 0˜— 0ˆŸÁÿ 0˜ 0€! 0¨&H 0˜Q 0€j 0¨o‘  0  0˜ 0ˆ% e 0˜l 0€z 0¨ˆ ’ 0p§ 0  0˜ 0ˆ% P` 0˜” 0€¢ 0¨§½ Ç 0pÜ 0  0˜ 0€& 0˜B 0€P 0 Us 0˜z 0€ˆ 0 –   0  0˜ 0€&BR 0˜j 0€x 0 }› 0˜¢ 0€° 0 µ¾ŐÕ ß 0 ¨  0  0   0   0 ¨=O[m v 0 ¨7COYepý}þƒÿ‰ Œ 0 ¨ýþÿ2>JT`kz€† ‰ 0 ¨'3@Ns‹•¡¬ÐАÞ á 0 ¨'3@NsŠ”ž©À͐Û Þ 0 ˆ    0à&+ 0à7

  3 Responses to “Category : Pascal Source Code
Archive   : VPAL10.ZIP
Filename : VGAPAL60.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/