acil yardım lütfen arkdaslar

sezar61

Üye
Katılım
18 Ocak 2013
Mesajlar
2
Puanları
1
Yaş
32
RISA=%00110000
TRISB=%00000000
PORTB=0
PORTA=0
cmcon=7
a VAR BYTE
x var byte


ANIM1:
FOR a=1 TO 2
PORTB=%00000001:gosub hiz
PORTB=%00000011:gosub hiz
PORTB=%00000111:gosub hiz
PORTB=%00001111:gosub hiz
PORTB=%00011111:gosub hiz
PORTB=%00111111:gosub hiz
PORTB=%01111111:gosub hiz
PORTB=%11111111:gosub hiz
PORTA=%00000001:gosub hiz
PORTA=%00000011:gosub hiz
PORTA=%00000111:gosub hiz
PORTA=%00001111:gosub hiz
PORTA=%01001111:gosub hiz
PORTA=%11001111:gosub hiz
PORTA=%01001111:gosub hiz
PORTA=%00001111:gosub hiz
PORTA=%00000111:gosub hiz
PORTA=%00000011:gosub hiz
PORTA=%00000001:gosub hiz
PORTA=%00000000:gosub hiz
PORTB=%01111111:gosub hiz
PORTB=%00111111:gosub hiz
PORTB=%00011111:gosub hiz
PORTB=%00001111:gosub hiz
PORTB=%00000111:gosub hiz
PORTB=%00000011:gosub hiz
PORTB=%00000001:gosub hiz
PORTB=%00000000:gosub hiz
NEXT a
ANIM2:
FOR a=1 TO 3
PORTB=%00000001:gosub hiz
PORTB=%00000011:gosub hiz
PORTB=%00000111:gosub hiz
PORTB=%00001111:gosub hiz
PORTB=%00011111:gosub hiz
PORTB=%00111111:gosub hiz
PORTB=%01111111:gosub hiz
PORTB=%11111111:gosub hiz
PORTA=%00000001:gosub hiz
PORTA=%00000011:gosub hiz
PORTA=%00000111:gosub hiz
PORTA=%00001111:gosub hiz
PORTA=%01001111:gosub hiz
PORTA=%11001111:gosub hiz
PORTA=%00000000:pORTB=%00000000:gosub hiz
NEXT a
ANIM3:
FOR a=1 TO 4
PORTB=%11111111:pORTA=%11001111:gosub hiz
PORTB=%00000000:pORTA=%00000000:gosub hiz
NEXT a
ANIM4:
FOR a=1 TO 3
PORTB=%00000000:gosub hiz
PORTB=%00000001:gosub hiz
PORTB=%00000010:gosub hiz
PORTB=%00000100:gosub hiz
PORTB=%00001000:gosub hiz
PORTB=%00010000:gosub hiz
PORTB=%00100000:gosub hiz
PORTB=%01000000:gosub hiz
PORTB=%10000000:gosub hiz
PORTB=%00000000:pORTA=%00000001:gosub hiz
PORTA=%00000010:gosub hiz
PORTA=%00000100:gosub hiz
PORTA=%00001000:gosub hiz
PORTA=%01000000:gosub hiz
PORTA=%10000000:gosub hiz
PORTA=%00000000:gosub hiz
NEXT a
ANIM5:
FOR a=1 TO 2
PORTB=%00000001:gosub hiz
PORTB=%00000011:gosub hiz
PORTB=%00000110:gosub hiz
PORTB=%00001101:gosub hiz
PORTB=%00011011:gosub hiz
PORTB=%00110110:gosub hiz
PORTB=%01101101:gosub hiz
PORTB=%11011011:gosub hiz
PORTB=%10110110:pORTA=%00000001:gosub hiz
PORTB=%01101100:pORTA=%00000011:gosub hiz
PORTB=%11011000:pORTA=%00000110:gosub hiz
PORTB=%10110000:pORTA=%00001101:gosub hiz
PORTB=%01100000:pORTA=%01001011:gosub hiz
PORTB=%11000000:pORTA=%11000110:gosub hiz
PORTB=%10000000:pORTA=%10001101:gosub hiz
PORTB=%00000000:pORTA=%01001011:gosub hiz
PORTA=%11000110:gosub hiz
PORTA=%10001100:gosub hiz
PORTA=%01001000:gosub hiz
PORTA=%11000000:gosub hiz
PORTA=%10000000:gosub hiz
PORTA=%00000000:gosub hiz
NEXT a
ANIM6:
FOR a=1 TO 2
PORTB=%00000001:gosub hiz
PORTB=%00000011:gosub hiz
PORTB=%00000111:gosub hiz
PORTB=%00001111:gosub hiz
PORTB=%00011111:gosub hiz
PORTB=%00111111:gosub hiz
PORTB=%01111111:gosub hiz
PORTB=%11111111:gosub hiz
PORTA=%00000001:gosub hiz
PORTA=%00000011:gosub hiz
PORTA=%00000111:gosub hiz
PORTA=%00001111:gosub hiz
PORTA=%01001111:gosub hiz
PORTA=%11001111:gosub hiz
PORTB=%00000000:pORTA=%00000000:gosub hiz
PORTB=%11111111:pORTA=%11001111:gosub hiz
PORTB=%00000000:pORTA=%00000000:gosub hiz
PORTB=%11111111:pORTA=%11001111:gosub hiz
PORTB=%00000000:pORTA=%00000000:gosub hiz
PORTB=%11111111:pORTA=%11001111:gosub hiz
PORTB=%00000000:pORTA=%00000000:gosub hiz
NEXT a
ANIM7:
FOR a=1 TO 2
PORTB=%00000001:gosub hiz
PORTB=%00000011:gosub hiz
PORTB=%00000111:gosub hiz
PORTB=%00001111:gosub hiz
PORTB=%00011111:gosub hiz
PORTB=%00111111:gosub hiz
PORTB=%01111111:gosub hiz
PORTB=%11111111:gosub hiz
PORTA=%00000001:gosub hiz
PORTA=%00000011:gosub hiz
PORTA=%00000111:gosub hiz
PORTA=%00001111:gosub hiz
PORTA=%01001111:gosub hiz
PORTA=%11001111:gosub hiz
PORTA=%00000000:pORTB=%00000000:gosub hiz
PORTB=%11111111:pORTA=%11001111:gosub hiz
PORTB=%00000000:pORTA=%00000000:gosub hiz
PORTB=%11111111:pORTA=%11001111:gosub hiz
PORTB=%00000000:pORTA=%00000000:gosub hiz
PORTB=%11111111:pORTA=%11001111:gosub hiz
PORTB=%00000000:pORTA=%00000000:gosub hiz
PORTB=%11111111:pORTA=%11001111:gosub hiz
PORTA=%01001111:gosub hiz
PORTA=%00001111:gosub hiz
PORTA=%00000111:gosub hiz
PORTA=%00000011:gosub hiz
PORTA=%00000001:gosub hiz
PORTA=%00000000:gosub hiz
PORTB=%01111111:gosub hiz
PORTB=%00111111:gosub hiz
PORTB=%00011111:gosub hiz
PORTB=%00001111:gosub hiz
PORTB=%00000111:gosub hiz
PORTB=%00000011:gosub hiz
PORTB=%00000001:gosub hiz
PORTB=%00000000:gosub hiz
NEXT a
ANIM8:
FOR a=1 TO 2
PORTB=%00000001:gosub hiz
PORTB=%00000010:gosub hiz
PORTB=%00000101:gosub hiz
PORTB=%00001010:gosub hiz
PORTB=%00010101:gosub hiz
PORTB=%00101010:gosub hiz
PORTB=%01010101:gosub hiz
PORTB=%10101010:gosub hiz
PORTB=%01010101:pORTA=%00000001:gosub hiz
PORTB=%10101010:pORTA=%00000010:gosub hiz
PORTB=%01010101:pORTA=%00000101:gosub hiz
PORTB=%10101010:pORTA=%00001010:gosub hiz
PORTB=%01010100:pORTA=%01000101:gosub hiz
PORTB=%10101000:pORTA=%10001010:gosub hiz
PORTB=%01010000:pORTA=%01000101:gosub hiz
PORTB=%10100000:pORTA=%10001010:gosub hiz
PORTB=%01000000:pORTA=%01000101:gosub hiz
PORTB=%10000000:pORTA=%10001010:gosub hiz
PORTB=%00000000:pORTA=%01000101:gosub hiz
PORTA=%10001010:gosub hiz
PORTA=%01000100:gosub hiz
PORTA=%10001000:gosub hiz
PORTA=%01000000:gosub hiz
PORTA=%10000000:gosub hiz
PORTA=%00000000:gosub hiz
NEXT a
GOto ANIM1
hiz:
for x=0 to 2
pause 30
next x
return




bu dil hangi dil oluyor ve hangi programla yazabilirim bu dili lütfen acil yardım edin...:confused:
 
pıc basıc pro ile yazılabilir bu pıc proglamada kullanılan dil bu ve bu dili sadece pıc basıc proda kullana bilirsin komutlardan anlaşılıyo zaten farklı programlarda yazmak istersen komutlar değişiyo senin işine yarayan şuan pıc basıc bro
 

Forum istatistikleri

Konular
130,068
Mesajlar
932,724
Kullanıcılar
453,055
Son üye
TroubledChild655

Yeni konular

Geri
Üst