Results 1 to 16 of 16

Thread: cant get simba to work

  1. #1
    Join Date
    Jan 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default cant get simba to work

    SRL Updater: Decompressing...
    SRL Updater: Extracting...
    SRL Update Successful!
    [Error] C:\Simba\Includes\SRL/SRL/core/globals.simba(696:5): Unknown identifier 'ImageSetClientArea' at line 695
    Compiling failed.

    thats is msg i get every time i try to use the sample code when u download simba...

  2. #2
    Join Date
    Mar 2007
    Posts
    5,125
    Mentioned
    275 Post(s)
    Quoted
    901 Post(s)

    Default

    You will need to update Simba to 992.

    To do this, Close all Simba's off.
    Open Simba (C:\Simba\Simba.exe)
    In Simba, Tools -> Update
    Follow the prompts and try again

    Post back if are still having issues.

  3. #3
    Join Date
    Jan 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    now i cant seem to get msvcr71 downloaded ill download and it says to put it

    C:\Windows\System32

    there but when i do i get 2 errors saying i cant

  4. #4
    Join Date
    Mar 2007
    Posts
    5,125
    Mentioned
    275 Post(s)
    Quoted
    901 Post(s)

    Default

    You will need to be logged on as an Administrator to add files into C:\Windows\System32

  5. #5
    Join Date
    Jan 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    How do i do that my log in for computer is only one

    i just check it says my acc is the admin acc

    ! C:\Users\Z*************\Downloads\msvcr71.zip: Cannot create msvcr71.dll
    ! Access is denied.
    Last edited by Hobbit; 01-30-2013 at 03:31 AM. Reason: Merge

  6. #6
    Join Date
    Mar 2007
    Posts
    5,125
    Mentioned
    275 Post(s)
    Quoted
    901 Post(s)

    Default

    If you would like, you can PM me your TeamViewer details and I can take a look for you.

  7. #7
    Join Date
    Jan 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    hey man thanks alot for you help on tv. So i got the bot i want to use on prodjectrs06 and i ran it but it did nothing but said said

    Fishing!

  8. #8
    Join Date
    Mar 2007
    Posts
    5,125
    Mentioned
    275 Post(s)
    Quoted
    901 Post(s)

    Default

    Quote Originally Posted by jason91 View Post
    hey man thanks alot for you help on tv. So i got the bot i want to use on prodjectrs06 and i ran it but it did nothing but said said

    Fishing!
    Have a read of this: http://villavu.com/forum/showthread....52#post1154752

  9. #9
    Join Date
    Jan 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    yah i have no clue thats so much to read when semi fucked up lol and i dont understand it

    Warning! You passed wrong values to a finder function: ys > ye (1337,444). Swapping the values for now.
    Warning! You passed a wrong ye to a finder function: 1337. The client has a height of 509, thus the ye is out of bounds. Setting the value to 508 (h-1) for now.
    Last edited by Hobbit; 01-30-2013 at 03:32 AM. Reason: Merge

  10. #10
    Join Date
    Sep 2012
    Location
    Australia.
    Posts
    839
    Mentioned
    16 Post(s)
    Quoted
    225 Post(s)

    Default

    Try not to double post in the future, Jason91.

    That error that you're receiving means that the script is trying to find something not within the bounds of the client area. Please link me to the script you are using.

  11. #11
    Join Date
    Mar 2007
    Posts
    5,125
    Mentioned
    275 Post(s)
    Quoted
    901 Post(s)

    Default

    Quote Originally Posted by jason91 View Post
    Warning! You passed wrong values to a finder function: ys > ye (1337,444). Swapping the values for now.
    Warning! You passed a wrong ye to a finder function: 1337. The client has a height of 509, thus the ye is out of bounds. Setting the value to 508 (h-1) for now.
    Nothing to really worry about, Just the script writer didn't set correct boundaries and Simba has corrected this.

  12. #12
    Join Date
    Jan 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    ye but after that it just logs me out

  13. #13
    Join Date
    Feb 2012
    Location
    DON'T PM ME ASKING FOR STUFF
    Posts
    2,170
    Mentioned
    38 Post(s)
    Quoted
    423 Post(s)

    Default

    Quote Originally Posted by jason91 View Post
    ye but after that it just logs me out
    Would you mind posting the script?

  14. #14
    Join Date
    Jan 2013
    Posts
    7
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    Simba Code:
    1. program AwesomeWoodChopper;
    2.  
    3. {$i srl/srl.simba}
    4.  
    5.  var
    6.   Pankissa,EnoughOfThis,InvyFull,NoFish,Banked,Fishing,Nuolella,Kalalla,Stored: boolean;
    7.  
    8.   X,Y,UseQuickly,Lobsters,Nuoli,Nuoli2,Nuoli3,Nuoli4,ExistingImage,LoginImage,Kivi,Kivi2,Kivi3,Kivi4,Kivi5,Kivi6,Kivi7,Vetta,Kala,Pankki,Lobster,numberOfWaits,StoreAll,NotEnough,UseQuick,Trolled,LogOutImage,ClickHere,ModCrown:Integer;
    9.  
    10. procedure BitmapsHere;
    11. begin
    12.   StoreAll :=  BitmapFromString(68, 12, 'meJzdk0EOgDAIBH2aNz/g1T/5Y0' +
    13.         '00ISss21ZrTDQcKtApS+m4biPYNC9drIbW90QDDsfXEW7YhzlN2hH' +
    14.         'YCv9Ei8j/pRYcNgy5m9W/2bkCRQkYsmgRghaFxHdEi4y9otedoWh5' +
    15.         'w/WLfkpGLaI5bvt5epOW4lpfWTwrEorNoVtEE25rQU5xJHQx2UYt/' +
    16.         'yUtmkOnUSRnzbftbl359t201/sxlE0jJrvC4gM0P12jCVQNn/oxJD' +
    17.         'w/sB0YtWQM');
    18.   UseQuickly := BitmapFromString(62, 5, 'meJytUlsOwCAI83a7wH53/2N0TBO' +
    19.         'ytA17aMMHqUoLAlxoHT3Fth8REAw+j+z9IG1OdxIkROS/PKIJSH2y' +
    20.         'Po0oJT5Vs89tzLitncN965v8Ptg6UmWh82L37Hgt/+hcl9OS1q0Ka' +
    21.         'Wu2R93PE2hD/xg=');
    22.   NotEnough := BitmapFromString(92, 13, 'meJytVzFuBDEI9KfzgLQur8sDUk' +
    23.         'VKkS7J5xId2hEZYGD3sqLwYcAwjLFuv33tuzy/fqby9PIBMU1lvI9' +
    24.         'QJrf3b1qsteynaWyhhcwmXpQGpVQFEV4VMgaOBiFqSAyTti7A2EI0' +
    25.         'rCs1/k2mcjTNOj7K35QeB1h6Tazax0QttsZBRCRswYty85j4hKNlm' +
    26.         'kOFvK8U+eA4GKB2rFG+h4IW5i6A8lV4g4hn2k2sKyX1OjXzGsrK3+' +
    27.         '4KE1H+ZUxSBGJbycw3lHiSBj+LSdU++2LJZzHRB2lWpAlPeEKIRdz' +
    28.         'i2GlTjWMTu77p0f0sJtWIo/lJ5ZN7CxT5xkGKtH0hMW1BRfICo/bx' +
    29.         'TkXOi5hoayyB2kpBWg4Ijce25Un1sM6ljbDCTRdxvA31Or1lQp+ai' +
    30.         'UO1kvKvGOiDCNBij7Tc/r65k3qHEF3uu27KJDL1198FTRjSXMOkRe' +
    31.         'wRWNqwdGtoNx0yk4N2NmwfhyKFRTB8Pk801Ngd0olS/V9KTBiS/lv' +
    32.         '5AQTvoY4=');
    33.   Trolled := BitmapFromString(7, 21, 'meJzb/Pff5oFDs//8pTqq/kURivv' +
    34.         '1h0jkgw1Z/vxNJFL6/osSBADekmaR');
    35.   ClickHere := BitmapFromString(62, 12, 'meJydlkFOw1AMRHsMBBSKKnE49u' +
    36.         'zYsWPbC3DTYvGkp+n8REhEUeVv+48n9uSnp/Pl+nsdnz9P58vTy9f' +
    37.         'cY8/v/eP7GA/Hj/kdO6Pn1+9Z3t2/uWuMTftPNO5ZVgIb4TZRMMnE' +
    38.         'Nno4HPRYbrhhA+g9S+6JEpJw2S6psokmZhWd3+RWJTJqiwz5jC6tM' +
    39.         'm2BPEtrZZ8TrThs1spJ5fOuu1bmQkEMKIhVIWzGSufln7ZoVim0xJ' +
    40.         'wQjaIzyc0uWWtGc729KITw0s8QRfPt2HOaD1omjIdoOe1qEbCrxVN' +
    41.         '7EhJEp/7snqHENzNpr2gwWXcpZuaSyHbYfLuRCGOkf3A2/RDYizJ3' +
    42.         'Wldo5Sk9Q7t6XjnFPPtQUpFq8kTne5l7OlfPm6yU8arzsnMKaVdvJ' +
    43.         'ZNonOerEsjc1LlvaDKpk8cx1fOWvXry2auZjDJzSsZeq84TzYNrnV' +
    44.         'SeZqXzGi5qZFfZlD7cXpBXOVCiSmWWzgvNlzG35PHiRvP5yBY+fDx' +
    45.         'L5ZOtWz9G6tyN/0DLkxCDtPxAMwX/VGD/AGA4ek0=');
    46.   LogOutImage := BitmapFromString(28, 13, 'meJyNk0FqAkEQRXVrxEXATQRJxA' +
    47.         'lEiIIQCGFWghvdzglkIEcIzI3mEiJeIpfwDOojHz5FzxiEz1BdNf2' +
    48.         'o/tWdb4p8U5zPF9Ttdj5WW2nxtULK9x7609lcYnk87PlzOHp2lTiK' +
    49.         '7beYb8tP54mRmMqYqRgNHocKAK6Lnav5X9vG3s9ULAFMmG4VtZ799' +
    50.         '3SKnOw1U3skbzEjVvmyLCOzqir+HL9MXLWTrUwtRZbPdIV0djcmJm' +
    51.         'JeVOPBE2aSN7aua+cFfMrexURUI5a2xUT8mSj6EPM4ICZfYoJko5m' +
    52.         'tSkbmOyZvzYzC1eL753+m5Ycgb02WItbbm5YK5RJxfFweWVP0ieII' +
    53.         'kGbdvBXxgrGELwOdkSKTkclhZbiHzZsWH7KtcEY+XAHateLA');
    54.   ModCrown := BitmapFromString(14, 10, 'meJx78ODB9OnTa+asbl68uXPFtg' +
    55.         'cPHixatAgo0rN6NwQ9ACuAMCBSQJUQNgSgyeJXOXHtHmSVaQ3dyAo' +
    56.         'wAUQLUGVO80SCKoHKgIrzOqYU986CKGZkYAAiZAZEWduK7UCVxZ1T' +
    57.         'SibMhatEIyEqO5dtAwYL0EyCKiEIonI6bgBRBjQWorJ08sKmBeuA7' +
    58.         'gGGFRDBzQEqgLMBEZn6qQ==');
    59.   UseQuick := BitmapFromString(154, 9, 'meJztlVEOgzAMQ3M7LrDf3f8YbA' +
    60.         'KtK7GdNBRpfKzqR5aWxPi1zMyWx/M9123Y5+c9JxVZVf7eu203F9f' +
    61.         'FJM/OFI/rqMp2J5q7hj/Ny2mux+GsS21Ht7EIJWhmVIMTSZNxZWdF' +
    62.         'm8eO37zaj5a6PH1wcCkVEEuiNFvcD5dH3wL6qf+KBRXQL6XV8AD3E' +
    63.         'NEilUdw6kikuM8JOPrAJY3cTUSD+w0GpT/uP2WBKGdoupheW2oyWo' +
    64.         'pdaKNYwEisuO+rimYDhPeFWkrnDMGY5sgZq9KMqanY3btSo3maEK/' +
    65.         'uzI8Q6S9gPJvzF9KkZ8wdy/CNLjZZAf0JTXx3TCqvUpruEVqn1Q/2' +
    66.         'qKNFufdfFUWTfidxqWT4uUalfExzgb+8IJkuqUm9pUXoTxTmYqpE0' +
    67.         'TzxdtW42qiUD1q/AFeE6B0=');
    68.   StoreAll := BitmapFromString(55, 8, 'meJytU0EOwCAI43d8YNf9/xkzmZm' +
    69.         'pQNE4Gg6KWGtRvW6FeF6IiM75qjD8OGXjPvUkHVVJxj+wI9KfIh9M' +
    70.         'BovxiLwydBLLliKNTraa8Cx797/dx6us0jtc8ibDlh2LFEDhxzGEw' +
    71.         '4rQouQ63swqkeGVvRWhP/leZmZCwsYNyOR+KA==');
    72.   Lobster :=  BitmapFromString(22, 14, 'meJx1kjFLw2AQhusfcMgQCJRQEY' +
    73.         'I4lA4KakGpRCi1LSGWFhEcHFwEh0IHh4KDUOgQHAqd/K++X55y+Qw' +
    74.         'VjkAu97z33l26g8lBo6EITu/DziQ8e4wuX6Kr1zhdxHcfhD4pyBwN' +
    75.         'v46zdfLwLaTV6tyOprBBO4NtXr81b95V7CrHKxUHQRieP5ugy+eFr' +
    76.         '7AXj/tLVSbTTTLbKqN8XWG2ReEiHamFwrG9uSsYfOo1ipqK3XTtzC' +
    77.         'kwUX95mPSkwCeFPPgstuUQXC30lDfywhV0tFABnl0Nka1pIRwFpyz' +
    78.         'Z6ebk6QdL1ci9+a4ANi9QMJw9u4K8ABerrepSu3WlCyXBGYp2KHTL' +
    79.         'K8uejaxb/9l2uRkUbGQp+P7B7dWc21ZNnxqa/ocLdGcFL1m102V9X' +
    80.         'JfVk/HZgK8MVbEljn9AUwAnfDXtRwh47ZoCYU2qpoMCR+dfrR3dFF' +
    81.         'S5F69sjFdm3v+xfwEogsaI');
    82.   Nuoli := BitmapFromString(8, 7, 'meJzbvx8BnAtmApE9GKAJWiZOmj9/' +
    83.         'PlwcImIcWzUfDIAi3EreEEHN8Gq4IBAoax0CSiGrhACgIEQKWRAux' +
    84.         'c4+F00cAPsdXDE=');
    85.   Nuoli2 := BitmapFromString(8, 5, 'meJzbvx8BnAtmApE9GKAJWiZOmj9/' +
    86.         'PlwcImIcWzUfDIAi3EreEEHN8Gq4IBAoax0CSiGrhAAAdw5BMA==');
    87.   Nuoli3 := BitmapFromString(5, 6, 'meJybP3/+/v37GRkYlGzigCggIHD+' +
    88.         '/Plwrr29/XwkBWhcIAONCwEQLgAD2COL');
    89.   Nuoli4 := BitmapFromString(4, 4, 'meJxzLphpmTjJOLZq/vz5QIZmePV8' +
    90.         'MICIAMH+/fu5lbwhDCAAAC7ZGRE=');
    91.   Pankki := BitmapFromString(7, 3, 'meJyzX7TB5+JLppRSCAlE+/fvt1+0' +
    92.         'wR4sDkGY4nD1AA4eIHc=');
    93.   Vetta :=  BitmapFromString(6, 5, 'meJzbvx8EnrcXvEpzhiA49+3xo0Dy' +
    94.         'vgMHRATIRRaBKMYUgXCBCAAFijWU');
    95.   Kala :=  BitmapFromString(7, 4, 'meJzbv3///0PKf/P54Wg/GAAZjAwM' +
    96.         'yOL3HTggCFkEqBIuDkSnJBiACAAxsSea');
    97.   Kivi :=  BitmapFromString(19, 14, 'meJxtkrFqBCEQhq+12UfICyRFIF' +
    98.         't44IGGLbRZBq44QQ4kENgihe9f3T/OKub24GcYxG/+mdEpquDpShF' +
    99.         'xiqorWN9zZ/23tc4Skotdzsa6xf+Vwshd7aoITnBTSuFyqMLJ16zP' +
    100.         '2nA09ncrUMrbbtSQauFdLeIaiFyKrEQM5g1KMadcxg5HSZ+hlQpES' +
    101.         'agaXyJhaJURT7BjebrFvFKU+N/F793WCFD6b3jcVfPpR4l6fZkRrc' +
    102.         'rS4IXlzNrc4NXtGiUa7BjHJqHT2wnCbmtBkhGewMZSj0KJEm+myH6' +
    103.         'QHFne8109UZCMJiuStgc7bkY+Bo/cekaR949Pfvp2E2/qhpcafxQP' +
    104.         'qA12wold4HgcCkj/Kh281Mvjfo5Didb6uzoY2oziOGv7AEpgtyU=');
    105.   Kivi2 :=  BitmapFromString(18, 15, 'meJx1kr1qwzAUhbN68SP0JZLBKQ' +
    106.         '5IxYOymAsdLCICosVFY95/6rk6siKnFA5Clu93/0NMP+lxdfIpvvc' +
    107.         'dhU+ofkKz6Ms1n+fRtL/wyIs1bhZ5cWIN5IC8j9PzPVvi8mFMtnHP' +
    108.         'X/kdyTAQhAuM1V52WYEtlHEQnBCxk7uYaU2P/t4V1RLUTJgqKTg5n' +
    109.         'obTMDIWqDWmNgSTpHOmqmBx5VhIiAlU8BGdDA2+61IODVfqM7Ok1n' +
    110.         '/s7ea/loaeINbi4yx+wX0/IFsspQYimCVqL/47Jpz9V0fNW0X0b3M' +
    111.         '3cN68P6Mhw7gQQaANoTjBGoJtP7wdIFDoIVqhfdhTEJNEIaSIUCFq' +
    112.         '6xT08S+os74r3iIQ62I3lgYsq5inz7o4Sm5dNePUGLfs/LYzWAksB' +
    113.         'sTFgH4BaLPA4A==');
    114.   Kivi3 :=  BitmapFromString(10, 8, 'meJw9jjsKxDAMROs0uUxSOOCAFFI' +
    115.         'ozSJIY/b+B9mHx2sYptB8NG6xtgU8kU8m/GaDj2rgMhuqBXC4S37H' +
    116.         'abdbInmXAOZtL3upysoMhoFyNVh8MlU7y6kiDuTR3f/++ZptZH1cc' +
    117.         'gZlcB37R/m9r4K/rR0MK/UH7hM8fQ==');
    118.   Kivi4 :=  BitmapFromString(19, 12, 'meJxlkjELwkAMhR1d+hPcRRCKds' +
    119.         'jgEEFqQYUMCtXFw0k3///kS58XTw2P41Ly5e5eWl3GFXVytapr7Yb' +
    120.         'VmEIIEVnKChJR6pLuRCAimoujSavGlPvWDN9vKYF9PJ/YII0moXdx' +
    121.         '7oaarae277qj+fqPaK6McyFQiBIsWRYHpZ/jbGhijUhK6WC9U9cxh' +
    122.         'SdAUVac6J7Qn5VugAAMijJ/flC2aBpUjiYjSIZAypsgfthtBlvfGC' +
    123.         'lqVnvAUhrrc/lmcTfMF2xJUfO6YQ3Yc9+zCd2D+GNwiJzCzmw2rSG' +
    124.         'wX54Ug67yHzW8SfO6iUN/7hb+B0hb6El52xd3x5N4');
    125.   Kivi5 :=  BitmapFromString(20, 14, 'meJxtkjFrAzEMhTNm6U/oXkoKl/' +
    126.         'YGDxlUKNeDNPCGC5Rbam4ozeZu/Qn92X2WbMUJNQ/hO/Ssz7JOKS0' +
    127.         'xJY0387roWCQivn8VUEOWMO7kZY5fJzUuMXLvmc8yao7UT/gfIBtD' +
    128.         'CJ/pZ0I84H0CNEYTc5gsGt3F9dj3T2EXglCkfRvHaoTXvZJxetTT8' +
    129.         'J1+WYXLTvjPBdGig2I7wwDMMTqnwV9eGUZuXil1sQfondRegD/WJj' +
    130.         'LoTSF1tSfYmX0IjsHoXqpcCoXTc3JFkW3XUd5PubSfaeGosrpdUew' +
    131.         'wu824pGTJfF+qLb2HNwfmcj10Peu2ybWHqGywMTOA1rvZbLZduPJ6' +
    132.         'IaL6iBKP80DO1k7vkU+T+5zfNz9QPeQ82+o1e7MJ93fdoQ7k3FzWa' +
    133.         'as3aIu4RCe58P8BfTvAnA==');
    134.   Kivi6 :=  BitmapFromString(20, 14, 'meJx1UrFOw0AM7Ziln8COmFLocE' +
    135.         'MHI0UhUqjkIZVKF6xUqspmNsaMfDbP57vjqET0ajltn/387PWpWR8' +
    136.         'MPXNPPDL7q31DVOX8TIMjEAV8us5/mkVrFsBWikDxIkgoPo/bbQjh' +
    137.         'KexAP4viQVxDgOPQoLg3MhbnhDiD/BWsk1wj9O14nNViLaAgVyAkE' +
    138.         'ImaqssskqH/sagWEJ15Ib7o8joME8uejwDymhW7JEqqkFsDF/2amA' +
    139.         'GwRCTR3xtEgPLfakAwvIJpn/oduXKS1BpEx5RFlgqQiuWs7lYA3Ma' +
    140.         '8Hwq7kmOF6Cir8Rmh34kOXdwroyMxk//Sx9gdu0OsiQ/3LbyCNkj1' +
    141.         'WHzzQUwnbibuPQmIGsYoA4eBdqXL/Lvua7qrfDPxlvDYQe6oQ2Y7v' +
    142.         'ZkxjZYuoXDtkoMZhSI4ZpvXjJIbOgQj7llsXxW3zyZv2nbThh8nlMwy');
    143.   Kivi7 :=  BitmapFromString(23, 23, 'meJxdVDFuwzAM/JqzpAHaABocwP' +
    144.         'VEOIhhb+pmdNIYoEue3CNPpNQKBEHb4ul4pLyILCKz5Fk2s7xIxoK' +
    145.         '/my0W83EWuaYJNiYEAn9LyAVCTbed9RHBng2hfdU3Y0pI+bhckAu/' +
    146.         'bxsAZ/tEBPd9ogaf0xTBaKcT6qpkJpGeiaZjG6xh5prLl+eUzsNwH' +
    147.         'tJg6zRcYG8DXiaefvcqiBYl0LNSBUkJiQalC+mEgobfx0EaXg6zmu' +
    148.         '2qdMah74bD3ECAdWps2EzmvaexKRATnh0R69TJoHIuR3n+vF5rPnI' +
    149.         'pkcieYpnyGelEgKqjaGdvqYKgNICsakB6IuhOr+KwuVKPZm6bFhjq' +
    150.         'AshXfgIBHnFUQQI+acIxg2ciiYHV1UFAAkxA47FVBVRk0yfGVaTOJ' +
    151.         '2eVAYaNTEDAOHApDrzVeBh44Snk4OnplnrMiduQa8oEiGoEnRGsBh' +
    152.         'KDvee4HdRc+ehmO1e7g/RSLMirQ8HiIphcdZix2G4QYy48igINo3S' +
    153.         'QzMOOoLBxHRDs1ndWB3lBhunUlrq4zgdV9TsohFqkyctOEcQU1UY7' +
    154.         'h0I0PJpEmZj8ap1tLSYTqhp69iCUixsQ+4Alzn+ggRi+kgOHDVPHn' +
    155.         'hJBX2qPirbYJ41oMbEwpnQEqqRExp0y2Hado03edL0UrNRwmg7/Ci' +
    156.         'QxGF/2t3vxfzLVi0H1ouoMx5jxHzX//XmyazHtnBC/BSU6FZPPixB' +
    157.         'f/ceuyL8ydmz3');
    158.   ExistingImage := BitmapFromString(87, 10, 'meJyFlNFKQ0EMRP0dfREUilhQkT' +
    159.         '5UQX0Rhb76/99QQwcO00nu7RIuu7m72czsJIevj8PJvt/3n7vXt+c' +
    160.         'nWc1lLGuD9sh8Hn81D/PNFXC3fSzjIve40xNgz/b+TvbysJGHs750' +
    161.         'q521//bmuozj8tRXDBzbcB7IJ0yXwlshFZkrJDhY0hMW4qzcVab0Q' +
    162.         'McyGIilSAjsmJNwdT7AqMdFLSGSMWcFDJF0YsXAGKGLQcmQqpPAcs' +
    163.         'V0F2y4KoKEUb1d8EsKgTECUjgAGS3IjErxg0SWf4kEwFIyIQY3fzh' +
    164.         'FVtq9FUgMMEYnCd40cVb9Ci9qkMpT31C+8wOQJRKib6xA7qb8vRvU' +
    165.         '8u/3p4wlG3gp1Yvj9ePhBJpO8ZoM5ewP3ftS9ARQj5wwoCKuE+14C' +
    166.         'mzvCSIhGqZ+ca+TE83Ec6O9OC6PSWJxyhN2kbMnlv3S4NzDSn6kET' +
    167.         '0BSYuE4CcUqAJxoiiNCOgZjmDDHx2P6nbUemWWXQm9jfh+9xcKlO8' +
    168.         'l3JWALIOE+jqcIKHTEhRdnHtPCNR9G6XqPBzPR1dIkECv8yYfFHmq' +
    169.         '3hhHmBf/jsDj+dx4hSiraKFjKIb6MP5/O/dEyA==');
    170.   LoginImage := BitmapFromString(34, 8, 'meJyFUtEKg0AM6zc5GGOCG3IP2x7' +
    171.         'uyf//FQ0GQlwrlj7kYts0d/Y2r3tExPL79DYr2/hEjrcBCfB9TSR5' +
    172.         'ZA1IlnEIjmLejzt7AbqpaD4rVws2ljwnI2MPDVRAyFVUr1Fs1J4lj' +
    173.         '1XFuy+WEeCWspc/g5fY1bF53sRVgJVOlvhMEZazYqnSj7/EpcqZFy' +
    174.         'mq0YOv4wzt+wL+CU9TehHP5SNF5v3V/M7pBRa8jJj/PMAGk0iV/g==');
    175. end;
    176. procedure FreebitmapsNow;
    177. begin
    178.   FreeBitmap(StoreAll);
    179.   FreeBitmap(NotEnough);
    180.   FreeBitmap(Trolled);
    181.   FreeBitmap(ClickHere);
    182.   FreeBitmap(LogOutImage);
    183.   FreeBitmap(ModCrown);
    184.   FreeBitMap(UseQuick);
    185.   FreeBitMap(StoreAll);
    186.   FreeBitmap(Lobster);
    187.   FreeBitmap(Nuoli);
    188.   FreeBitmap(Nuoli2);
    189.   FreeBitmap(Nuoli3);
    190.   FreeBitmap(Nuoli4);
    191.   FreeBitmap(Pankki);
    192.   FreeBitmap(Vetta);
    193.   FreeBitmap(Kala);
    194.   FreeBitmap(Kivi);
    195.   FreeBitmap(Kivi2);
    196.   FreeBitmap(Kivi3);
    197.   FreeBitmap(Kivi4);
    198.   FreeBitmap(Kivi5);
    199.   FreeBitmap(Kivi6);
    200.   FreeBitmap(Kivi7);
    201.   FreeBitmap(ExistingImage);
    202.   FreeBitmap(LoginImage);
    203.   FreeBitmap(UseQuickly);
    204. end;
    205. procedure EscapeScene;
    206. begin
    207. mMouse(630,45,1,1);
    208. sleep(500);
    209. ClickMouse(X,Y,Mouse_Left)
    210. sleep(5000);
    211. mMouse(630,45,1,1);
    212. sleep(500);
    213. ClickMouse(X,Y,Mouse_Left)
    214. end;
    215. procedure LogOutNow;
    216. begin
    217.       if FindBitmapToleranceIn(LogOutImage, X, Y, 560, 450, 665, 500, 10)then
    218.       begin
    219.       mMouse(X,Y,1,1);
    220.       sleep(500);
    221.       ClickMouse(X,Y,Mouse_Left)
    222.       sleep(500);
    223.             if FindBitmapToleranceIn(ClickHere, X, Y, 560, 340, 720, 410, 10)then
    224.             begin
    225.             mMouse(X,Y,1,1);
    226.             sleep(500);
    227.             ClickMouse(X,Y,Mouse_Left)
    228.             end;
    229.       end;
    230. end;
    231. procedure LogInNow;
    232. begin
    233.       if FindBitmapToleranceIn(ExistingImage, X, Y, 0, 0, 700, 600, 10)then
    234.       begin
    235.       mMouse(X,Y,1,1);
    236.       sleep(500);
    237.       ClickMouse(X,Y,Mouse_Left)
    238.       sleep(1000);
    239.             if FindBitmapToleranceIn(LoginImage, X, Y, 0, 0, 700, 600, 10)then
    240.             begin
    241.             mMouse(X,Y,1,1);
    242.             sleep(500);
    243.             ClickMouse(X,Y,Mouse_Left)
    244.             end;
    245.       end;
    246. end;
    247. procedure GoToNuoli;
    248. begin
    249. Nuolella := false;
    250. repeat
    251.       if FindBitmapToleranceIn(Nuoli,X,Y, 510, 0, 750, 200, 40)or
    252.          FindBitmapToleranceIn(Nuoli2,X,Y, 510, 0, 750, 200, 40)or
    253.          FindBitmapToleranceIn(Nuoli3,X,Y, 510, 0, 750, 200, 40)or
    254.          FindBitmapToleranceIn(Nuoli4,X,Y,510,0,750,200,40)then
    255.           begin
    256.           mMouse(X,Y+23,1,1);
    257.           sleep(200);
    258.           ClickMouse(X,Y,Mouse_Left)
    259.           Nuolella := true;
    260.           Sleep(7000);
    261.           end else
    262.           begin
    263.               if FindBitmapToleranceIn(Vetta,X,Y,510,0,750,200,40)then
    264.               begin
    265.               mMouse(X-25,Y+23,1,1);
    266.               sleep(200);
    267.               ClickMouse(X,Y,Mouse_Left)
    268.               Nuolella := true;
    269.               Sleep(7000);
    270.               end;
    271.           end;
    272. until Nuolella
    273. end;
    274. procedure GoToKala;
    275. begin
    276. Kalalla := false;
    277. repeat
    278.     if FindBitmapToleranceIn(Kala,X ,Y , 510, 0, 750, 200, 10)then
    279.     begin
    280.     mMouse(X+5,Y,1,1);
    281.     sleep(200);
    282.     ClickMouse(X,Y,Mouse_Left)
    283.     Kalalla := true;
    284.     Sleep(5000);
    285.     end;
    286. until Kalalla
    287. end;
    288. procedure GoToPankki;
    289. begin
    290. Pankissa := false;
    291.     repeat
    292.         if FindBitmapToleranceIn(Pankki,X ,Y , 510, 0, 750, 200, 10)then
    293.         begin
    294.         mMouse(X+8,Y+5,1,1);
    295.         sleep(200);
    296.         ClickMouse(X,Y,Mouse_Left)
    297.         Pankissa := true;
    298.         Sleep(10000);
    299.         end;
    300.     until Pankissa
    301. end;
    302. procedure StartFishing;
    303. begin
    304. Fishing := false;
    305. repeat
    306.     if FindBitmapToleranceIn(Kivi,X,Y, 0, 0, 600, 400, 50)or
    307.        FindBitmapToleranceIn(Kivi2,X,Y, 0, 0, 600, 400, 50)or
    308.        FindBitmapToleranceIn(Kivi3,X,Y, 0, 0, 600, 400, 50)or
    309.        FindBitmapToleranceIn(Kivi4,X,Y, 0, 0, 600, 400, 50)or
    310.        FindBitmapToleranceIn(Kivi5,X,Y, 0, 0, 600, 400, 50)or
    311.        FindBitmapToleranceIn(Kivi6,X,Y, 0, 0, 600, 400, 50)then
    312.     begin
    313.     Fishing := true;
    314.     WriteLn('Fishing!');
    315.     mmouse(X+50,Y+10,1,1);//Move mouse to fishing spot
    316.     Sleep(500);
    317.     ClickMouse(X,Y,Mouse_Left)//Click the fishing spot
    318.     end else
    319.     begin
    320.     WriteLn('Fishing!');
    321.     Fishing := true;
    322.     mMouse(260,190,1,1);
    323.     sleep(500);
    324.     ClickMouse(X,Y,Mouse_Left)
    325.     sleep(500);
    326.     ClickMouse(X,Y,Mouse_Left)
    327.     end;
    328.     if FindBitmapToleranceIn(Kivi7,X,Y,0,0,600,400,50)then
    329.     begin
    330.     Fishing := true;
    331.     WriteLn('Fishing!');
    332.     mMouse(x-40,y+90,1,1);
    333.     sleep(500);
    334.     ClickMouse(X,Y,Mouse_Left)
    335.     end;
    336. until Fishing
    337. end;
    338. procedure GoToFishingSpot;
    339. begin
    340.  GoToNuoli;
    341.  GoToKala;
    342. end;
    343. procedure BankFish;
    344. begin
    345. WriteLn('Banking Lobster');
    346. Stored := false;
    347.  
    348.     repeat
    349.         begin
    350.             sleep(1500);
    351.             mMouse(650,335,50,80);
    352.             sleep(500);
    353.             ClickMouse(X,Y,Mouse_Right)
    354.             if FindBitmapToleranceIn(StoreAll,X,Y, 560, 210, 755, 480, 50)then
    355.             begin
    356.             stored := true;
    357.             mMouse(X,Y,1,1);
    358.             ClickMouse(X,Y,Mouse_Left)
    359.             sleep(1250);
    360.             end;
    361.         end;
    362.     until Stored
    363.  
    364.  
    365. inc(Lobsters);
    366. WriteLn('***************PROGRESS REPORT**************************');
    367. WriteLn('Script has run for : ' + TimeRunning + '');
    368. WriteLn('You have fished ' + IntToStr(Lobsters*27) + ' lobsters!');
    369. WriteLn('You have made ' + IntToStr(Lobsters*27*56) + ' GP!');
    370. WriteLn('***************PROGRESS REPORT**************************');
    371.  
    372. GoToFishingSpot;
    373. end;
    374. procedure BankOpen;
    375. begin
    376.  
    377.     mmouse(265,110,1,1);
    378.     sleep(250);
    379.     ClickMouse(X,Y,Mouse_Right)
    380.     sleep(1000);
    381.  
    382.     if FindBitmapToleranceIn(UseQuickly,X,Y, 0, 0, 600, 400, 50)then
    383.     begin
    384.     mmouse(X,Y,1,1);
    385.     sleep(750);
    386.     ClickMouse(X,Y,Mouse_Left)
    387.     sleep(1234);
    388.     BankFish;
    389.     end else
    390.     mmouse(255,110,1,1);
    391.     sleep(250);
    392.     ClickMouse(X,Y,Mouse_Right)
    393.     sleep(1000);
    394.  
    395.     if FindBitmapToleranceIn(UseQuickly,X,Y, 0, 0, 600, 400, 50)then
    396.     begin
    397.     mmouse(X,Y,1,1);
    398.     sleep(750);
    399.     ClickMouse(X,Y,Mouse_Left)
    400.     sleep(1234);
    401.     BankFish;
    402.     end else
    403.     mmouse(245,110,1,1);
    404.     sleep(250);
    405.     ClickMouse(X,Y,Mouse_Right)
    406.     sleep(1000);
    407.  
    408.     if FindBitmapToleranceIn(UseQuickly,X,Y, 0, 0, 600, 400, 50)then
    409.     begin
    410.     mmouse(X,Y,1,1);
    411.     sleep(750);
    412.     ClickMouse(X,Y,Mouse_Left)
    413.     sleep(1234);
    414.     BankFish;
    415.     end else
    416.     mmouse(225,110,1,1);
    417.     sleep(250);
    418.     ClickMouse(X,Y,Mouse_Right)
    419.     sleep(1000);
    420.  
    421.     if FindBitmapToleranceIn(UseQuickly,X,Y, 0, 0, 600, 400, 50)then
    422.     begin
    423.     mmouse(X,Y,1,1);
    424.     sleep(750);
    425.     ClickMouse(X,Y,Mouse_Left)
    426.     sleep(1234);
    427.     BankFish;
    428.     end;
    429. end;
    430. procedure GoToBank;
    431. begin
    432. GoToNuoli;
    433. sleep(500);
    434. GoToPankki;
    435. BankOpen;
    436. end;
    437.  
    438. procedure CheckSpace;
    439. var
    440. interwebz: Integer;
    441. begin
    442.   InvyFull := false;
    443.     repeat
    444.             if FindBitmapToleranceIn(NotEnough, X, Y, 15, 350, 300, 445, 10)or
    445.                FindColorSpiralTolerance(x, y, 2314378, 685, 435, 740, 480, 5)or
    446.                FindColorSpiralTolerance(x, y, 2049917, 685, 435, 740, 480, 5)or
    447.                FindColorSpiralTolerance(x, y, 1852278, 685, 435, 740, 480, 5)or
    448.                FindColorSpiralTolerance(x, y, 2182791, 685, 435, 740, 480, 5)or
    449.                FindBitmapToleranceIn(Lobster, X, Y, 685, 405, 740, 480, 5)then
    450.             begin
    451.             WriteLn('Inventory full going to bank!');
    452.             InvyFull := True;
    453.             sleep(500);
    454.             GoToBank;
    455.             end;
    456.  
    457.             if FindBitmapToleranceIn(Trolled, X, Y, 15, 350, 300, 445, 10)then
    458.             begin
    459.             WriteLn('Troll encountered escaping');
    460.              EscapeScene;
    461.              sleep(30000);
    462.              LogOutNow;
    463.              Sleep(15000);
    464.              LogInNow;
    465.             end;
    466.  
    467.             if FindBitmapToleranceIn(ModCrown, X, Y, 0, 330, 100, 445, 10)then
    468.             begin
    469.             WriteLn('Mod encountered loggin out!');
    470.             LogOutNow;
    471.             TerminateScript;
    472.             end;
    473.  
    474.             if FindBitmapToleranceIn(ExistingImage, X, Y, 0, 0, 700, 600, 10)then
    475.             begin
    476.             LogInNow;
    477.             sleep(15000);
    478.             GoToBank;
    479.             end;
    480.  
    481.  
    482.             sleep(5000);
    483.             interwebz := Random(25);
    484.             if (interwebz = 10) then
    485.             begin
    486.             mMouse(588,160,1,1);
    487.             sleep(250);
    488.             ClickMouse(X,Y,Mouse_left)
    489.             sleep(750+Random(1500));
    490.             mMouse(715,260,1,1);
    491.             sleep(750+Random(1500));
    492.             mMouse(710,255,1,1);
    493.             sleep(750+Random(1500));
    494.             mMouse(713,258,1,1);
    495.             sleep(750+Random(1500));
    496.             mMouse(646,161,1,1);
    497.             ClickMouse(X,Y,Mouse_Left)
    498.             sleep(3500+Random(1500));
    499.             end;
    500.  
    501.     until InvyFull;
    502. end;
    503. procedure StartThem;
    504. begin
    505.   EnoughOfThis := false;
    506.   sleep(500);
    507.   repeat
    508.   StartFishing;
    509.   wait(1000);
    510.   CheckSpace;
    511.   until EnoughOfThis
    512. end;
    513.  
    514. begin
    515.   ClearDebug;
    516.   MouseSpeed := 15;
    517.   SetUpSRL;
    518.  
    519.   BitmapsHere;
    520.  
    521.   StartThem;
    522.  
    523.   FreebitmapsNow;
    524. end.
    Last edited by Hobbit; 01-30-2013 at 03:32 AM. Reason: simba tags

  15. #15
    Join Date
    Mar 2006
    Location
    Belgium
    Posts
    3,564
    Mentioned
    111 Post(s)
    Quoted
    1475 Post(s)

    Default

    Put simba tags around your script, that little lion head does it.

    Creds to DannyRS for this wonderful sig!

  16. #16
    Join Date
    Mar 2006
    Posts
    13,241
    Mentioned
    228 Post(s)
    Quoted
    267 Post(s)

    Default

    Put in simba tags
    STOP PM'ING ME

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •