' ' © JM. :: Hecho en Ronda ' ' ' Procedente de... es.geocities.com/jm00092 ' '______________________________________________________________________ ' DEFINT A-Z SCREEN 13 PAINT (1, 1), 20 e = 12 DO g = g + 1 IF g > 360 THEN g = 1 c = ABS(SIN(g / 360) * 14) + 17 DRAW "ta" + STR$(g) + "s" + STR$(e) + "bm160,100c44bu7r3d7r4g7h7r4u7r3bdp44,44bu2c" + STR$(c) + "r4c" + STR$(c) + "d7c" + STR$(c) + "r5c" + STR$(47 - c) + "g9c" + STR$(47 - c) + "h9c" + STR$(47 - c) + "r5u7r3uc20r6c20d7c20r6c20g11c20h11c20r6u7r5" LOOP WHILE INKEY$ = ""