home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
90xx
/
9006a.d64
/
61060duplicate
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
123b
|
4 lines
61060 REM 61060DUPLICATE US$,UX/US$/UA$,UA
61061 UA$=US$:US$="":UA=INT(255/LEN(UA$)):IFUA<UXTHENUX=UA
61062 FORUA=1TOUX:US$=US$+UA$:NEXT:RETURN