|
#include <gadget/gadget.h>
|
|
|
|
LIB_GADGET_START
|
|
|
|
Main
|
|
|
|
String v="Mensaje lanzado al mar", w=Space(100);
|
|
Stack{
|
|
Store ( w, Pad_c( Multi_cat(w, Upper( Str_tran_all(v,"lanzado","tirado",1)),\
|
|
" adentro de una botella", NULL ), '-', 70 ));
|
|
}
|
|
puts(w);
|
|
Free secure v, w;
|
|
End
|