بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
هذا البرنامج بلغة vb6
أريد التحكم في 4 ليدات بال control register
فهل يمكنكم ترجمة هذا البرنامج مع العلم أن كل led موصولة كما يلي
cathode----Gnd
anode----pin of control register
L1----->/strobe
L2----->/Autofeed
L3----->/Init
L4----->/Select
--------------------------------------------
port=&h37A
out port,1
delay(1s)
out port,2
delay(1s)
out port,4
delay(1s)
out port,8
delay(1s
)