Category : Pascal Source Code
Archive   : LTCOMM50.ZIP
Filename : LCTKRNL.TPU

 
Output of file : LCTKRNL.TPU contained in archive : LTCOMM50.ZIP
TPU5Â@ªB š ž ¢ Ä Ä ,@@~qaCøøl}—@Êӏ¾— ÛÌU¸<ÿuH¥LCTKRNLZ•ÓSYSTEMZRwãDOSZÕ\DTRQæÝRTSQæÝXONQæÝXOFFQæÝOVERRUNQæÝ BADPARITYQæÝ-BADFRAMEQæÝBREAKDETQæÝDELTACTSQæÝDELTADSRQæÝDELTARIQæÝDELTADCDQæÝðCTSQæÝDSRQæÝ RIQæÝ@DCDQæ݀BPTRRÍ
¶ÝBYTECCBR+ÍC;7ùb# OLDVECTORSQ~ÝBASEPORTSfÖÝINTVECSy¶Ý;IRQMASKS¶ÝyOLDIRQS ¶ÝfMDMSTATS ´¶Ý MDMCTLS
ǶÝLASTERRS Û¶ÝQINTMASKS ï¶Ý´XSTATES
þÝÇINXRECDSþÝOUTXSENTS+þÝBRKRECDS?þÝÛINBUFFSRÍ? INBUFFLENShÆݍINBUFFCTS}ÆÝ+INBUFFMKS’ÆÝïINHEADS¥͒INTAILS¸ÍR INBUFFENDS#Î͸OUTBUFFS'âÍÎ
OUTBUFFLENS+ùÆÝh OUTBUFFCTS-ÆÝ¥OUTHEADS/#ÍOUTTAILS37Íâ
OUTBUFFENDS7NÍ}SAVESTKS;b~ÝNNEWSTKS?~ÝCCBPTRRƒÍ
+ÍCCBCPORTSS²Í æ݃͢Í
PORTCHANGEU
þÝÆÝCPORTÖÝNEWBASE¶ÝNEWIRQ¶Ý NEWVECTOR VALIDATEPORTU
ƒÍÆÝCPORT COMMSETUPU 
þÝÆÝCPORTÖÝBAUDÝPARITYÆÝDATABITSÆÝSTOPBITSCOMMOPENU
þÝÆÝCPORTÖÝBAUDÝPARITYÆÝDATABITSÆÝSTOPBITSÆÝINSIZEÆÝOUTSIZEê COMMCLOSET
ÆÝCPORTCOMMPUTU
þ݃ÍCPTR¶ÝCH COMMGETU
þ݃ÍCPTR¶ÝCHSETMODEMSIGNALSU 
þÝÆÝCPORT¶ÝNEWSET
CLEARMODEMSIGNALSU$
þÝÆÝCPORT¶ÝNEWSET3FLIPMODEMSIGNALSU(
þÝÆÝCPORT¶ÝNEWSET SENDBREAKU,
þÝÆÝCPORT‘ MODEMSTATUSU0
¶ÝÆÝCPORTã ERRORSTATUSU4
¶ÝÆÝCPORT ENABLEXONU8
þÝÆÝCPORTþÝXONFLAGXOFFRECDU<
þÝÆÝCPORTXOFFSENTU@
þÝÆÝCPORTi BREAKRECDUD
þÝÆÝCPORTINTONTq
ûINTOFFT
úq0>±Ÿé@¨}`h`ÆT>siGG'@˜ˆ (08@HPX`hpx€BŸùy’ LCTKRNL.PAS LCKRNLP.OBJU‰åƒìÆFÿƒ~ u*ƒ~
t‹F
£€~tŠF¢€~tŠF¢ÆFÿë.ƒ~ u(ƒ~
t‹F
£€~tŠF¢€~tŠF¢ÆFÿŠFÿ‰ì]ÊU‰åƒì1À‰Fü‰Fþƒ~|ƒ~~ë‹FH‹øÑçÑ籌‰Fü‰Vþ‹Fü‹Vþ‰ì]ÊU‰åƒìÆFÿÿvè‰Fø‰Vú‹Fø Fúu醋F 1ҋȋڸºš‰FýŠF
ŠFü ˆFüë0=u
ŠFü ˆFüë!=u
ŠFü ˆFüë=u
ŠFü ˆFüëéõƒ~u
ŠFü ˆFüëƒ~u
ŠFü ˆFüëéÒúä!ˆF÷ŠF÷Ä~ø&
Eæ!Ä~ø‰~òŒFôÄ~ò&‹E@‹Ð°îÄ~ò&‹E@‹Ð°îÄ~ò&‹E‹Ð°€îÄ~ò&‹E‹ÐŠFýîÄ~ò&‹E@‹ÐŠFþîÄ~ò&‹E‹ÐŠFüîÄ~ò&‹E‹ÐÄ~ò&ŠE
îÄ~ò&‹E@‹ÐÄ~ò&ŠE îÄ~ò&‹E@‹ÐÄ~ò&ŠE îä!ˆF÷ŠF÷Ä~ò&ˆEÄ~ò&ŠEöЈFöŠF÷"Föæ!ûÆFÿŠFÿ‰ì]Ê
U‰åƒìÆFÿƒ~|ƒ~~é}šƒú|=Cséi~ûW¸CPš‹F=u!ÇFùø‹FùÄ~û&‰EÄ~û&ÆEÄ~û&ÆE ëz=u!ÇFùø‹FùÄ~û&‰EÄ~û&ÆEÄ~û&ÆE ëT=u&¡‰Fù‹FùÄ~û&‰E Ä~û&ˆE Ä~û&ˆEë)=u$¡‰Fù‹FùÄ~û&‰E Ä~û&ˆE Ä~û&ˆE~€|ƒ~@}~ûW¸CPšéšš‹È‹Ú‹F™;Ó|;Áv~ûW¸CPšérÄ~ûÇWÿvšš‹È‹Ú‹F™;Ó|&;Áv"Ä~ûÇWÿvš~ûW¸CPšé(Ä~ûÇ'Wÿvššƒú|8=s3Ä~ûÇ'WÿvšÄ~ûÇWÿvš~ûW¸CPšéÓÄ~ûÇ?W¸PšÄ~û&ÄE?ŒÂ‰Fò‰VôFòÄFòŒÂÄ~û&‰E?&‰UAÄ~û‰~îŒFð‹FÄ~î&‰E‹FÑà™¹÷ùÄ~î&‰E‹FÄ~î&‰E+Ä~î&ÆE
Ä~î&ÆE
Ä~î&ÆEÄ~î&ÆEÄ~î&ÆE‹F=u° PÄ~ûWš° P¸ºRPšën=u° PÄ~ûWš° P¸ºRPšëJ=u! PÄ~ûWš P¸ºRPšë$=u PÄ~ûWš P¸ºRPšÄ~û&ÆE ÄNûŒÃ‹FH‹øÑçÑ牍‰ÿvÿvŠFPÿv ÿv
èÀté}Ä~ûÇ'WÿvšÄ~ûÇWÿvšÄ~û&ÄE?ŒÂ‰Fò‰VônòÄFòŒÂÄ~û&‰E?&‰UAÄ~ûÇ?W¸Pš~ûW¸CPš‹FH‹øÑçÑç1À‰…‰…éú‹Fù‹ÐìˆFö‹Fù‹ÐìÄ~û&ˆE ‹VùìˆFö‹Fù‹ÐìˆFöúÄ~û‰~îŒFðÄ~î&ÆE Ä~î1À&‰EÄ~î&ÄEŒÂÄ~î&‰E&‰UÄ~î&ÄEŒÂÄ~î&‰E&‰U!Ä~î&ÄEŒÂ‰Fò‰VôÄ~î&‹EFòÄFòŒÂÄ~î&‰E#&‰U%Ä~î1À&‰E-Ä~î&ÄE'ŒÂÄ~î&‰E/&‰U1Ä~î&ÄE'ŒÂÄ~î&‰E3&‰U5Ä~î&ÄE'ŒÂ‰Fò‰VôÄ~î&‹E+FòÄFòŒÂÄ~î&‰E7&‰U9ûÆFÿŠFÿ‰ì]ÊU‰åƒìÿvè‰Fü‰Vþ‹Fü FþuéÅúÄ~ü‰~óŒFõÄ~ó&‹E‹Ð°îä!ˆF÷Ä~ó&ŠEÄ~ó&"EÄ~ó&ˆEŠF÷Ä~ó&
Eæ!Ä~óÇWÄ~ó&ÿušÄ~óÇ'WÄ~ó&ÿu+šÄ~ó&ÄE?ŒÂ‰Fø‰Vúnø~øW¸PšÄ~ó&ŠEPÄ~ó&ÿu&ÿ5šû~üW¸CPš‹FH‹øÑçÑç1À‰…‰…‰ì]ÊU‰åƒìÆFÿÄ~‰~ûŒFýÄ~û&‹E-Ä~û&;E+|ëzŠFÄ~û&Ä}/&ˆÄ~û&ÿE-Ä~û&ÿE/Ä~û&ÄE/ŒÂÄ~û&;U9u&;E7uÄ~û&ÄE'ŒÂÄ~û&‰E/&‰U1Ä~û&ŠE $Àu"Ä~û&ŠE Ä~û&ˆE Ä~û&‹E@‹ÐÄ~û&ŠE îÆFÿŠFÿ‰ì]ÊU‰åƒìÆFÿÄ~
‰~ûŒFýÄ~û&ƒ} Ä~&ÆëNÄ~û&Ä}&ŠÄ~&ˆÄ~û&ÿMÄ~û&ÿEÄ~û&ÄEŒÂÄ~û&;U%u&;E#uÄ~û&ÄEŒÂÄ~û&‰E&‰U!ÆFÿŠFÿ‰ì]ÊU‰åƒì
ÆFÿÿvè‰Fû‰Vý‹Fû Fýuë6Ä~û‰~÷ŒFùÄ~÷&ŠE

