diff --git a/config b/config
index cc5e90e..3234b28 100644
--- a/config
+++ b/config
@@ -233,3 +233,11 @@ usehamdb=0
 # Values 0/1. Default is on (1).
 
 cursoron=1
+
+# (O) qrzuser: QRZ.com user name (typically your callsign)
+
+qrzuser=
+
+# (O) qrzpass: QRZ.com password (NOT your API key)
+
+qrzpass=
diff --git a/yfk b/yfk
index bc104ee..9752590 100755
--- a/yfk
+++ b/yfk
@@ -65,7 +65,7 @@ my $dpwr ="100";        # life is too long for QRO
 my $dqsls="Q";            # default QSL sent: Q = put in queue
 my $dqslr="N";            # default QSL recvd: N - No
 my $workcall = "";        # The station we are currently working
-my $status=15;            # status: 1: Logging 2: menu  3: QSL mode 15: setup
+my $status=16;            # status: 1: Logging 2: menu  3: QSL mode 15: setup
 my @wi;                    # contains the windows inside the input-window
                         # 0 Callsign, 1  Date, 2 time on, 3 time off
                         # 4 QRG, 5 Mode, 6 QTH, 7 Name, 8 QSL-TX, 9 QSL-RX
@@ -2451,17 +2451,19 @@ while ($status == 16) {
             &changeconfig($original, "cursoron=$ret");
         }
     }
-    elsif ($choice == 40) { 
+    elsif ($choice == 40) {
         $original = "qrzuser=$yfksubs::qrzuser";
-        my $ret = &askbox(10,5,4,70, '[01]', "QRZ.com user name", $yfksubs::qrzuser);
+        my $ret = &askbox(10,20,4,30, '\w', "QRZ.com user name",
+                $yfksubs::qrzuser);
         if ($ret eq 'm') { last }
         elsif ($ret ne '') {
             &changeconfig($original, "qrzuser=$ret");
         }
     }
-    elsif ($choice == 41) { 
+    elsif ($choice == 41) {
         $original = "qrzpass=$yfksubs::qrzpass";
-        my $ret = &askbox(10,5,4,70, '[01]', "QRZ.com password (NOT the API key)", $yfksubs::qrzpass);
+        my $ret = &askbox(10,20,4,30, '\w', "QRZ.com password",
+                $yfksubs::qrzpass);
         if ($ret eq 'm') { last }
         elsif ($ret ne '') {
             &changeconfig($original, "qrzpass=$ret");