Zappy Posted March 4, 2012 Author Share Posted March 4, 2012 **_What it does_**My friends commonly tell me to "Blah blah make shopping easier."Having to click buy/sell for every individual item can be a nuisance when you're trying to stock up on potions, or sell a freshly chopped stack of lumber. So I'm here to offer a simple and effective fix for those who don't know where to start!Instead of having to hit "buy" or "sell" for each item, you now enter "buying mode" or "selling mode" after clicking the respective button. From that point on, you can continue clicking items you wish to buy or sell without being pestered to click the button every time. You can cancel "buying/selling mode" buy clicking on the respective button a second time.**Server Side**In **modHandleData**, in **HandleSellItem** and **HandleBuyItem**, find:```ResetShopAction index```This command will show up twice in each sub, remove every instance found in the these two subs.**_Client Side_**Enter frmMain, open the code and find:```Private Sub imgShopBuy_Click()```and replace the entire sub with:```Private Sub imgShopBuy_Click() ' If debug mode, handle error then exit out If Options.Debug = 1 Then On Error GoTo errorhandler If ShopAction = 1 Then ShopAction = 0 AddText "Stopped Buying", White Else ShopAction = 1 ' buying an item AddText "Started Buying. (Double Click Items to Buy)", White End If ' Error handler Exit Suberrorhandler: HandleError "imgShopBuy_Click", "frmMain", Err.Number, Err.Description, Err.Source, Err.HelpContext Err.Clear Exit SubEnd Sub```now find:```Private Sub imgShopSell_Click()```and replace the entire sub with:```Private Sub imgShopSell_Click() ' If debug mode, handle error then exit out If Options.Debug = 1 Then On Error GoTo errorhandler If ShopAction = 2 Then ShopAction = 0 AddText "Stopped Selling", White Else ShopAction = 2 ' selling an item AddText "Started Selling. (Double Click Items to Sell)", White End If ' Error handler Exit Suberrorhandler: HandleError "imgShopSell_Click", "frmMain", Err.Number, Err.Description, Err.Source, Err.HelpContext Err.Clear Exit SubEnd Sub```There!Enjoy! <3 Link to comment Share on other sites More sharing options...
PVJsquad Posted March 6, 2012 Share Posted March 6, 2012 anyone know how to show the picScreen in Shop mode :? Link to comment Share on other sites More sharing options...
wito35 Posted March 15, 2012 Share Posted March 15, 2012 Good job!Everything works correctly!Thanks! :D Link to comment Share on other sites More sharing options...
Zappy Posted March 16, 2012 Author Share Posted March 16, 2012 No problemo amigo, I aim to please ;) Link to comment Share on other sites More sharing options...
erkro1 Posted March 16, 2012 Share Posted March 16, 2012 @GoldSide:> anyone know how to show the picScreen in Shop mode :?Make picCover.Visible = falseAnd I agree this is better than the default EO buying/selling system, although I'm more a fan of the double click to buy and sell it method. :P Link to comment Share on other sites More sharing options...
Zappy Posted March 16, 2012 Author Share Posted March 16, 2012 As am I, this was just easy peasy. ^-^ Maybe I'll work on that method sometime in the near future and post that as well! Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now