--- a/simtool/grcard2.c	Tue Mar 09 02:01:27 2021 +0000
+++ b/simtool/grcard2.c	Tue Mar 09 02:23:00 2021 +0000
@@ -229,3 +229,18 @@
 	magic_byte |= code;
 	return update_bin_op(2, &magic_byte, 1);
 }
+
+cmd_grcard2_set_ki(argc, argv)
+	char **argv;
+{
+	u_char ki[16];
+	int rc;
+
+	rc = decode_hex_data_from_string(argv[1], ki, 16, 16);
+	if (rc < 0)
+		return(rc);
+	rc = select_ef_weki();
+	if (rc < 0)
+		return(rc);
+	return update_bin_op(3, ki, 16);
+}