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

  • baja code

    From Matt Kraner@VERT to All on Fri Mar 10 17:22:41 2006
    this is my 1st time making my own baja

    what did I do wrong

    !include sbbsdefs.inc
    !include file_io.inc
    !include dir_attr.inc

    :main
    cmd_home
    async
    compare_ars expert
    if_false
    clear_abort
    menu WILDCAT\door
    print "\r\nCommand >>? "
    else
    print "\r\n@GRP@ @SUB@, Door MENU: ? "
    end_if

    node_action node_main
    async

    getcmd 1Q?\r

    # Write command to log file
    logkey_comma

    # Commands
    cmdkey ?
    compare_ars expert
    if_true
    menu WILDCAT\door
    end_if
    end_cmd

    cmdkey 1
    EXEC_BIN "BOX"
    end_cmd

    cmdkey Q
    cmd_pop
    goto main
    end_cmd

    end_cmd

    thanks
    ---
    þ Synchronet þ Vertrauen þ Home of Synchronet þ telnet://vert.synchro.net
  • From Angus McLeod@VERT to Matt Kraner on Sat Mar 11 00:24:00 2006
    Re: baja code
    By: Matt Kraner to All on Fri Mar 10 2006 17:22:00

    this is my 1st time making my own baja

    what did I do wrong

    !include sbbsdefs.inc
    !include file_io.inc
    !include dir_attr.inc

    :main
    cmd_home
    async
    compare_ars expert
    if_false
    clear_abort
    menu WILDCAT\door
    print "\r\nCommand >>? "
    else
    print "\r\n@GRP@ @SUB@, Door MENU: ? "
    end_if

    node_action node_main
    async

    getcmd 1Q?\r

    # Write command to log file
    logkey_comma

    # Commands
    cmdkey ?
    compare_ars expert
    if_true
    menu WILDCAT\door
    end_if
    end_cmd

    cmdkey 1
    EXEC_BIN "BOX"
    end_cmd

    cmdkey Q
    cmd_pop
    goto main
    end_cmd

    end_cmd

    thanks


    ---
    Playing: "Babyface" by "U2" from the "Zooropa" album
    þ Synchronet þ Where we BAJA Rob into writing our modules. The ANJO BBS
  • From Digital Man@VERT to Matt Kraner on Sun Mar 12 18:29:20 2006
    Re: baja code
    By: Matt Kraner to All on Fri Mar 10 2006 05:22 pm

    this is my 1st time making my own baja

    what did I do wrong

    !include sbbsdefs.inc
    !include file_io.inc
    !include dir_attr.inc

    :main
    cmd_home
    async
    compare_ars expert
    if_false
    clear_abort
    menu WILDCAT\door
    print "\r\nCommand >>? "
    else
    print "\r\n@GRP@ @SUB@, Door MENU: ? "
    end_if

    node_action node_main
    async

    getcmd 1Q?\r

    # Write command to log file
    logkey_comma

    # Commands
    cmdkey ?
    compare_ars expert
    if_true
    menu WILDCAT\door
    end_if
    end_cmd

    cmdkey 1
    EXEC_BIN "BOX"
    end_cmd

    cmdkey Q
    cmd_pop
    goto main

    Remove that "goto". It's not necessary and will mess up your module.

    end_cmd

    end_cmd

    digital man

    Snapple "Real Fact" #53:
    The average women consumes 6lbs of lipstick in her lifetime.
    Norco, CA WX: 63.3øF, 51% humidity, 10 mph SSW wind, 0.04 inches rain/24hrs
    ---
    þ Synchronet þ Vertrauen þ Home of Synchronet þ telnet://vert.synchro.net