Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM 



Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
AEF\DB\FE itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"F\D0E\FE\C8\E5\B7 itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"C\B8\BE\F5E\CD\BE itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"\CD\E7\E1\D5 itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"\F0\CD\E7\E1\CC\AF\CB\C8\CB\CBCF

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
E\A2\CD\D5 itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"\CD\E7\E9\D3\FF\CD\F1\DB\FE\CD\F1\F3

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
D\EF\C9

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
B

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
C\B5\F7\C9ED\FD\C9

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
E\CDA\FB\CD

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
E

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
\CDA\F6\B7C\BD\F5\CDE

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
E\CD\CDA\E3\B7D itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"F\BC\F4\CD\D2C\BA itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"E

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
\A7\CB\C9A\CB\BCC itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"E itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"\CB\C9B itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"F\E7\F0\CB\FC\E5\B8\BEE\B7\F6E\E1\C9

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
BE\E1\C9\E5\C5\D5

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
A

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
C

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
D itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0" itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"F

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
\ED\B0

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
B\D1\C1\E1\C9E

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
\CD\C9\C5

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
E

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
\DB\FE\B1F\FA\CB\F0\C1\C9EF\DB\FE itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"F itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"F

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
\E1\C9\E5

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
\CDC\FE\C9C\E1\C9

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
A

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
B

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
C

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
B

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
D

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
E

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
F itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"E

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
D

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
F itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"B

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
AA

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
CBC

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
EDE itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"DF itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"CF itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"DE itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"EC itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"F

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
F

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
A

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
D\BC\BA itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"BA

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
E itemtype='https://schema.org/Blog' itemscope='itemscope' class="wp-singular computer_media-template-default single single-computer_media postid-58437 wp-custom-logo wp-theme-astra wp-child-theme-astra-child ast-desktop ast-separate-container ast-left-sidebar astra-4.11.1 group-blog ast-blog-single-style-1 ast-custom-post-type ast-single-post ast-inherit-site-logo-transparent ast-hfb-header ast-full-width-primary-header ast-box-layout ast-normal-title-enabled astra-addon-4.11.0"A

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
B\C0

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
FC

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
CEDDC

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top

Morse Code Translator

Developer(s): Paul Thomson
Date: 1984
Type: Cassette
Platform(s): TS 1000

Load program, select speed, play morse code into EAR jack. Play Morse Code Example.wav for an example of expected input. Morse Code Example.wav works at 9 WPM.

Content

Appears On

Related Products

Reads Morse code through cassette port and scrolls translated message across screen. Translates code off the air through earphone jack....

Related Articles

Related Content

Image Gallery

Morse Code Translator

Source Code

   1 REM \76\76\2A\10\40\23\23\23\3E\7F\DB\FE\1F\D0\7E\FE\80\C8\23\E5\B7\28\1C\21\B8\41\BE\28\08\34\35\28\12\23\23\18\F5\23\4E\CD\BE\40\21\01\50\CD\E7\40\E1\18\D5\21\01\F0\CD\E7\40\E1\18\CC\AF\CB\19\C8\CB\17\CB\17\3C\5F\2E\A2\CD\D5\40\21\01\28\CD\E7\40\18\E9\53\D3\FF\CD\F1\40\DB\FE\CD\F1\40\15\20\F3\2D\20\EF\C9\2B\00\00\00\00\7C\B5\20\F7\C9\3E\50\3D\20\FD\C9\00\21\24\00\11\00\12\0E\80\CD\9A\41\38\FB\CD\2E\41\26\00\CD\9A\41\30\F6\B7\7C\17\BD\38\F5\CD\4E\41\0E\80\CD\69\41\CD\9A\41\30\E3\B7\7D\1F\85\BC\30\F4\CD\81\41\18\D2\7C\17\BA\30\07\54\1E\00\A7\CB\19\C9\7A\CB\17\BC\30\08\54\6C\1E\01\37\CB\19\C9\7B\1F\30\E7\18\F0\37\CB\19\30\FC\E5\21\B8\41\23\79\BE\28\09\23\7E\B7\20\F6\3E\17\E1\C9\2B\7E\E1\C9\E5\C5\D5\2A\0C\40\11\22\00\19\54\5D\23\01\1F\00\ED\B0\2B\77\D1\C1\E1\C9\3E\00\CD\69\41\C9\C5\06\50\0E\00\24\DB\FE\B1\4F\10\FA\79\CB\17\38\F0\C1\C9\3E\7F\DB\FE\1F\1F\38\02\E1\C9\E5\26\00\CD\87\41\7C\FE\06\38\03\33\33\C9\7C\E1\84\67\37\C9\26\06\27\11\28\15\29\09\2A\02\2B\14\2C\0B\2D\10\2E\04\2F\1E\30\0D\31\12\32\07\33\05\34\0F\35\16\36\1B\37\0A\38\08\39\03\3A\0C\3B\18\3C\0E\3D\19\3E\1D\3F\13\1C\3F\1D\3E\1E\3C\1F\38\20\30\21\20\22\21\23\23\24\27\25\2F\13\2A\0D\68\BC\22\BA\28\1B\6A\19\55\0E\47\1A\73\0B\52\C0\52\0F\4C\0C\5E\16\61\18\29\10\6D\11\6D\83\6C\14\31\08\32\12\35\00\00\00\00\00
  10 FAST 
  15 CLS 
  20 PRINT "ENTER SPEED IN WPM (9 TO 100)";
  25 INPUT Q
  30 IF Q<9 OR Q>100 THEN GOTO 15
  35 CLS 
  37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE"
  40 POKE 16558,720/Q
  50 POKE 16567,2160/Q
  60 POKE 16585,1461/Q
  70 POKE 16591,360/Q
  75 CLEAR 
  80 INPUT A$
  90 IF A$="" THEN GOTO 120
 100 RAND USR 16516
 110 GOTO 80
 120 CLS 
 130 FOR F=0 TO 2
 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % "
 150 NEXT F
 160 PRINT "PRESS . TO GENERATE"
 170 SLOW 
 180 RAND USR 16640
 190 RUN 
 200 SAVE "MC%T"
 210 PRINT TAB 5;"MORSE CODE TRANSLATOR"
 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON"
 230 PAUSE 200
 240 GOTO 120
Scroll to Top
10 FAST 15 CLS 20 PRINT "ENTER SPEED IN WPM (9 TO 100)"; 25 INPUT Q 30 IF Q<9 OR Q>100 THEN GOTO 15 35 CLS 37 PRINT "SPEED=";Q;" WPM",""""" TO RECEIVE" 40 POKE 16558,720/Q 50 POKE 16567,2160/Q 60 POKE 16585,1461/Q 70 POKE 16591,360/Q 75 CLEAR 80 INPUT A$ 90 IF A$="" THEN GOTO 120 100 RAND USR 16516 110 GOTO 80 120 CLS 130 FOR F=0 TO 2 140 PRINT "% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % " 150 NEXT F 160 PRINT "PRESS . TO GENERATE" 170 SLOW 180 RAND USR 16640 190 RUN 200 SAVE "MC%T" 210 PRINT TAB 5;"MORSE CODE TRANSLATOR" 220 PRINT TAB 5;"(C) 1984 PAUL THOMSON" 230 PAUSE 200 240 GOTO 120
Scroll to Top