How to open Itemshop...
Posted: Fri Nov 26, 2010 11:08 am
...with script command?
Code: Select all
/script ItemMallFrame:Show()Code: Select all
RoMScript("ItemMallFrame:Show()")Code: Select all
function sec_pw()
acconame = RoMScript("GetAccountName();");
if accname == "Testingacc"
then
keyboardType("SecPW");
else
if accname == ("Acc1") or ("Acc2") or ("Acc3") or ("Acc4") or ("Acc5")
then
keyboardType("SecPW");
else
if accname == ("Acc6") or ("Acc7")
then
keyboardType("SecPW");
else
keyboardType("SecPW");
end;
end;
end;
endCode: Select all
function sec_pw()
acconame = RoMScript("GetAccountName();");
if accname == "Testingacc" then
keyboardType("SecPW");
elseif accname == ("Acc1") or accname == ("Acc2") or accname == ("Acc3") or accname == ("Acc4") or accname == ("Acc5") then
keyboardType("SecPW");
elseif accname == ("Acc6") or accname == ("Acc7") then
keyboardType("SecPW");
else
keyboardType("SecPW");
end;
endI'd need to look at your code to help you further.Personalausweis wrote:and how shall i do that????
Code: Select all
<?xml version="1.0" encoding="utf-8"?><waypoints>
<onLoad>
include( "/userfunctions/addon_sec_pw.lua");
</onLoad>
<!-- # 1 --><waypoint x="14" z="40">
RoMScript("ItemMallFrame:Show()");
yrest(100)
player:mouseclickL(429, 146, 1024, 768); clicks token shop
yrest(500);
player:mouseclickL(58, 298, 1024, 768); double clicks category with puris
player:mouseclickL(58, 298, 1024, 768);
yrest(100);
player:mouseclickL(343, 200, 1024, 768); clicks buy button
yrest(500);
player:mouseclickL(245, 394, 1024, 768); clicks confirm to buy 1 pury
sec_pw(); shall enter sec pw
-- player:mouseclickL(448, 205, 1024, 768); clicks confirm sec pw
</waypoint>
</waypoints>Code: Select all
acconame = RoMScript("GetAccountName();");
player:mouseclickL(245, 394, 1024, 768); clicks confirm to buy 1 pury
sec_pw(acconame ); shall enter sec pwCode: Select all
function sec_pw(accname)
if accname == "Testingacc" then
keyboardType("SecPW");
elseif accname == ("Acc1") or accname == ("Acc2") or accname == ("Acc3") or accname == ("Acc4") or accname == ("Acc5") then
keyboardType("SecPW");
elseif accname == ("Acc6") or accname == ("Acc7") then
keyboardType("SecPW");
else
keyboardType("SecPW");
end;
endMaybe the mouse click to close the password box missed? Wait, is it still commented out? If it clicks and closes the password box then the 0 wont appear.Personalausweis wrote:new1:
a 0 behind th PW
Did you change it like I said? Because the way you had it at first wouldn't have worked.Personalausweis wrote:new2:
wrong PW in box O.o
tested it with "testingacc" and he typed secPW from the very last else part -.-
Code: Select all
if a == b or c or d thenCode: Select all
if a == b or a == c or a == d thenCode: Select all
function sec_pw(accname)
if accname == "Testingacc" then
keyboardType("SecPW");
elseif accname == ("Acc1") or accname == ("Acc2") or accname == ("Acc3") or accname == ("Acc4") or accname == ("Acc5") then
keyboardType("SecPW");
elseif accname == ("Acc6") or accname == ("Acc7") then
keyboardType("SecPW");
else
keyboardType("SecPW");
end;
endCode: Select all
<?xml version="1.0" encoding="utf-8"?><waypoints>
<onLoad>
include( "/userfunctions/addon_sec_pw.lua");
include( "/userfunctions/addon_writetokens.lua");
</onLoad>
<!-- # 1 --><waypoint x="14" z="40">
RoMScript("ItemMallFrame:Show()");
yrest(1000)
player:mouseclickL(434, 106, 1024, 768);
yrest(500);
player:mouseclickL(59, 260, 1024, 768);
player:mouseclickL(59, 260, 1024, 768);
yrest(500);
player:mouseclickL(330, 162, 1024, 768);
yrest(500);
accname = RoMScript("GetAccountName();");
player:mouseclickL(240, 358, 1024, 768);
yrest(500);
sec_pw(accname);
player:mouseclickL(469, 202, 1024, 768);
write_tokens();
sendMacro("}LoginNextToon=true;a={")
sendMacro("Logout();"); yrest(60*1000);
player = CPlayer.new();
settings.load();
settings.loadProfile("Daylie");
yrest (4000)
loadPaths("itemshop");
</waypoint>
</waypoints>Code: Select all
keyboardPress( key.VK_A, key.VK_SHIFT );
keyboardType("bc");
keyboardPress( key.VK_D, key.VK_SHIFT );
keyboardType("ef");