Recreate Procedures - Forum game
The aim of this game is to recreate procedures/functions already in SCAR
This thread has no use except to have fun :D
rules :
1. All procedures/functions must have the same number of parimeters and must do exactly the same thing
2. all procedures/functions must be called the same thing with a 2 added , e.g. function pos2(substr,str:string):integer;
this is an example
SCAR Code:
function pos2(substr,str:string):integer;
var f:integer;
begin
for f:=1 to length(str) do
begin
if(copy(str,f,length(substr))=substr)then
begin
result:=f
break
end
end
end;
post away!