image of READY prompt

Wang2200.org

Listing of file='IDS2MP01' on disk='vmedia/701-2717B.wvd.zip'

# Sector 583, program filename = 'IDS2MP01'
1000 STR(E$(),0001)="IDS2MP01  4083082TJBIDEAS System Utilities - Interactive
     Program Generation Menu       Release 2.1F           IDS2PP00Create
                                              0           IDS2PP00Revise
                                    "
1001 STR(E$(),0235)="          0           IDS2PP00Protect
                               0

                                    "
1002 STR(E$(),0469)="               -- Other Functions --
                            IDS2MF01Data files
                0           IDS2MS01Screens
                0                   "
1003 STR(E$(),0703)="
             IDS2MB01Programs (batch)                                     0

             IDS2MR01Reports        "
1004 STR(E$(),0937)="                                      0           IDS2MM0
     1Menus                                                0           IDS2MI0
     1START programs                                       0           IDS2MU0
     1Other utilities               "
1005 STR(E$(),1171)="                       0           IDS2AX01Applications
                                            0           IDS2M001Main menu
                                            1IDSPR-I"
   : IF R3$(1)="\C4\CF\CE\D4\CC\CF\C1\C4"THEN RETURN
   : IF E5$<>"M"THEN LOAD T#2,"IDS2MX01"1000,