Eigene Routine erstellen

[a4b68e]

Hallo.
Ich stehe gerade von einem grossen Problem.
bei mir in Code taucht z.B. sowas auf:



'********senden mit Buffer 0****************************************
Send_buffer0:
Mcp2515_bitmodify2 Txb0ctrl , &B00000011 , &B00000011
Mcp2515_write_register2 Txb0sidh , Idh ' Empfängeradresse setzen
Mcp2515_write_register2 Txb0sidl , Idl ' Empfängeradresse setzen
Mcp2515_write_register2 Txb0dlc , &B00000010
Mcp2515_write_register2 Txb0d0 , &H14 '
Mcp2515_write_register2 Txb0d1 , &H39 '

'nachricht versenden
Reset Css2
Waitus 10
Mcphilf2 = Spi_rts0
Spdr = Mcphilf2
Do
Loop Until Spsr.spif = 1
Waitus 10
Set Css2
Waitms 1000


Wenn ich mehrere Nachrichten verschicken will, dann ich das ziemlich stressig und fast unmöglich das Ganze auszuführen.

Desswegen möchte ich einen "Eigenen Befehl" haben z.B. so ein:
"Sende 2 14 39" (Heisst: senden, 2 Bytes, 13, 39 wäre der Inhalt.)
Damit sollen die Werte beim Code automatisch eingefügt werden (bei Txb0dlc und Txb0d0,1), und der Codeabschnitt ausgeführt werden.

Ich hoffe, ich habe mich verständlich ausgedrückt.

Danke
Gruss Alex

[PicNick]

Vorweg: "eigene Befehle" bei Bascom is nich.
was du anscheinend brauchst aber noch nicht kennst, sind "declare Sub" bzw "declare function".
Type "Help" und guck mal dort.