Print Page - Is this code corrected

Title: Is this code corrected
Post by: Techno on September 22, 2008, 12:35:19 PM

Dear Support

I try with an large program ported from pascal into EBASIC because I have need this code for an project written full in ebasic.

I try reprogram this

Code Select



OPENCONSOLE 
	/* Blokgolfgenerator */
	DEF tijd 	: WORD
	DEF key 	: CHAR
	DEF A$ 		: STRING
	
                /* repeat; */
	DO
                                /* write("aantal herhalingen"); */
                                /* readln(tijd);
		INPUT "Aantal herhalingen 0...65535 ", A$
                                tijd = val(a$)
		DO
                                                /* Generator(tijd); */
			Generator(tijd)
                                /* until keypressed */
		UNTIL INKEY$ <> ""
                                /* key = ReadKey; */
                /* until key = chr527); */
	UNTIL INKEY$ = CHR$(27)
CLOSECONSOLE

What functions can I use for Readkey(), Keypressed(), Readln() or how can I change it into Ebasic commands

With kind regards
Stephane

Sapero thanks for your worked code
Paul your ebasic en aurora it's very great !

IonicWind Software

IWBasic => Console Corner => Topic started by: Techno on September 22, 2008, 12:35:19 PM