ايران ويج

با سلام خدمت همه اعضا و اساتید گرامی

من یه ساعت با فونت بزرگ و lcd به زبان بسکام میخام

یه ساعت ساده بدون ای سی ds1307 که دو تا کلید داشته باشه برا تنظیم ساعت و دقیقه.

البته من یه کتابخونه فونت بزرگ خریدم

اساتید گرامی لطف کنید برنامه یه ساعت ساده با این فونت های بزرگ رو

این عکس ساعتی ک میخام:

[تصویر: 03h1_bigfont_main.jpg]

و این فایل اعداد بزرگ با بسکام:

http://uupload.ir/view/pr01_bigfont_lcd.rar/

ممنونم لبخند ملیح − بهینه شده برای ورژن جدید

سلام

یعنی سفارش پروژه هست؟

اگر خیر که لطفا مشکلتون رو مطرح کنید؛ فروم برای حل کردن مشکلات هست قلب عشق - بهینه شده برای ورژن جدید

ا سلام

دوست عزیز ممنون از پاسخ شما

پروژه نیست لبخند ملیح − بهینه شده برای ورژن جدید

من برنامه یه ساعت ساده رو دارم میخام از اون اعداد بزرگ توش استفاده کنم

مشکلم اینه ک بلد نیستم چجوری و با چ دستوری اون اعداد ساعت رو نشون بده عینک افتابی − بهینه شده برای ورژن جدید

ممنون میشم کمکم کنی

اینم سورس ساعت:

کد php: 
$regfile = "m8def.dat"
$crystal = 1000000
Config Pinb.0 = Input
Config Pinb.1 = Input
Config Pinb.2 = Input
Hour Alias Pinb.0 : Mine Alias Pinb.1 : Seco Alias Pinb.2
Config Clock = Soft
Time$ = "02:20:00"
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db7 = Portc.5 , Db6 = Portc.4 , _
 Db5 = Portc.3 , Db4 = Portc.2 , Rs = Portc.0 , E = Portc.1
Cursor Off
Enable Interrupts
Declare Sub A
Declare Sub B
Declare Sub C
Cls
Dim V As Byte
Do
Call A
Call B

Loop
End

Sub A
Home : Lcd "TIME:" ; Time$ ; " "
End Sub

Sub B
If Hour = 0 Then
Incr _hour
If _hour > 23 Then _hour = 0
End If

If Mine = 0 Then
Incr _min
If _min > 59 Then _min = 0
End If

If Seco = 0 Then
Incr _sec
If _sec > 59 Then _sec = 0
End If
 Call C
End Sub

Sub C
For V = 0 To 5
Call A
Next

End Sub 

اساتید گرامی لطف میکنید راهنمایی کنید

رفقا کسی نیستتت؟؟؟؟؟؟؟ تعجب - بهینه شده برای ورژن جدید

sobhan6831

babyy

sobhan6831

sobhan6831

sobhan6831