F Ä~÷&ˆE
úÄ~÷&‹E‹ÐÄ~÷&ŠE
îûÆFÿŠFÿ‰ì]ÊU‰åƒì
ÆFÿÿvè‰Fû‰Vý‹Fû Fýuë>ŠFöЈFúÄ~û‰~öŒFøÄ~ö&ŠE
"Fú Ä~ö&ˆE
úÄ~ö&‹E‹ÐÄ~ö&ŠE
îûÆFÿŠFÿ‰ì]ÊU‰åƒì
ÆFÿÿvè‰Fû‰Vý‹Fû Fýuë6Ä~û‰~÷ŒFùÄ~÷&ŠE
2F Ä~÷&ˆE
úÄ~÷&‹E‹ÐÄ~÷&ŠE
îûÆFÿŠFÿ‰ì]ÊU‰åƒì ÆFÿÿvè‰Fû‰Vý‹Fû Fýué›Ä~û‰~õŒF÷Ä~õ&‹E‹ÐìˆFúúÄ~õ&‹E‹ÐìˆFùŠFù$ ÀtçÄ~õ&‹E‹Ð°îÄ~õ&‹E‹ÐìˆFùŠFù$ ÀtçÄ~õ&‹E‹ÐŠFú @îÄ~õ&‹E‹ÐìˆFùŠFù$@ÀtçÄ~õ&‹E‹ÐŠFúîûÆFÿŠFÿ‰ì]ÊU‰åƒì ÆFÿÿvè‰Fû‰Vý‹Fû Fýuë*úÄ~û‰~õŒF÷Ä~õ&ŠE 0ä‰Fù‹Fù%ðÄ~õ&ˆE ŠFùˆFÿûŠFÿ‰ì]ÊU‰åƒìÆFÿÿvè‰Fû‰Vý‹Fû FýuëúÄ~û&ŠE ˆFÿÄ~û&ÆE ûŠFÿ‰ì]ÊU‰åƒì
ÆFÿÿvè‰Fû‰Vý‹Fû FýuëIÄ~û‰~÷ŒFùŠFÄ~÷&ˆE
Ä~÷&ÆEÄ~÷&ÆEÄ~÷&ŠE Ä~÷&ˆE Ä~÷&‹E@‹ÐÄ~÷&ŠE îÆFÿŠFÿ‰ì]ÊU‰åƒì
ÆFÿÿvè‰Fû‰Vý‹Fû Fýuë?úÄ~û‰~÷ŒFùÄ~÷&ŠEˆFÿÄ~÷&ÆEÄ~÷&ŠE Ä~÷&ˆE Ä~÷&‹E@‹ÐÄ~÷&ŠE îûŠFÿ‰ì]ÊU‰åƒì
ÆFÿÿvè‰Fû‰Vý‹Fû FýuëúÄ~û‰~÷ŒFùÄ~÷&ŠEˆFÿÄ~÷&ÆEûŠFÿ‰ì]ÊU‰åƒì
ÆFÿÿvè‰Fû‰Vý‹Fû FýuëúÄ~û‰~÷ŒFùÄ~÷&ŠEˆFÿÄ~÷&ÆEûŠFÿ‰ì]ÊU‰å1À££1À££1À££1À££‰ì]ËU‹ì]PSQRVWU½ŽÝÄ&‰g;&ŒW=&‹g?&ŽWA3ÀPSè%[&‹g;&ŽW=]_^ZY[XÏU‹ì]PSQRVWU½ŽÝÄ&‰g;&ŒW=&‹g?&ŽWA¸PSèâ[&‹g;&ŽW=]_^ZY[XÏU‹ì‹F‹^]‹å‡F‡^]_^ZYËU‹ì]PSQRVWU½ŽÝ‹ìÄ&‰g;&ŒW=&‹g?&ŽWA¸PSèƒ[&‹g;&ŽW= Àu&ÿw&ÿ7š…ƒÄ‹å]_^ZY[XÏU‹ì]PSQRVWU½ŽÝ‹ìÄ &‰g;&ŒW=&‹g?&ŽWA¸PSè)[&‹g;&ŽW= Àu&ÿw&ÿ7š…ƒÄ‹å]_^ZY[XÏU‹ìƒìVÄ^&‹W‹ÊƒÂ3Àì‹ðƒ~
~
ƒþu3ÀéŽû‹Æ%=véf‹ØÑã.ÿ§’àïtïÁï Ä^‹ÑƒÂ3Àì&ˆG ©t&ÆG&€g é.Ä^‹Ñ3Àì‰Fþ&€
uëM%=u&ÆGé ‹Fþ%=u
&ÆG&€O é&‹G&;G|&€u&ÆG°ÿvÿvPšÄ^&‹G&;G齊Fþ&Ä_&ˆÄ^&ÿG&ÿG&‹W&‹G&;W%té—&;G#téŽ&‹W&‹G&‰W&‰Gë|Ä^&ƒ-t&€
u &€u‹ÑƒÂì¨@tö&€w &ŠG ‹ÑBîëJ&Ä_3&Š‹ÑîÄ^&ÿO-&ÿG3&‹W5&‹G3&;W9u'&;G7u!&‹W)&‹G'&‰W5&‰G3ëÄ^‹ÑƒÂ3Àì&ˆG ‹ÑƒÂ3Àì‹ðƒþté{þú° æ ¸^‹å]ÃÐÐ&Ð2ÐJÐVÐb(020œ0ˆ7АРЪлÐËÐÕ0Œõ0œý0Œ0ˆ10œ60ŒY0Œg0ˆ{0œ€0Œ0Œ®0Œ¼0ˆÑ0XaHi Hl0\q0X…L L0\•Ð¡0XªÐ¯P³ P¶0\»ÐÇ0XÐÐÕTÙ TÜ0\áþ 0Œ,0Œ=0Œs0Œ“— 0Œn0Œƒ0Œ¥0\¼0ŒËÝá 
 !P’Pà’Pï”Pt–Pï˜PÁšPïœP ž  PV ­µp…栐 p…@0èè

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