need help in this

;Remote

on *:text:*:#: { 
 if ($$ial($nick $+ *,1).addr == $gettok($read(text\passprotect.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * ),1,32)) && ($1 == $gettok($read(text\passprotect.txt),3,32)) { privmsg $nick Hello $nick ur password plz?!! | /closemsg $nick }
}
on *:text:*:?: { 
 if ($$ial($nick $+ *,1).addr != $gettok($read(text\passprotect.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * ),1,32)) { privmsg $nick Hey $nick i am script of (A) Malak-7ares (A) plz talk to him thnx..:) | /closemsg $nick }
 if ($$ial($nick $+ *,1).addr == $gettok($read(text\passprotect.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * ),1,32)) && ($1 != $gettok($read(text\passprotect.txt),4-,32)) { privmsg $nick (*) sorry wrong pass plz correct ur pass (*) | /closemsg $nick }
 if ($$ial($nick $+ *,1).addr == $gettok($read(text\passprotect.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * ),1,32)) && ($1 == $gettok($read(text\passprotect.txt),4-,32)) { privmsg $nick (*) congratulations u got it thnx...'ve a nice time (*) | mode $comchan($nick,1) +o $nick | /closemsg $nick }
}

;and this for add in popup

Host List
.Add:{ /set %hostmessage $$?="host Message?" | /set %pass $$?="pass Message?" | write text\passprotect.txt $$ial($$1 $+ *,1).addr $$1 %hostmessage %pass | echo $active $$1 have been added to host List. }

so i tried as i can to do it and its working but there are some mistakes i cant know it so need help if there is any one have a good idea or can help me in it

and the remove from nick list doesnt work 2

on *:text:*:#: {
  var %x = $read(text\passprotect.txt, w,* $+ $ial($nick).addr $+ *)
  if ($1 == $gettok(%x,3,32)) { privmsg $nick Hello $nick ur password plz?!! | closemsg $nick }
}
on *:text:*:?: {
  var %x = $read(text\passprotect.txt, w,* $+ $ial($nick).addr $+ *)
  if (!%x) { privmsg $nick Hey $nick i am script of (A) Malak-7ares (A) plz talk to him thnx..:) | closemsg $nick }
  else {
    if ($1 != $gettok(%x,4-,32)) { privmsg $nick (*) sorry wrong pass plz correct ur pass (*) | closemsg $nick }
    else { privmsg $nick (*) congratulations u got it thnx...'ve a nice time (*) | mode $comchan($nick,1) +o $nick | closemsg $nick }
  }
}
Host List
.Add:{ var %xy_h, %xy_p | %xy_h = $$?="host Message?" | %xy_p $$?="pass Message?" | write text\passprotect.txt $ial($1).addr $1 %xy_h %xy_p | echo $active $$1 have been added to host List with Msg : %xy_h ----- pass : %xy_p . }

try this code ya malak

thnx xy-code for ur replys u can find that full one in the archive has been posted from along time there hope will help