基於PC的交通訊號燈控制組裝程式

它應該符合您的要求。

但是沒有辦法去機房做實驗。

自己試試吧。

data segment

con equ 38h

data ends

code segment

assume cs:code

go: mov ax,data

mov ds,ax

mov ax,82h

out con+3,ax

mov bx,27h

hh: cmp bx,17h

jae nn

cmp bx,14h

jae sn

cmp bx,04h

jae bb

cmp bx,01h

jae sn

mov bx,27h

jmp hh

nn: mov ax,0a5h

out con,ax

call delay

dec bx

jmp hh

sn: mov ax,00h

out con,ax

call delay

dec bx

jmp hh

bb: mov ax,05ah

out con,ax

call delay

dec bx

jmp hh

delay proc

mov cx,0ffffh

mn: nop

nopnop

noploop mn

retdelay endp

code ends

end go

使用MSCOMM控制向PLC傳送資料（文字框分別控制南北直行紅綠燈、南北彎、東西直線、東西彎的時間） 說明：由於PLC識別VB傳送的ASCII碼，因此這些文字框是PLC計算後識別的ASCII碼。 在這裡使用。

p = val（

CHR（（P-3）10）。

VB 接收 PLC 傳送的資料。

private sub mscomm1 oncomm（）if = comevreceive then if if if a character is received

s1 = 將接收緩衝區中的資料分配給臨時變數"s1"

2）然後'if變數"s1"（接收緩衝區中的資料接收到起始字元“&h1b”和變數。"scoms"則，位元組數大於 2）。

scoms = ""

清除變數"scoms"資料。

否則。

如果 s1 <>chr（&hd） 那麼 if 變數"s1"然後，未收到結束字元“&h0d”。

scoms = scoms&s1

將"s1"中的資料被新增到"scoms"中間。

否則。

資料處理。 end sub

End'用於儲存PLC傳送的資料。

end sub

下部計算機的程式設計。

有圖片，去看看吧。

誰把他送進了郵箱。。

會有成千上萬的人，但不幸的是不是你。

它非常簡單，我建議你看看微控制器中斷，看看屬性。

我知道。 我的空間有它，你可以看看。