[dialog d_bank_pin]

100,50

resizepic 190 175 83 335 150

resizepic 197 184 3000 323 132

resizepic 220 235 2620 270 26



htmlgump 220 200 200 20 0 0 0		

htmlgump 255 277 100 20 1 0 0		

button 220 275 4006 4007 1 0 1		

htmlgump 435 277 100 20 2 0 0		

button 400 275 4018 4019 1 0 0		

textentry 225 237 253 25 0 0 3		



[dialog d_bank_pin TEXT]

Pin Kodunuzu Giriniz.

Tamam

Vazgec

<src.tag.temppin>



[dialog d_bank_pin BUTTON]

On=0



if (<eval <src.tag.pinchange>> == 1)

	src.tag.pinchange 0

endif



if (<eval <src.tag.spin>> == 1)

	src.tag.spin 0

endif



On=1



if (<eval <src.tag.spin>> ==1)

	if strmatch("<eval <src.tag.pin>>","<eval <argtxt[0]>>")

		src.tag.spin=0

		src.tag.spin1 1			// bi kere yazdimi pin i okedir.

		return 1

	endif

src.tag.spin=0

endif

	



if (<eval <src.tag.pinchange>> == 1)

	if strmatch("<eval <src.tag.pin>>","<eval <argtxt[0]>>")

		src.tag.pinchange=0

		src.pingiris

		src.tag.pin=0

		src.smg Yeni Pin Giriniz.

		src.tag.bank 0			// Sonra Banka acilmasin.

		src.tag.spin1 0

		src.tag.help 0

		src.tag.sifrepin 0

		return 1

	endif

endif



if ((strlen(<argtxt[0]>)) > 4)

	src.sms Pin numaraniz 4 haneden fazla olamaz

	src.dialog d_bank_pin

	return 1

endif



If <eval <src.tag.pin>>==0

	src.tag.pin <argtxt[0]>

	src.smg Sifreniz girdiginiz rakamlar dahilinde olusturuldu.

else

	If strmatch("<eval <src.tag.pin>>","<eval <argtxt[0]>>")

		src.tag.bank 01			// bank pin de 1 kere.

		src.tag.help 01

		src.tag.sifrepin 01

		src.smy Pin Kabul Edildi.

	else

		src.sms Pin Yanlis !

	endif

endif



[function pin]



if (<eval <src.tag.pin>> == 0)

	src.sms Bir pin kodunuz yok.

	src.sms Girdiginiz RAKAMLAR pin kodunuzu olusturacak.

	src.pingiris

	return 1

else

	src.smg Pin Kodunuz Bulunmakta Degistirmek icin yardim menusu kullanin

endif





[function pingiris]

dialog d_bank_pin



[function pindegis]

if (<eval <src.tag.pin>> == 0)

	src.smg Pin Kodunuz Bulunmamakta.

	src.smg Girdiginiz rakamlar pin kodunuzu olusturacak.

	src.smg Aldiginiz pinde harfler olursa pin otomatik olarak kendini siler.

	src.pingiris

	return 1

else

	src.tag.pinchange=1

	src.pingiris

	src.smg Eski Pin ?

endif



[function pincleaner]		// Logout yapinca hatirlamaz.



src.tag.bank 0

src.tag.help 0

src.tag.spin1 0

src.tag.sifrepin 0









[plevel 7]

pindegis

Değerlendirmeler

0

Total votes: 0