AmigaOS Manual: ARexx Getting Started - Revision history

Janne Peräaho at 03:26, 17 May 2020

2020-05-17T03:26:50Z

← Older revision		Revision as of 03:26, 17 May 2020
Line 268:		Line 268:

	<syntaxhighlight lang="rexx">		<syntaxhighlight lang="rexx">
	/Grading program/		/* Grading program */
	SAY "Hallo, I will calculate your grades for you."		SAY "Hallo, I will calculate your grades for you."

2020-05-17T03:26:13Z

2020-05-17T03:25:55Z

← Older revision		Revision as of 03:25, 17 May 2020
Line 134:		Line 134:

	<syntaxhighlight lang="rexx">		<syntaxhighlight lang="rexx">
	/A simple program/		/* A simple program */
	SAY 'Amiga. The Computer For the Creative Mind.'		SAY 'Amiga. The Computer For the Creative Mind.'
	</syntaxhighlight>		</syntaxhighlight>

2019-01-03T14:24:29Z

← Older revision		Revision as of 14:24, 3 January 2019
Line 178:		Line 178:

	<syntaxhighlight lang="rexx">		<syntaxhighlight lang="rexx">
	/Calculate some squares and cubes./		/* Calculate some squares and cubes. */
	DO i = 1 to 10 /Begin loop - 10 iterations/		DO i = 1 TO 10 /* Begin loop - 10 iterations */
	SAY i i2 i3 /Perform calculations/		SAY i i2 i3 /* Perform calculations */
	END /End of loop/		END /* End of loop */

	SAY 'All done.'		SAY 'All done.'
	</syntaxhighlight>		</syntaxhighlight>

2019-01-03T14:23:22Z

2019-01-03T14:23:06Z

2019-01-03T14:21:53Z

← Older revision		Revision as of 14:21, 3 January 2019
Line 217:		Line 217:

	<syntaxhighlight lang="rexx">		<syntaxhighlight lang="rexx">
	/Defining and calling a function./		/* Defining and calling a function. */

	DO i = 1 to 5		DO i = 1 TO 5
	SAY i square(i) /Call the "square" function/		SAY i square( i ) /* Call the "square" function */
	END		END

	EXIT		EXIT

	square: /Function name/		square: /* Function name */
	ARG x /Get the argument/		ARG x /* Get the argument */
	RETURN x*2 /Square it and return*/		RETURN x*2 /Square it and return*/
	</syntaxhighlight>		</syntaxhighlight>

2019-01-03T14:20:02Z

← Older revision		Revision as of 14:20, 3 January 2019
Line 241:		Line 241:

	<syntaxhighlight lang="rexx">		<syntaxhighlight lang="rexx">
	/Demonstrate "results" tracing/		/* Demonstrate "results" tracing */
	TRACE results		TRACE results

	sum = 0 ; sumsq = 0;		sum = 0 ; sumsq = 0;
	DO i = 1 to 5		DO i = 1 TO 5
	sum = sum + 1		sum = sum + 1
	sumsq = sumsq + i**2		sumsq = sumsq + i**2
	END		END

	SAY 'sum=' sum 'sumsq=' sumsq		SAY 'sum=' sum 'sumsq=' sumsq
	</syntaxhighlight>		</syntaxhighlight>

2019-01-03T14:18:20Z

← Older revision		Revision as of 14:18, 3 January 2019
Line 264:		Line 264:
	/Grading program/		/Grading program/
	SAY "Hallo, I will calculate your grades for you."		SAY "Hallo, I will calculate your grades for you."

	Response = 0		Response = 0
	DO while response ~ = "Q" /Loop while response isn't Q/		DO while response ~ = "Q" /* Loop while response isn't Q */
	SAY "Please enter all grades for the student."		SAY "Please enter all grades for the student."
	SAY "Essay 1:"		SAY "Essay 1:"
	PULL es1		PULL es1

	SAY "Essay 2:"		SAY "Essay 2:"
	PULL es2		PULL es2
⚫	SAY "Essay 3:"

⚫	PULL ~~es3~~
	SAY "Essay 4:"		SAY "Essay 3:"
	PULL ~~es4~~		PULL es3

⚫	SAY "Participation:"
		⚫	SAY "Essay 4:"
	PULL p
		⚫	PULL es4
⚫	Final = (((es1 + es2)/2.3) + ((es3 + es4)/2.45) + (p*.25))

⚫	SAY "Your final grade for this student is " Final
		⚫	SAY "Participation:"
⚫	SAY "Would you like to continue? (Q for quit.)"
	PULL ~~response~~		PULL p

		⚫	Final = ( ( ( es1 + es2 ) / 2 * .3 ) + ( ( es3 + es4 ) / 2 * .45 ) + ( p * .25 ) )
		⚫	SAY "Your final grade for this student is " Final

		⚫	SAY "Would you like to continue? (Q for quit.)"
			PULL response
	END		END

	EXIT		EXIT
	</syntaxhighlight>		</syntaxhighlight>

2014-03-11T17:17:15Z

← Older revision		Revision as of 17:17, 11 March 2014
Line 177:		Line 177:
	=== Program 3. Calc.rexx ===		=== Program 3. Calc.rexx ===

	<syntaxhighlight>		<syntaxhighlight lang="rexx">
	/Calculate some squares and cubes./		/Calculate some squares and cubes./
	DO i = 1 to 10 /Begin loop - 10 iterations/		DO i = 1 to 10 /Begin loop - 10 iterations/
Line 197:		Line 197:
	=== Program 4. Even.rexx ===		=== Program 4. Even.rexx ===

	<syntaxhighlight>		<syntaxhighlight lang="rexx">
	/Even or odd?/		/Even or odd?/
	DO i = 1 to 10 /Begin loop - 10 iterations/		DO i = 1 to 10 /Begin loop - 10 iterations/
Line 216:		Line 216:
	=== Program 5. Square.rexx ===		=== Program 5. Square.rexx ===

	<syntaxhighlight>		<syntaxhighlight lang="rexx">
	/Defining and calling a function./		/Defining and calling a function./

Line 240:		Line 240:
	=== Program 6. Results.rexx ===		=== Program 6. Results.rexx ===

	<syntaxhighlight>		<syntaxhighlight lang="rexx">
	/Demonstrate "results" tracing/		/Demonstrate "results" tracing/
	TRACE results		TRACE results
Line 261:		Line 261:
	=== Program 7. Grades.rexx ===		=== Program 7. Grades.rexx ===

	<syntaxhighlight>		<syntaxhighlight lang="rexx">
	/Grading program/		/Grading program/
	SAY "Hallo, I will calculate your grades for you."		SAY "Hallo, I will calculate your grades for you."