Ledmodul med 18 st led, hur koppla inviduell strömbegr.?

[sodjan]

Testa först, om det inte fungrar (vad det nu betyder), fråga då.
Lite bortkastat att sitta och kolla på kod som kanske är OK (det
går i alla fall inte att avgöra eftersom det inte framgår vad du
*vill* att den ska göra).

[whynot]

För att det ska var en fyrkantvåg lika lång 1 och 0 den ska snurra i evighet eller tills jag stänger av den.
Det här kör ut en signal på utgång 1 3 ggr/loop
Har lycckats skriva in programet och när jag klickar på RUN högst upp och sedan på Make Exe file så kommer det upp END SUB or END FUNKTION must be last line in Windows

[whynot]

Någon som ser om det fattas någon rad eller rader för göra en EXE fil av det. Delay bestämmer hur lång utsignalen är 1 och Delay2 bestämmer hur lång signalen är 0

[danielr112]

Detta har inte med ditt fel att göra men hänvisar fortsfarande till att du bara behöver en delay-funktion då de är identiska.

Ang ditt fel så kanske: http://en.wikipedia.org/wiki/BASIC kan hjälpa? Där finns lite exempel med end class o.s.v med.

[sodjan]

> ...så kommer det upp END SUB or END FUNKTION must be last line in Windows

Jaha !? Och om du fixar så att det blir så då ?
(Lägg subbarna sist i koden...)

[whynot]

Du menar att jag ska använda samma DELAY på båda ställena?
så här:
OUT &H378, 1 : DELAY:OUT &H378,0:DELAY
Kan hålla med om det eftersom jag ska ha dom lika.
Har sett hur många sidor som helst nu men ser inte vad som gör att det inte fungerar men snart så kanske,,,
Ska se hur jag får SUBarna sist som Sodjan säger.
Eller menar Du att jag ska börja programmet med Do --- LOOP och sedan SUB DELAY och FOR A till END SUB

[sodjan]

> Ska se hur jag får SUBarna sist som Sodjan säger.

Ja, jag vet inte om BASIC'en har något speciellt krav på att
en SUB måste ligga föra CALL i koden. Man annars, vad menar
du skulle vara problemet med ett flytta SUB'arna ??

Jag menade bara att du kopierar ner koden sist. Eller går inte det ?

[whynot]

Så här menar Du.
DO
OUT &H378, 1 : DELAY:OUT &H378,0:Delay
OUT &H378, 0 : DELAY:OUT &H378,0:Delay
OUT &H378, 0 : DELAY:OUT &H378,0:Delay
OUT &H378, 1 : DELAY:OUT &H378,0:Delay
OUT &H378, 0 : DELAY:OUT &H378,0:Delay
OUT &H378, 0 : DELAY:OUT &H378,0:Delay
OUT &H378, 1 : DELAY:OUT &H378,0:Delay
OUT &H378, 0 : DELAY:OUT &H378,0:Delay
OUT &H378, 0 : DELAY:OUT &H378,0:Delay
OUT &H378, 0 : DELAY:OUT &H378,0:Delay

LOOP
sub DELAY
FOR A=0 to 30
NEXT A
END SUB


Ska prova så här,,,, men det blev bara ett annat fel då.

Programmet ska snurra i evighet om jag vill.

är ju ett så litet program så konstigt om det inte ska gå få att fungera ingen som gar WIN 98 och QB och kan skriva in det om man tar bort 9 utgångsrader så blir det bara 7 rader långt kanske.

[sodjan]

> men det blev bara ett annat fel då.

Och du har inte en aning om vilket fel det blev. Märkligt...

[whynot]

Sorry,, det blev att " statemen cannot precede SUB funktion"
Han som gjort programmet PMade nyss och säger att det är riktigt men jag gör väl något fel.

[perra_e]

Det är nästan riktigt
Det saknas ett slut på huvudprogrammet, innan subrutinerna börjar.

Annars finns det gott om QBASIC tutorials på nätet.
Här är en http://www.geocities.com/SiliconValley/ ... basic.html
Den borde räcka som hjälp.

[whynot]

Skulle det stått END LOOP?
Spelar det någon roll om subarna kommer före eller efter?
Har provat ett litet program på 3 rader att skriva ett namn och det gick att spara och göra EXE fil så datorn fungerar med QB

[E85]

Nej END på raden under LOOP:

ex.
LOOP
END



Varför inte kolla igenom länkarna som postas?

[whynot]

Läser alla länkar men att se allt är inte så lätt. Men om någon nu kan rätta det som är fel här så vore det snällt kortar der det lite fast samma funktion. Det jag vill är att det ska gå att spara och göra en EXE fil.
Rätta på den här bilden det som är fel så blir jag glad fattas det något så lägg till det. Stora eller små bokstäver , mellanslag, punker , komman, allt

DECLARE SUB DELAY ()
Sub DELAY
FOR A=0 to 30
NEXT A
END SUB

DO
OUT &H378, 1 : DELAY:OUT &H378,0:DELAY
OUT &H378, 0 : DELAY:OUT &H378,0:DELAY
OUT &H378, 0 : DELAY:OUT &H378,0:DELAY
OUT &H378, 1 : DELAY:OUT &H378,0:DELAY
OUT &H378, 0 : DELAY:OUT &H378,0:DELAY
OUT &H378, 0 : DELAY:OUT &H378,0:DELAY
OUT &H378, 1 : DELAY:OUT &H378,0:DELAY
OUT &H378, 0 : DELAY:OUT &H378,0:DELAY
OUT &H378, 0 : DELAY:OUT &H378,0:DELAY
OUT &H378, 0 : DELAY:OUT &H378,0:DELAY

LOOP
END

[E85]

Har du provat den koden? Felmeddelande?