CharmedOne Posted June 17, 2010 Report Share Posted June 17, 2010 some reasong i can add name but it will not let me add password whats making it do this???? ;------------------------------------------------------------------------------------------------------------------------------ ;------------------------------------------------------------------------------------------------------------------------------ ;------------[ Email Dialog ]-------------------------------------------------------------------------------------------------- ;------------------------------------------------------------------------------------------------------------------------------ alias signin { /dialog -m sign sign } } dialog sign { alias sign { dialog -m sign sign } alias csign { dll $rebar UnDock center | dialog -x sign sign } alias rebar { return dll/rebar.dll } dialog sign { title "Pass Word Dialog [ /signin ]" size -1 -1 191 73 option dbu icon photos\icon.ico, 0 edit "", 1, 37 15 78 10, return autohs text Email:, 2, 9 16 25 8, center edit "", 3, 37 29 78 10, pass return button "Add", 4, 116 15 19 10, flat button "Delete", 5, 116 29 19 10, flat text Password:, 6, 9 30 28 8, center edit "", 7, 37 43 96 10, read return text Nick:, 8, 9 45 25 8, center box , 12, 5 10 182 47 box , 13, 5 10 134 47 button "Ok / Cancel", 14, 70 59 37 9, ok cancel text "By &Aimz ©2010", 11, 124 62 65 8, center edit "Pass Word Dialog [/PASSW]", 15, 50 4 80 10, center box "", 16, 2 0 188 71 icon 9, -38 -65 291 274, images\back.jpg, 0, noborder icon 10, 141 17 43 37, images\middle.jpg, 0, noborder icon 17, 2 74 187 126, Images\small.jpg, 0, noborder } on *:dialog:sign:init:*: { .timer -m 1 1 sign.an did -ra $dname 3 %password did -ra $dname 1 %email did -ra $dname 7 $buzz.decode($me) .splay mepart.wav | .timer.p 1 1 splay password.wav dll $rebar Dock $dialog($dname).hwnd > center dll $mdx SetMircVersion $version dll $mdx MarkDialog $dname dll $mdx SetFont $dname dll $mdx SetColor $dname dll dll\mdx.dll SetBorderStyle 1,3,2,6,8,2,6,7,8 14 50 Georgia Bold dll dll\mdx.dll SetColor $dname 1,3,2,6,8,2,6,7,8 text $rgb(%list1colour,%list2colour,%list3colour) dll $mdx SetFont $dname 1,3,2,6,8,2,6,7,8 40 Georgia Bold mdx SetFont 1,3,2,6,8,2,6,7,8 +a 12 100 Verdana colorize } on *:dialog:sign:sclick:*:{ if ($did = 4) { if ($did = 4) { $iif($did(1), set %email $did(1)) | $iif($did(3), set %password $md5($did(3))) | .splay Data.wav | .loadbuf -ro sign 1,3 | .echo $active 0,4Email & Password 0,12Added } } if ($did = 5) { .unset %email | .unset %password | .loadbuf -ro sign 1 | .loadbuf -ro sign 3 | .echo $active 0,12Email & Password 0,4Deleted | did -r sign 5 } if ($did = 14) { .splay zip.wav } } alias refresh { did -r sign 5 } alias colorize { var %x 1 :lp dll $mdx SetDialog $dname bgcolor $rgb(155,0,0) dll $mdx SetColor $dname %x background $rgb(155,0,0) dll $mdx SetColor $dname %x text $rgb(255,255,255) dll $mdx SetColor $dname %x textbg $rgb(155,0,0) inc %x if (%x == 100) { goto nd } else { goto lp } :nd } alias sign.an { var %i 0 while (%i <= 191) { dialog -srb sign -1 -1 %i %i var %t 1 while (%t <= 73) inc %t inc %i } .timer -m 1 1 sign.tbar | .splay mepart.wav } alias sign { if ($dialog(sign)) { dialog -c sign sign dialog -mado sign sign } else { dialog -mado sign sign } } alias sign.die { var %i 231 while (%i >= 0) { dialog -srb sign -1 -1 %i %i var %t 1 while (%t <= 73) inc %t dec %i } dialog -c sign } alias -l sign.tbar { var %i 0 while (%i <= 24) { timer.tbar 1 0 dialog -t sign $left(Email Dialog,%i) var %t 1 while (%t <= 400) inc %t inc %i } } Link to comment Share on other sites More sharing options...
Dan* Posted June 17, 2010 Report Share Posted June 17, 2010 mmm, Well I did test the code out (Without MDX), and it seemed to add a variable called %password <my password> However your code has many issues with here is a copy of some edits I've made, to remove some of the errors ;------------------------------------------------------------------------------------------------------------------------------ ;------------------------------------------------------------------------------------------------------------------------------ ;------------[ Email Dialog ]-------------------------------------------------------------------------------------------------- ;------------------------------------------------------------------------------------------------------------------------------ alias signin dialog -m sign sign alias csign { dll $rebar UnDock center | dialog -x sign sign } alias rebar { return dll/rebar.dll } dialog sign { title "Pass Word Dialog [ /signin ]" size -1 -1 191 73 option dbu icon photos\icon.ico, 0 edit "", 1, 37 15 78 10, return autohs text Email:, 2, 9 16 25 8, center edit "", 3, 37 29 78 10, pass return button "Add", 4, 116 15 19 10, flat button "Delete", 5, 116 29 19 10, flat text Password:, 6, 9 30 28 8, center edit "", 7, 37 43 96 10, read return text Nick:, 8, 9 45 25 8, center box , 12, 5 10 182 47 box , 13, 5 10 134 47 button "Ok / Cancel", 14, 70 59 37 9, ok cancel text "By &Aimz ©2010", 11, 124 62 65 8, center edit "Pass Word Dialog [/PASSW]", 15, 50 4 80 10, center box "", 16, 2 0 188 71 icon 9, -38 -65 291 274, images\back.jpg, 0, noborder icon 10, 141 17 43 37, images\middle.jpg, 0, noborder icon 17, 2 74 187 126, Images\small.jpg, 0, noborder } on *:dialog:sign:init:*: { .timer -m 1 1 sign.an did -ra $dname 3 %password did -ra $dname 1 %email did -ra $dname 7 $buzz.decode($me) .splay mepart.wav | .timer.p 1 1 splay password.wav dll $rebar Dock $dialog($dname).hwnd > center dll $mdx SetMircVersion $version dll $mdx MarkDialog $dname dll $mdx SetFont $dname dll $mdx SetColor $dname dll dll\mdx.dll SetBorderStyle 1,3,2,6,8,2,6,7,8 14 50 Georgia Bold dll dll\mdx.dll SetColor $dname 1,3,2,6,8,2,6,7,8 text $rgb(%list1colour,%list2colour,%list3colour) dll $mdx SetFont $dname 1,3,2,6,8,2,6,7,8 40 Georgia Bold mdx SetFont 1,3,2,6,8,2,6,7,8 +a 12 100 Verdana colorize } on *:dialog:sign:sclick:*:{ if ($did = 4) { $iif($did(1), set %email $did(1)) | $iif($did(3), set %password $md5($did(3))) | .splay Data.wav | .echo $active 0,4Email & Password 0,12Added } if ($did = 5) { .unset %email | .unset %password | .echo $active 0,12Email & Password 0,4Deleted | did -r sign 5 } if ($did = 14) { .splay zip.wav } } alias refresh { did -r sign 5 } alias colorize { var %x 1 :lp dll $mdx SetDialog $dname bgcolor $rgb(155,0,0) dll $mdx SetColor $dname %x background $rgb(155,0,0) dll $mdx SetColor $dname %x text $rgb(255,255,255) dll $mdx SetColor $dname %x textbg $rgb(155,0,0) inc %x if (%x == 100) { goto nd } else { goto lp } :nd } alias sign.an { var %i 0 while (%i <= 191) { dialog -srb sign -1 -1 %i %i var %t 1 while (%t <= 73) inc %t inc %i } .timer -m 1 1 sign.tbar | .splay mepart.wav } alias sign { if ($dialog(sign)) { dialog -c sign sign dialog -mado sign sign } else { dialog -mado sign sign } } alias sign.die { var %i 231 while (%i >= 0) { dialog -srb sign -1 -1 %i %i var %t 1 while (%t <= 73) inc %t dec %i } dialog -c sign } alias -l sign.tbar { var %i 0 while (%i <= 24) { timer.tbar 1 0 dialog -t sign $left(Email Dialog,%i) var %t 1 while (%t <= 400) inc %t inc %i } } Okay, I haven't tested this new edit version But I'll explain some of the fixes I performed.. To my knowledge the /loadbuf command needs a filename specified to allow it to function... the .loadbuf command.. had not been specified a filename to perform correctly, so you would of experienced some "/loadbuf" error.. There were also 2 if ($did = 4) events, Pointless in my eyes... So I removed it to 1... You had a miss match with your brackets... you had 2 dialog sign{ } commands.. You had 2 alias's which performed the same command.. stick to 1 for every function Example: alias sign { dialog -m sign sign } and signin {dialog -m sign sign } But, apart from that try it See what works etc.. As I mentioned at the start, I tested your original code by removing the icons and MDX.. and it worked However my edits are based on just knowledge, and you could be experiencing these problems down the track Unlikely, but your problem may also be not evalutating the $did(3) in the $md5() identifier, but this shouldnt be the case because I tested it without adding $eval() or [ ] brackets to evaluate it before hand Hope this helps Kind Regards, Daniel Link to comment Share on other sites More sharing options...
Guest Travis Posted June 17, 2010 Report Share Posted June 17, 2010 dialog sign { alias sign { dialog -m sign sign } alias csign { dll $rebar UnDock center | dialog -x sign sign } alias rebar { return dll/rebar.dll } dialog sign { title "Pass Word Dialog [ /signin ]" size -1 -1 191 73 This probably isn't helping. 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