1. Forum
  2. DOVE-Net
  3. Synchronet Baja

  • TWITTER

    From Jas Hud@Jas Hud@DOVE-Net.Synchronet_baja to All on Friday, November 30, 2007 22:48:40
    LOOK WHAT I MADE


    # TWITTER V1 BY -OBLIVIOUS-
    # LAST MODIFIED 11-30-2007
    # NOTE: PUT THE FOLOWING AT THE TOP OF SBBS\TEXT\MENU\SYSMSCAN.ASC
    # @EXEC:TWITTER@


    !include sbbsdefs.inc
    !INCLUDE FILE_IO.INC
    !include userdefs.inc

    COMPARE_ARS LEVEL 99
    IF_FALSE
    GOTO END
    END_IF


    INT FILE
    STR LINE1
    int file

    CLEAR_ABORT

    :top
    CLS

    PRINT "add someone to the twitlist"
    NO_YES ?
    IF_TRUE
    GOTO END
    END_IF

    str line1

    print "\r\nenter string:"
    getstr line1 55 K_MSG|K_NOCRLF|K_LINE
    compare line1 ""
    if_true
    goto end
    end_if


    :write
    fopen file O_CREAT|O_DENYNONE|O_RDWR|O_APPEND "%n..\ctrl\twitlist.cfg"

    INT T
    TIME T
    TIME_STR STR T

    fPRINTF file "\r\n;added by twitter on %s" STR
    fprintf file "\r\n\%s\r\n" line1
    fclose file

    :END

    .─.┌ ┬ ┬┬ ┬┬.─.┬ ┬┌┐
    -│ │├┐│ ││ │││ ││ │└┐-
    `─'└┘┴┘┴`\/'┴`─'└-┘└┘
    +o edge of oblivion bbs ■ eob-bbs.com
    |04An underground bbs with tons of the best games+files
    |05a zer0net node
    --- Synchronet 3.14a-Win32 NewsLink 1.85
    * Data Stream - garland texas - telnet://dsbbs.synchro.net