Subversion Repositories NedoOS

Rev

Rev 975 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log

Rev 975 Rev 1656
Line 486... Line 486...
486
        cp '>'
486
        cp '>'
487
        jr nz,tag_frame0
487
        jr nz,tag_frame0
488
        jp tag_frame_typetagq
488
        jp tag_frame_typetagq
489
 
489
 
490
inithref
490
inithref
491
        display "inithref=",inithref
-
 
492
         ld a,(curlink)
491
         ld a,(curlink)
493
         or a
492
         or a
494
         call nz,savestringbuf2 ;если img внутри a
493
         call nz,savestringbuf2 ;если img внутри a
495
        call initstringbuf2
494
        call initstringbuf2
496
        ;ld a,CLINK
495
        ;ld a,CLINK
Line 875... Line 874...
875
         ;ld a,1
874
         ;ld a,1
876
         ;ld (utf8flag),a ;нельзя, т.к. title после charset
875
         ;ld (utf8flag),a ;нельзя, т.к. title после charset
877
        call prcharvirtual_crlf_stateful ;</title> forces newline
876
        call prcharvirtual_crlf_stateful ;</title> forces newline
878
        xor a ;z
877
        xor a ;z
879
        jp tag_h1
878
        jp tag_h1
880
        display "tag_li ",tag_li
-
 
-
 
879
               
881
tag_li ;list line (no closing tag)? но на msn.com куча <li ><a...>...</a></li>
880
tag_li ;list line (no closing tag)? но на msn.com куча <li ><a...>...</a></li>
882
        push af
881
        push af
883
        call prcharvirtual_crlf_stateful
882
        call prcharvirtual_crlf_stateful
884
        pop af
883
        pop af
885
        jp z,skiprestoftag ;closing
884
        jp z,skiprestoftag ;closing