omvandla basic till något snabbare?
omvandla basic till något snabbare?
håller på att leka med en AD omvandlare kopplad till ett I/O kort som jag hadde liggandes, efter sju sorger och åtta
bedrövelser så verkar jag få det att fungera, kommer upp i en samplinghastighet av lite över 1 khz, AD'en klarar mycket mera än detta
fundera om det finns något smidigt sätt att få upp hastigheten på det hela
anledningen till att jag ännvänder qbasic är att det är det jag klara någurlunda och att när man håller på och mäter med datorn
ofta vill ändra i programmet för att anpassa det till det man håller på med för tillfället
såg att man kunde köra dosprogram inne i basicen, kanske man kunde göra en liten annat program som gör en sampel snabbare
och köra resten i qbasic
alla allternativ och funderingar uppskattas
sampelsnutten i qbasic ser ut så här
out 770,0 'sampel
out 770,96 'hold
out 770,0 'convert
out 770,224 'vila
out 770,192 'välj AD nr 1
let d=inp(768) 'läs låg byte
let e=inp(769) 'läs hög byte
out 770,224 'paus till byte AD
out 770,160 'välj AD nr 2
let f=inp(768) 'läs låg byte
let g=inp(769) 'läs hög byte
out 770,224 'avsluta i 0 läge
write #1,d,e,f,g 'skriv till fil
och tillbaka till att börja nästa sampel
'stavade som en kratta och rättade till rubriken
bedrövelser så verkar jag få det att fungera, kommer upp i en samplinghastighet av lite över 1 khz, AD'en klarar mycket mera än detta
fundera om det finns något smidigt sätt att få upp hastigheten på det hela
anledningen till att jag ännvänder qbasic är att det är det jag klara någurlunda och att när man håller på och mäter med datorn
ofta vill ändra i programmet för att anpassa det till det man håller på med för tillfället
såg att man kunde köra dosprogram inne i basicen, kanske man kunde göra en liten annat program som gör en sampel snabbare
och köra resten i qbasic
alla allternativ och funderingar uppskattas
sampelsnutten i qbasic ser ut så här
out 770,0 'sampel
out 770,96 'hold
out 770,0 'convert
out 770,224 'vila
out 770,192 'välj AD nr 1
let d=inp(768) 'läs låg byte
let e=inp(769) 'läs hög byte
out 770,224 'paus till byte AD
out 770,160 'välj AD nr 2
let f=inp(768) 'läs låg byte
let g=inp(769) 'läs hög byte
out 770,224 'avsluta i 0 läge
write #1,d,e,f,g 'skriv till fil
och tillbaka till att börja nästa sampel
'stavade som en kratta och rättade till rubriken
Senast redigerad av grym 1 augusti 2005, 10:07:56, redigerad totalt 1 gång.
1Khz låter nog som vad man kan nå med direkt styrning från PC'n, speciellt med interpreterad qbasic.
Jag skulle sätta dit en processor (en PIC i mitt fall) mellan ADC'n och I/O kortet, och låta den köra snabba "burst" med omvandlingar som sedan läses över till qbasic programmet.
Hur snabba samples behöver du ?
Och hur många under hur lång tid ?
Jag skulle sätta dit en processor (en PIC i mitt fall) mellan ADC'n och I/O kortet, och låta den köra snabba "burst" med omvandlingar som sedan läses över till qbasic programmet.
Hur snabba samples behöver du ?
Och hur många under hur lång tid ?
ska jag krångla till det med mera elektronik så gör jag en helt separat logger av det hela med två AD, en bunta digitala kanaler , statiskt ram, en riktig hårdvarustyrd sync och sedan optokopplar det till datorn, mera tid och jag kör igång med det
skulle vara kul att få upp det till kanske 10,000 sampels per sekund,
filstorlek upp till hur mycket som får plats på hårddisken, dock så vet jag att dom flesta saker bara kräver en 32>64k minne
som sagt, AD'en är generell och jag vill oftast ha den till olika saker
nu kör jag mest med en multimeter kopplad till serieporten
lätt att logga och bra upplösning, men bara en kanal och max 2 sampels sekund
skulle vara kul att få upp det till kanske 10,000 sampels per sekund,
filstorlek upp till hur mycket som får plats på hårddisken, dock så vet jag att dom flesta saker bara kräver en 32>64k minne
som sagt, AD'en är generell och jag vill oftast ha den till olika saker
nu kör jag mest med en multimeter kopplad till serieporten
lätt att logga och bra upplösning, men bara en kanal och max 2 sampels sekund
där sa du något
kör av gammal vana qb4,5 som jag faktiskt köpte för många år sedan
, i och för sig så blir det nästan samma hastighet om man gör ett självständigt körbart program med den
några allternativa basicvarianter som man skulle kunna prova?
för många år sedan fanns det någonslags översättare från basic till c, kollade på det men det var mycket strul om jag inte mins helt fel, kanske skulle funka på sådanna här små programsnuttar
någon som kommer ihåg vad programmet hette?
kör av gammal vana qb4,5 som jag faktiskt köpte för många år sedan
, i och för sig så blir det nästan samma hastighet om man gör ett självständigt körbart program med den
några allternativa basicvarianter som man skulle kunna prova?
för många år sedan fanns det någonslags översättare från basic till c, kollade på det men det var mycket strul om jag inte mins helt fel, kanske skulle funka på sådanna här små programsnuttar
någon som kommer ihåg vad programmet hette?
Eller varför inte MinGW: http://www.mingw.org/
Eller för GUI-tokar: http://visual-mingw.sourceforge.net/
Mvh
speakman
Eller för GUI-tokar: http://visual-mingw.sourceforge.net/
Mvh
speakman