Difference between revisions of "ReNamer:Pascal Script:Quick guide"

From den4b Wiki
Jump to navigation Jump to search
Line 28: Line 28:
 
All the typical control structures (building blocks) occurring in Pascal Script are described in the following table.  
 
All the typical control structures (building blocks) occurring in Pascal Script are described in the following table.  
  
The table shows a flow chart and Pascal Script code required to implement that logic. You can simnply copy and paste these blocks and then edit them to finish your script.
+
The table shows a flow chart and Pascal Script code required to implement that logic. You can simnply copy and paste these blocks and then edit them to finish your script.  
  
 
In actual implementation, just substitute the following:  
 
In actual implementation, just substitute the following:  
Line 49: Line 49:
 
end;  
 
end;  
  
| [[Image:]]
+
| [[Image:PascalScriptIfThen.png]]
 
|-
 
|-
 
| <center>'''If-then-else'''</center>  
 
| <center>'''If-then-else'''</center>  
Line 65: Line 65:
 
end;  
 
end;  
  
| [[Image:]]
+
| [[Image:PascalScriptIfThenElse.png]]
 
|-
 
|-
 
| <center>'''for'''</center>  
 
| <center>'''for'''</center>  
Line 75: Line 75:
 
end;  
 
end;  
  
| [[Image:]]
+
| [[Image:PascalScriptForLoop.png]]
 
|-
 
|-
 
| <center>'''while'''</center>  
 
| <center>'''while'''</center>  
Line 85: Line 85:
 
end;  
 
end;  
  
| [[Image:]]
+
| [[Image:PascalScriptWhileLoop.png]]
 
|-
 
|-
 
| <center>'''case/switch'''</center> <center>'''(exclusive)'''</center>  
 
| <center>'''case/switch'''</center> <center>'''(exclusive)'''</center>  
 
| case x of  
 
| case x of  
 
+
<br> 1: begin  
 
 
1: begin  
 
  
 
&lt;Action-1&gt; Break  
 
&lt;Action-1&gt; Break  
Line 113: Line 111:
 
<br> end;  
 
<br> end;  
  
| [[Image:]]
+
| [[Image:PascalScriptCase.png]]
 
|-
 
|-
 
| <center>'''case/switch'''</center> <center>'''(fall-through)'''</center>  
 
| <center>'''case/switch'''</center> <center>'''(fall-through)'''</center>  
Line 139: Line 137:
 
<br> end;  
 
<br> end;  
  
| [[Image:]]
+
| [[Image:PascalScriptCaseWithFallThrough.png]]
 
|-
 
|-
 
| <center>'''Repeat until'''</center>  
 
| <center>'''Repeat until'''</center>  
Line 147: Line 145:
 
until &lt;condition&gt;;  
 
until &lt;condition&gt;;  
  
| [[Image:]]
+
| [[Image:PascalScriptRepeatUntilLoop.png]]
 
|-
 
|-
 
| <center>'''Break'''</center>  
 
| <center>'''Break'''</center>  
|  
+
| <br>
|  
+
| <br>
 
|-
 
|-
 
| <center>'''Continue'''</center>  
 
| <center>'''Continue'''</center>  
|  
+
| <br>
|  
+
| <br>
 
|-
 
|-
 
| <center>'''Exit'''</center>  
 
| <center>'''Exit'''</center>  
|  
+
| <br>
|  
+
| <br>
 
|}
 
|}

Revision as of 18:31, 9 July 2009

Basic control flow in a pascal script

PROGRAM

        ProgramName (FileList);

CONST        

        <Constant declarations>

TYPE    

        <Type declarations>

VAR

        <Variable declarations>

        <definitions of subprogram>

BEGIN         <Executable statements>

END.

Control Structures

All the typical control structures (building blocks) occurring in Pascal Script are described in the following table.

The table shows a flow chart and Pascal Script code required to implement that logic. You can simnply copy and paste these blocks and then edit them to finish your script.

In actual implementation, just substitute the following:

  • Replace <condition> with an actual Pascal statement that tests for a condition.
  • Replace <Action> with code block that takes action relevant to the condition.
Control structure
Pascal script
Flowchart
If-then
if <condition> then

begin

<Action>

end;

PascalScriptIfThen.png
If-then-else
if <condition> then

begin

<Action-1>

end else

begin

<Action-2>

end;

PascalScriptIfThenElse.png
for
for I:=x to y do

begin

<Action>

end;

PascalScriptForLoop.png
while
while <condition> do

begin

<Action>

end;

PascalScriptWhileLoop.png
case/switch
(exclusive)
case x of


1: begin

<Action-1> Break

end;


2: begin

<Action-2> Break

end;


//repeat for other cases


else begin

<Default Action>

end;


end;

PascalScriptCase.png
case/switch
(fall-through)
case x of


1: begin

<Action-1>

end;


2: begin

<Action-2>

end;


//repeat for other cases


else begin

<Default Action>

end;


end;

PascalScriptCaseWithFallThrough.png
Repeat until
repeat

<Action>

until <condition>;

PascalScriptRepeatUntilLoop.png
Break


Continue


Exit