Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Merry Christmas Scroller
#2
Couldn't you just do this for FB?

Code:
DEFSNG A-Z
     REM Neon Lights
     SCREEN 13,,,1
     P = 65536 * 0 + 256 * 10 + 0: PALETTE 0, P: b = b + 1
     P = 65536 * 0 + 256 * 12 + 0: PALETTE 2, P: b = b + 1
     REM near invisible color 2
     COLOR 2: LOCATE 1, 1
     PRINT "    MERRY CHRISTMAS TO ALL    "
MORE:
     xp% = 10: yp% = 60: a% = 0: b% = 210
     WHILE a% < 212: REM change b%, and a% limit for a text change
        FOR x% = a% TO b%
          FOR y% = 0 TO 6
            IF POINT(x%, y%) <> 0 THEN COLOR 12 ELSE COLOR 0
            CIRCLE (xp%, yp%), 5: PAINT (xp% + 1, yp%)
            yp% = yp% + 10
          NEXT y%
          xp% = xp% + 10: yp% = 60
        NEXT x%
SLEEP 50
        a% = a% + 1: b% = b% + 1: xp% = 10: yp% = 60
        COLOR 7: LOCATE 23, 17: PRINT TIME$
        IF INKEY$ <> "" THEN STOP
     WEND: GOTO MORE
url=http://www.sloganizer.net/en/][Image: style4,TheDarkJay.png][/url]
Reply


Messages In This Thread
Merry Christmas Scroller - by GordonSweet - 12-01-2005, 09:14 PM
Merry Christmas Scroller - by TheDarkJay - 12-01-2005, 09:31 PM
Merry Christmas Scroller - by GordonSweet - 12-02-2005, 02:14 AM
Merry Christmas Scroller - by axipher - 12-05-2005, 01:35 AM
Merry Christmas Scroller - by Ralph - 03-11-2006, 12:33 PM

Forum Jump:


Users browsing this thread: 1 Guest(s)