à ÿÿ ( (!9"þ1þÍ© FORM - copyright 1984 by Irv Hoff - 11/20/84 :]þ Â/Í© To use: B>FORM A:HELLO.ASM 1) B>FORM HELLO.ASM A:NAME.NEW 2) 1) uses original name for new file, original now named .BAK 2) original file stays intact, new file has new nameÃ3 :mþ Â`K!\ ÍÎ KÍŒ!\ ÍÎ ŒÍÃk!lKÍÎ ¯2|2k\Í<¢Í© ++ SOURCE FILE NOT FOUND ++Ã3 ¯2W2k!€"Ÿ!"¡KÍ<Ê9Í© File exists - erase? (Y/N): Íæþ ÊÁþ ÊÁþ0Ú þ:ÚÁæ_þAÊÁþYÊ+Í© [Returning to CP/M]Ã# KÍÍ© KÍ<ÂbÍ© NO DIR SPACE: OUTPUTÃ# Í;Í© 0 ÆÿÅÕ€Í\ÍÑÁ·Ê·þÊ Í© ++ SOURCE FILE READ ERROR ++Ã# !€~æþÊ6þÊ úþ ÂÛõå*º#"ºáñþ Âùå*À#"Àá> xæ·ÂéÃ6þ Â6Ío à > > Ê!þ Êþ Â)Ê)Í÷ Ã> > å:£þ6Ú/͸Í> K~þ Â\:¯·Ê":£þ8~Úžþ:Ê€þ ÊÞþ Ê"# ~þ;Â\:¯·Ê"Äå*°#"°"´á:¯·Ê":£þ8ÒÂ# ~þ Ê"# ~þ':¬µ/2¬·~žþ;ÌnÞ# ~þ Ê"+ : ¸ÊðÒí> Ãð:¯·Ê": =¸ÚðÍÍ!Í4ÍÍ!ÍJÃ"xþÐxæ·È> Ã: =¸Ø> Ã# ~þ Ê!þ;Ê„þ ÊÉþ Èþ Ê!# ~þ;Ê„Ã4þ':¬ÂW/2¬·Âa~þ;Ên# ~þ ÊÃJþ Ên> :¬·Âa:£þ8:ʨ:£þ9: ʨ:£þ6:ʨ:¹Êµå*¸#"¸áOy=¸ÚÄ> ö~:·ÊÒ> #~þ ÊÒþ.ÊÒ:·Êì~#͇ :«·~Êþ":¨Â/2¨·~ÂþAÚþ[Òö þ Ê!#Ãì> á¯2¨2¬!KÃ%Í> ~þ Ê":£·Ê�þ4Ò�#~þ:Êbþ Êpþ ÂD6:#6 #6 ++Ãu"²å*°#"°Ãv6:"²å*´#"´á#~þ Ê"+:£·ÂÃÃ"#~þ Ê"þ Ê"þ:Â�å*°#"°á:£þ4Òu6 #~þ Â"6 +6 Ã"#~þ ÊÃþ Ê":£þ2Êàþ3ÊáÃ!"¾~æ_þEÊúþSÊúþDÊúþMÂ"ç Í© Ã""¾~æ_þEÊþDÊþRÂ"û Í© Ã"å!ÆÍè~þ Ú…:£þ5~Ê"þ Âß:­·ÂP:¬·ÊP> õÃ:®<2®:¦<2¦æ·Â*:®þÂ|:­·Ê|¯2®> Ã"¯2®> Ã"þ ÊËþ ʧþ Â*¯2®:¦Ææø2¦> Ã"å*¶#"¶õ:¥ÂÉÍ© *¶Í > Í.ñáõ¯2¦2ª2¬2­2®Ã!õþ'Âì:¬/2¬þ;Â:­·Â:¬·Â<2­:¦<2¦:®·Ê!õ> åÍ× áñ=2®ÂñåÍc Í× á#þ Â(Æÿá,ÊsúÍ© String to start (15 chars. max): !;͸ þ Ê–þÂÍŸÃlþ Úlw#xþÚlͲÍ©ÃlÍ© Éx·Â©> ô+> Í.6>Í.É:¯·À!Æ;·Êã;~þ Ⱦ#ÂË·Êã¾#ÊÕÃÈ<2¯É:£þ5Èå: =O ~þ Ê þ:Â! #"¾Í¡ þEÊ þIÊ þMÂ! ½ 2¤Í© ¯2¤áÉÍ¡ þ;Èþ ÊW þ ÂÀ Í¡ þ ÊG þ;ÊG þ À*¾N6 #~qOþ ÂM É+6 #6 #6 ÃG O:ª·Â� :­·yÀ:¬·yÀ:£þ5yÈ:£þ4yÊ  þaØþ{Ðæ_Éyþ":¨Â� /2¨·yÀþAØþ[Ðö É*¾·ÊÇ GÍ¡ ¸Ê¬ ·Âº þ?© É:¤·Â' :¥·Âu Í¡ þ Êê þ;Êê þ Êê ÃÀ *²6 *´+"´Éå*Ä#"ÄáÉÅÕåöÿÿÿ Ú  ë|µÄ {Æ0Í.áÑÁÉ\ÍKÍÍ© *þùÉ!Æ~þ;ʈ þ ʈ þ*Ê~ þTÊe þtÊe þ Â� #~ÃQ 2¥ß ͬ ¯2¥Ã� ¯2¥ááÃ":£þ5Ê™ 6;:¯·Ê™ :©·Ê™ 2ªáÃ"!ÆÉ~#þaØæ_Éã~#·Ê¶ Í.ê ãÉåÅÍæÁáþÊ þÊ É~#ÂÎ Éõþ Âä *¼#"¼ñõþ Âò *Â#"Â*Ÿë*¡}“|šÚ_ !"¡ë*Ÿ{•zœÒQ *�ëÍKÍ·Â4 €*¡"¡Ã Í© DISK FULL: OUTPUTñÃ# €Í!"¡ë*�ëñ*¡#"¡ÉåÕÅ ÍÒ¹ ÍþÊŠ þ¹ ÁÑááÍ© ++ ABORTED, OUTPUT FILE DELETED ++Ã# ÁÑáÉIFENDIFIFFIFTELSEMACROENDM?TITLE ?EQUSETMACRODEFL?EQUDBDWRSDDRBRW?Í© *¶Í Í© *¡}æÂ0 "Ÿ>õÍ× ñÂ$ \ÍKÍ<Âl Í© CANNOT CLOSE OUTPUTÃÍ© *¶Í Í© lines *ºÍ Í© original spaces *ÀÍ Í© original tabs *°Í Í© original colons after labels *¼Í Í© current spaces *ÂÍ Í© current tabs *´Í Í© current colons after labels *ÄÍ Í© trailing spaces deleted :£þ6Úß Í© *¸Í Í© comment lines moved :¯·Âß Í© ++ No string match found, changes not made ++:Tþ$Â3 !\lÍÎ !]}ÍÎ !\Œ ÍÎ ŒÍlÍ!]\ÍÎ KÍÃ3 ÅÕå_ÍáÑÁÉÍ© 0) remove colons from all labels 1) add colons to all labels 2) colons for M80 assemblers 3) colons for 8086 assemblers 4) all source code to lower-case 5) remove tabs, case unaffected * 6) inline comments to column 32 * 7) inline comments to column 40 * 8) reformat source code (col 32) * 9) reformat source code (col 40) = a) inline comments to lower-case = b) full line comments to lower Í© select: ͸ þ Èþ0Ú2þ:Òþ1Ø2£þ6Ò=Éæ_þAÊ,þBÂ22©Ãì2«ÃìÍ© Ã; $$$ BAK BAK€