Rosetta Code

Repeat a string: Difference between revisions

Page Discussion

Repeat a string (view source)

Revision as of 05:37, 7 November 2011

33 bytes removed ,  12 years ago
→‎{{header|Batch File}}
Line 108:
'Function' version
<lang dos>@echo off
set /p a=Enter string to repeat :
setlocal enabledelayedexpansion
set /p b=Enter how many times to repeat :
if "%2" equ "" goto fail
set char"c=%1"▼
call :repeat %1 %2 res
echoset "d=%resb%"
:a
goto :eof▼
echo %a%
 
set "c=%c%+=1"
:repeat
if /i _"%c%"==_"%d%" (exit /b)
▲set char=%1
▲goto :eofa</lang>
set num=%2
for /l %%i in (1,1,%num%) do set %3=!%3!%char%
goto :eof
 
:fail</lang>
 
=={{header|BBC BASIC}}==
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/130227"