Új hozzászólás Aktív témák

• Jester01 veterán

  #314

  #313 Jester01

  2011-05-02 20:45:24

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Jester01

  veterán

  #313 Jester01

  .org 0x30
  ; strstr
  ; IN: R0=haystack, R1=needle (both zero terminated)
  ; OUT: R0=start (points to end of haystack if not found)
  ; DESTROYED: ACC, R2, R3, R4
  
  MOV A, @R1 ; 1st char of needle
  MOV 3, R1 ; save a copy
  INC R1
  MOV 2, R1
  
  loop1:
  MOV A, @R0
  JZ done
  XRL A, R3
  INC R0
  JNZ loop1
  MOV 1, R2 ; needle 2nd char ptr
  MOV 4, R0 ; save haystack
  loop2:
  MOV A, @R0 ; next haystack
  XRL A, @R1 ; next needle
  JNZ mismatch
  MOV A, @R0 ; check for terminator
  INC R0
  INC R1
  JNZ loop2
  MOV 0, R4 ; restore haystack
  DEC R0 ; adjust to 1st char
  done:
  RET
  mismatch:
  MOV 0, R4 ; restore haystack
  AJMP loop1

  Fogalmam sincs működik-e, most nincs kedvem kipróbálni

Új hozzászólás Aktív témák