Login Dialog

This dialog show by command 12006 described in termcap.
CRT CHAR(027):CHAR(224):CHAR(038):LDFlag"r%5":CHAR(10)

Where LDFlag is:

1 - Enable empty password
2 - Close terminal
4 - 30 sec timelife
8 - 120 sec timelife
16 - Don't reset the timer by keyboard
32 - Don't show progress
64 - Don't send empty password
128 - Account Name
256 - Account Name & Account Password
512 - Only three try on 3*30(120/150) seconds
1024 - Remember user/account IDs on PC
2048 - Remember user/account password on PC

You can change logon prompt for display of this dialog (D3).

*************************
TCLREAD TclLine
tmppos=INDEX(TclLine," ",1)
IF tmppos>0 AND LEN(TclLine)>tmppos+3 THEN
	GUIstr=""
	IF TclLine[tmppos+1,3]="GUI" THEN 
		CRT "Input dialog flags: ":
		flg=""
		INPUT flg
		IF TRIM(flg)="" OR NOT(num(flg)) THEN flg=2+4+16+64+512
		tmppos+=4;GUIstr=CHAR(027):CHAR(224):CHAR(038):flg"r%5":CHAR(10)
	END 
	OPEN "MDS" TO FV THEN
		READ tmps FROM FV,"LOGON" THEN
			tmps<6>=tmps<6>[1,1]:GUIstr:TclLine[tmppos+1,LEN(TclLine)-tmppos]:tmps<6>[LEN(tmps<6>),1]
			WRITE tmps ON FV,"LOGON"
		END ELSE
			CRT "Can't read LOGON from MDS"
		END
	END ELSE
		CRT "Can't open MDS"
	END
END ELSE
	CRT "Format GPTERM.SetLogonString [GUI ]Login_Promt"
END
END
*************************

You can show Login dialog through CommandLine option -LOGINDLG=xxx where xxx is LDFlag.