تبدیل کد بسکام به کدویزن

[cloner006]

سلام دوستان یه کد ساده دارم می خوام تبدیلش کنم به برنامه نویسی کد ویژن لطفا کمکم کنید.اینم کدش :

کد:

$regfile = "m8def.dat"
$crystal = 8000000
Config Lcd = 16 * 2
Cls
Cursor Off
Home : Lcd "dor meter"
'---------------
Dim I As Long
Dim S As Single
'-----------------
Config Portc.5 = Input
Config Timer1 = Timer , Prescale = 1024
St:
Do
Timer1 = 0
Bitwait Pinc.5 , Set
Start Timer1
Bitwait Pinc.5 , Reset
Do
If Pinc.5 = 1 Then
Stop Timer1
I = Timer1
S = 0.000128 * I
S = S * 60
I = S
" ";Locate 2 , 1 : Lcd "dor" ; I
Wait 1
Goto St
End If
Loop
Loop
End

[aKaReZa75]

داداش سورس و شبیه ساز و پیوست کن برات انجامش بدم :)

[cloner006]

این کلشه ترو خدا کمکم کن چون پروژه ی فوق دیپلمم مونده داره ترمم تموم میشه ممنون

[aKaReZa75]

این اولین برنامه ایه که از ایامی که کنکور میخوانم تا الآن نوشتم .
خیلی حس خوبی داشت :))
اگه اشتباهی داش دیگه خودت درستش کن چون خیلی وقته برنامه ننوشتم ممکنه توش خطا باشه .
موفق باشی.

[cloner006]

سلام ممنون از کمکت اما کلا برنامه ناقصه از adc باید استفاده کنیم اما شما ننوشتی من خیلی با کد ویژن آشنایی ندارم لطف یه نگا دیگه بهش بندازین.

[cloner006]

ببخشید کسی نیست به ما کمک کنه؟؟؟

[cloner006]

اقا خیلی وقته اینو گزاشتم لطفا کمک کنین

[eny.m]

داداش سورس و شبیه ساز و پیوست کن برات انجامش بدم :)

با سلام و خسته نباشید. منم یه پروزه دارم به زبان بیسکام ومیخواستم تبدیل به کد ویژن شه.شما میتونید کمک کنید