ÿ4 MORSE CODE SEND IN BASIC BY RAJIB MITRA FOR IBM COMPATIBLE COMPUTERS. DESIGNED FOR AMATEUR RADIO OPERATORS. PLEASE DO NOT SELL FOR MONEY.\É Ý : p : sends user to setup‘"Morse Code Send","by Rajib K. Mitra, KB9DJE"›É ,CS$Û‘"Type letters to send, \ when done, or ' to change setup."A$çÞ:‹ P$ç"y"Í ‘ A$; : gets key and prints it if asked~‹ A$ç" "Í Ä ÿ,ëFARNS : these identify the key pressed and send you to the correct subroutine’ ‹ A$ç"\"Í ‰  ª ‹ A$ç"a"Í ‰ ,¿ ‹ A$ç "'"Í z׋ A$ç"b"Í ‰ 6ï‹ A$ç"c"Í ‰ @(‹ A$ç"d"Í ‰ J2‹ A$ç"e"Í ‰ T37‹ A$ç"?"Í ‰ HK<‹ A$ç"f"Í ‰ ^_A‹ A$ç"-"Í ‰ RwF‹ A$ç"g"Í ‰ hP‹ A$ç"h"Í ‰ r§Z‹ A$ç"i"Í ‰ |¿d‹ A$ç"j"Í ‰ †×x‹ A$ç"k"Í ‰ ï‚‹ A$ç"l"Í ‰ šŒ‹ A$ç"m"Í ‰ ¤–‹ A$ç"n"Í ‰ ®7 ‹ A$ç"o"Í ‰ ¸Oª‹ A$ç"p"Í ‰ Âg´‹ A$ç"q"Í ‰ ̾‹ A$ç"r"Í ‰ Ö—È‹ A$ç"s"Í ‰ à°Ò‹ A$ç"t"Í ‰ êÉÜ‹ A$ç"u"Í ‰ ôâæ‹ A$ç"v"Í ‰ þöë‹ A$ç","Í ‰ 4ð‹ A$ç"w"Í ‰ (ú‹ A$ç"x"Í ‰ <ÿ‹ A$ç"."Í ‰ >U‹ A$ç"y"Í ‰ i‹ A$ç"1"Í ‰ ¼}‹ A$ç"2"Í ‰ Æ‘‹ A$ç"3"Í ‰ Ð¥‹ A$ç"4"Í ‰ Ú¹ ‹ A$ç"5"Í ‰ äÍ ‹ A$ç"6"Í ‰ îá ‹ A$ç"7"Í ‰ øõ ‹ A$ç"8"Í ‰   ‹ A$ç"9"Í ‰  !‹ A$ç"z"Í ‰ &5‹ A$ç"0"Í ‰ I‹ A$ç"/"Í ‰  |‰  : searches again if nothing is pressedÎÄ ÿ,FARNSë : ‰  : character pause and return to key capturing routine" the following are the subroutines for the letters indicated , è : A*- Ð4.‰ D6 Ð : BN7 èX8 èb9 èl:‰ |@ Ð : C†A èB КC è¤D‰ ´J Ð : D¾K èÈL èÒM‰ âT è : EìU‰ ü^ è : F_ è` Ða è$b‰ 4h Ð : G?i ÐIj èSk‰ cr è : Hms èwt èu è‹v‰ ›| è : I¥} è¯~‰ ¿† è : Jɇ ÐÓˆ Ð݉ Ð犉 ÷ Ð : K‘ è ’ Г‰ %š è : L/› Ð9œ èC èMž‰ ]¤ Ð : Mg¥ Ðq¦‰ ® Ð : N‹¯ è•°‰ ¥¸ Ð : O¯¹ йº Ðû‰ Ó è : PÝà ÐçÄ ÐñÅ èûƉ  Ì Ð : QÍ ÐÎ è)Ï Ð3Љ CÖ è : RM× ÐWØ èaÙ‰ qà è : S{á è…â è㉠Ÿê Ð : T©ë‰ ¹ô è : UÃõ èÍö Ð×÷‰ çþ è : Vñÿ èû è Љ  è : W)  Ð3  Ð= ‰ M Ð : XW èa èk Ðu‰ … Ð : Y è™ Ð£ Э ‰ ½& Ð : ZÇ' ÐÑ( èÛ) èå*‰ õ¼ è : 1ÿ½ Ð ¾ п ÐÀ Ð'Á‰ 7Æ è : 2AÇ èKÈ ÐUÉ Ð_Ê Ðiˉ yÐ è : 3ƒÑ èÒ è—Ó Ð¡Ô Ð«Õ‰ »Ú è : 4ÅÛ èÏÜ èÙÝ èãÞ Ðí߉ ýä è : 5å èæ èç è%è è/é‰ ?î Ð : 6Iï èSð è]ñ ègò èqó‰ ø Ð : 7‹ù Еú èŸû è©ü è³ý‰ à Р: 8Í Ð× Ðá èë èõ‰   Ð : 9  Ð  Ð#  Ð-  è7 ‰ G  Ð : 0Q  Ð[  Ðe  Ðo  Ðy ‰ ‰  Ð : /“ ! è " è§ # б $ è» %‰ Ë 4 Ð : ,Õ 5 Ðß 6 èé 7 èó 8 Ðý 9 Ð!:‰ !> è : .!!? Ð+!@ è5!A Ð?!B èI!C ÐS!D‰ c!H è : ?m!I èw!J Ð!K Ћ!L è•!M èŸ!N‰ ¯!R Ð : -¹!S èÃ!T èÍ!U è×!V Ðá!W‰ ï!èÄ B, Aý!LÄ ÿ , A"°Ž"ÐÄ B, ëA!"4Ä ÿ , A'"˜Ž2" ¿ ,K"ªÀ : end subroutineŽ"´‘"Thanks for using Morse Code Send by Rajib K. Mitra, KB9DJE."Ï"¾‘"This program is designed for amateur radio operators, not"ì"È‘"to be sold for money."ó"ëþƒ(# SPEED IS SLOWER IF NUMBER IS BIGGERO# DECIMAL VALUES ARE OKŠ# SPEED CAN BE LESS THAN .75 OR MORE THAN 3Ç# TONE CAN BE LESS THAN 500 OR MORE THAN 2000$ PROPER SPEED DEPENDS ON COMPUTER SPEED, etc. $pÀ"$rÉ ,"cq cq cq de "k$u‰ ^ : sends to subroutine which searches for saved configuration˜$y the following asks questions for setupÊ$z‘"THESE ARE COLORS THAT YOU CAN CHOOSE FROM:"Ù$„‘"0 BLACK"ç$Ž‘"1 BLUE"ö$“‘"2 GREEN" %˜‘"3 LIGHT BLUE"%¢‘"4 RED"'%¬‘"5 PURPLE"6%¶‘"6 BROWN"E%À‘"7 WHITE"i%Ê‘:… "WHICH FOREGROUND COLOR ";Z}%Ô¿ Z : ‘"0 DARK"%Ù¿  : ‘" OR"¦%Þ¿ Zé : ‘"1 LIGHT"®%ã¿ ¶%è… XÈ%ò‹ Xç Í ZçZéÐ%÷¿ Zó%ü‘:… "WHICH BACKROUND COLOR ";C&ý‹ CçZ Í ‰ 8X&þ…"enter send speed <.75 to 3> (not in wpm) ";A : …"enter spacing speed";FARNS¢&ÿ…"enter tone <500 to 2000> (in hertz) ";B: … "show letters ";P$Ü&…"please enter your callsign to be stored in F1 ";CS$*'… "WOULD YOU LIKE TO SAVE THE INFO TO THE PRESENT DISK AND DIRECTORY ";V$4'‰ d>'¿ Z,CD'À'‘"BE SURE YOU ARE IN LOWER CASE (caps lock light off)"Ÿ'É ,CS$ : sets call to F1¥'Ž±'8Ä Ð,ä'B‘"YOU DON'T WANT IT THE SAME AS FOREGROUND!!!"î'L‰ ü(d‹ V$ç"N" Í ‰ /(e‹ V$ç"NO"Í ‰ C(f‹ V$ç"n"Í ‰ X(g‹ V$ç"no"Í ‰ b(n¿ Z,C‡(xÀ : SUBROUTINE FOR SAVING DATA£(‚‘"MORSE CODE SEND DATA"ì(‡‘:‘"Tone is ";B;". Speed is ";A;"and";FARNS;". Callsign is ";CS$;".")‰‹ P$ç"y" Í ‘"Letters are being shown."F)‹‹ P$ç"n" Í ‘"Letters are not being shown."p)Œ…"DO YOU WANT THIS CONFIGURATION ";B$€)—‹ B$ç"n"Í Š‘)˜‹ B$ç"no"Í Š«) ‘"saving to disk now"Ä)ªº "O",#,"MORSE.DAT"á)´·#,Z,C,A,B,P$,CS$,FARNSç)¾»ÿ)È‘"SAVING COMPLETED"*Ò… "PRESS ENTER";L$*ÜŠY*^• § ‰ z : subroutine for finding saved configurationr*hº "I",#,"MORSE.DAT"–*r… #, Z, C, A, B,P$, CS$, FARNSœ*|»¦*†¿ Z,C¬*À²*šŽ