# Pascal Converter

1. Sep 26, 2007

### aminayousuf

hello evryone ..
can somebody help me with a PASCAL coverter prog for converting keyboard keys to correspondig morse code values!!
i noe of no languages other than c and c++ .this is actually an electronic project i#m making and its based on ic 555 timer that upon clicking on keyboard keys generate the respective morse value sound pulses and transmits using F.M

2. Sep 26, 2007

### Staff: Mentor

Why can you not do it in C? Is it homework?

3. Oct 30, 2007

### xanika

Hello

i read your Question but i have no idea how you want to do this exactly but its
an interesting Problem. There are some ways it seems and one is maybe you
send to the printerport the State of the key because you have much output
lines for doing this ... 8 Data and others for control ..but at least you need only
one for the trigger output .. the signal

the old dos will be the best for it with the old good TurboPascal6 *gg

i don't know anything about morse codes except they are like this: .--...-..--...----..-.-

but how to put this to the line to the NE555,

in TurobPascal you are able to write directly to the Printerport so you can
set the Printer Data Pin1 to 1 or 0 and thats all you need .. the other is that you
have to programm the timersequenze for each key like a collection of 1 and 0
schematically like this routine
the first routine should for the point

procedure point
begin
port[$375]:=$FF;
delay(5);
port[$375]:=$0;
delay(10);
End;

then the procedure for the line

procedure Line
begin
port[$375]:=$FF;
delay(10); ;<------ here the Difference *gg
port[$375]:=$0;
delay(10);
End;

and now you can macke Procedures for the Keys

Procedure A
Begin
point;
Point;
Line;
Point;
Line;
Delay(20);
End;

Procedure B
Begin
Line;
Point;
Point;
Line;
Line;
LIne;
Delay(20);
End;

and so on

so you have Procedures for each Key or Text you can translate to morse-code

:-D

bye bye