Section One BBS

  Re: Help, It's my fault this time
  By: DesotoFireflite to All on Thu Jul 14 2022 09:23:59

 > # Log On To GAP BBS
 > COMPARE_KEY 2
 >         IF_TRUE
 >                 PAUSE_RESET
 >                 CLS
 >                 EXEC ?TELGATE valhalla.synchro.net:24
 >                 PAUSE_RESET
 >                 CLS
 >                 COMPARE_USER_MISC UM_UPAUSE
 >                         IF_FALSE
 >                         TOGGLE_USER_MISC UM_UPAUSE
 >                 HANGUP
 >                 END_IF
 >         END_IF
 > END_CMD

firstly, that indention formatting is hard to follow... i would do it like this 
for better visual flow

COMPARE_KEY 2
  IF_TRUE
    PAUSE_RESET
    CLS
    EXEC ?TELGATE valhalla.synchro.net:24
    PAUSE_RESET
    CLS
    COMPARE_USER_MISC UM_UPAUSE
    IF_FALSE
      TOGGLE_USER_MISC UM_UPAUSE
      HANGUP
    END_IF
  END_IF
END_CMD

this makes the internal steps easier to see and you can easily see each IF match
es with its END_IF... also, i use 2 spaces formatting because that's how i learn
ed pascal... it is the formatting i use to this
day unless the language requires specific formatting (eg: python)...

reformatting this one immediately shows the mistake...

 > # Hang Up For Now, Called By Mistake
 > COMPARE_KEY D
 >         IF_TRUE
 >                 HANGUP
 >                 END_IF
 >         END_IF
 > END_CMD

COMPARE_KEY D
  IF_TRUE
    HANGUP
  END_IF
#  END_IF  this line doesn't belong...
END_CMD


)\/(ark

---
 ■ Synchronet ■ The SouthEast Star Mail HUB - SESTAR