SRL Archive - OSR Help

So in my script, I have a DTM for each type of item, short bow u, shortbow, and then each type of log for those, defined like this:

Procedure SetWithDraw;
Begin
  case LowerCase(Make) of
    'shaft':
        case LowerCase(nameuse) of
          'logs':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYHBmYmBwA2IbIH4C5L8C4pdAHGrMAcf8QD4MMyJhIAAA7eMFZg==');
          'oaks':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYHBmYmBwA2IbIH4C5L8C4pdAHGrMAcf8QD4MMyJhIAAA7eMFZg==');
          'willows':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYHBmYmBwA2IbIH4C5L8C4pdAHGrMAcf8QD4MMyJhIAAA7eMFZg==');
          'maples':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYHBmYmBwA2IbIH4C5L8C4pdAHGrMAcf8QD4MMyJhIAAA7eMFZg==');
          'yews':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYHBmYmBwA2IbIH4C5L8C4pdAHGrMAcf8QD4MMyJhIAAA7eMFZg==');
          'magics':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYHBmYmBwA2IbIH4C5L8C4pdAHGrMAcf8QD4MMyJhIAAA7eMFZg==');
        End;
    'string':    // none completed
        case LowerCase(Make) of
        'shorts':
           case LowerCase(NameUse) of
           'logs':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           'oaks':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           'willows':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           'maples':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           'yews':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           'magics':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           End;
        'longs':
           case LowerCase(NameUse) of
           'logs':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           'oaks':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           'willows':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           'maples':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           'yews':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           'magics':
             DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
           End;
      'fletch':
         case LowerCase(Make) of
           'shorts':
              case LowerCase(NameUse) of          // Logs,
              'logs':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChkYmDIBOISIH4M5L8E4vtAXOzHy5DnxcsQasnBIALkwzAjEgYCAB3FBms=');
               'oaks':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
               'willows':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
               'maples':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
               'yews':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
               'magics':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
              End;
           'longs':
             case LowerCase(NameUse) of
              'logs':
                 DTM_Made := DTMFromString('mLgAAAHicY2JgYChmYmDIAOJHQPYrIE525mDI8eBlEAGyQZgRihkYAIEBBEc=');
               'oaks':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
               'willows':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
               'maples':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
               'yews':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
               'magics':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChgYmDIAOJiIH4G5D8F4odAHGbCCcf8QD4MMyJhIAAADAEF6g==');
              End;
         End;
      End;
    End;
End;

As you can see, it takes the fletching method, then chops it up to longs or shorts, and then to logtypes to organize the DTM's.

So here it intailizes logs:

 case LowerCase(NameUse) of          // Logs,
              'logs':
                 DTM_Made := DTMFromString('mQwAAAHicY2ZgYChkYmDIBOISIH4M5L8E4vtAXOzHy5DnxcsQasnBIALkwzAjEgYCAB3FBms=');

When the banking procedure shows up, it does this:

Procedure Deposite;
Begin
  case LowerCase(StoreMethod) of
    'all':
      Begin
        if FindDTM(DTM_Made, x, y, 554, 209, 738, 468) then
        Begin
          MouseToRandomBow;
          clickmouse2(mouse_Right);
          RandomChooseWait;
          P07_ChooseOptionMultiHuman(['tore Al','ore All']);
          RandomBankWait;
        End;
      End;
    'random':
      Begin
        case random(100) of
        1..90:
        Begin
          Wait(RandomRange(0, 100));
        End;
        91..100:
        Begin
          if FindDTM(DTM_Made, x, y, 554, 209, 738, 468) then
          Begin
            RandomMouse;
            clickmouse2(mouse_Right);
            RandomChooseWait;
            P07_ChooseOptionMultiHuman(['tore Al','ore All']);
            RandomBankWait;
          End;
        End;
      End;
    End;
  End;
End;

Here, since I am fletching short bows, it will store all:

'all':
      Begin
        if FindDTM(DTM_Made, x, y, 554, 209, 738, 468) then
        Begin
          MouseToRandomBow;
          clickmouse2(mouse_Right);
          RandomChooseWait;
          P07_ChooseOptionMultiHuman(['tore Al','ore All']);
          RandomBankWait;
        End;
      End;

But when ever the bot gets to the banking procedure it just opens the bank then closes it, I don't understand why it's not banking the shortbows, if you need to see whole script I will gladly provide it and explain it to you because others may find it confusing (it's still in development stages and needs to be cleaned)

fixed problems, cases did not have End; and some were misspelled grr case inside of case inside of case is kinda hard