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 |