| 1 | #Modified by FOG, 17.05.2009# |
|---|
| 2 | #type INT for start, stop and insdc added# |
|---|
| 3 | #some changes to fields# |
|---|
| 4 | |
|---|
| 5 | AUTODETECT "LOCUS *\nORIGIN*" |
|---|
| 6 | #Global settings: |
|---|
| 7 | KEYWIDTH 12 |
|---|
| 8 | FILETAG GB |
|---|
| 9 | |
|---|
| 10 | BEGIN "LOCUS*" |
|---|
| 11 | |
|---|
| 12 | MATCH "LOCUS *" |
|---|
| 13 | SRT "* *=*1" |
|---|
| 14 | WRITE "name" |
|---|
| 15 | |
|---|
| 16 | MATCH "LOCUS *" |
|---|
| 17 | SRT "* *=*1" |
|---|
| 18 | WRITE "id" |
|---|
| 19 | |
|---|
| 20 | MATCH "ACCESSION *" |
|---|
| 21 | ACI "extract_words("0123456789",4.0)" |
|---|
| 22 | WRITE "acc" |
|---|
| 23 | |
|---|
| 24 | MATCH "PROJECT" |
|---|
| 25 | WRITE_INT "insdc" |
|---|
| 26 | |
|---|
| 27 | MATCH "LOCUS *" |
|---|
| 28 | SRT " = : = : = : = :* * * * * * *=*7" |
|---|
| 29 | WRITE "date" |
|---|
| 30 | |
|---|
| 31 | MATCH "DEFINITION" |
|---|
| 32 | TAG "GB" |
|---|
| 33 | WRITE "description" |
|---|
| 34 | |
|---|
| 35 | MATCH " ORGANISM *" |
|---|
| 36 | SRT "* * *=*1 *2:*|*=*1" |
|---|
| 37 | WRITE "full_name" |
|---|
| 38 | |
|---|
| 39 | MATCH " ORGANISM *" |
|---|
| 40 | SRT "*|*=*2" |
|---|
| 41 | TAG "GB" |
|---|
| 42 | WRITE "tax_embl" |
|---|
| 43 | |
|---|
| 44 | MATCH " ORGANISM *" |
|---|
| 45 | SRT "* * *=*1 *2:*|*=*1" |
|---|
| 46 | TAG "GB" |
|---|
| 47 | WRITE "tax_embl_name" |
|---|
| 48 | |
|---|
| 49 | MATCH "REFERENCE *(bases*" |
|---|
| 50 | SRT "*(*=*2:bases=:to=-: =:)=" |
|---|
| 51 | APPEND "nuc_rp" |
|---|
| 52 | |
|---|
| 53 | MATCH " PUBMED *" |
|---|
| 54 | APPEND "pubmed_id" |
|---|
| 55 | |
|---|
| 56 | MATCH " AUTHORS *" |
|---|
| 57 | APPEND "author" |
|---|
| 58 | |
|---|
| 59 | MATCH " TITLE *" |
|---|
| 60 | APPEND "title" |
|---|
| 61 | |
|---|
| 62 | MATCH " JOURNAL *" |
|---|
| 63 | APPEND "journal" |
|---|
| 64 | |
|---|
| 65 | MATCH " JOURNAL *Submitted*" |
|---|
| 66 | SRT "*Submitted*=*2:\(*\)*=*1" |
|---|
| 67 | WRITE "submit_date" |
|---|
| 68 | |
|---|
| 69 | MATCH " source*" |
|---|
| 70 | SRT "*source*=*2: =:*|*=*1" |
|---|
| 71 | WRITE "nuc_region" |
|---|
| 72 | |
|---|
| 73 | MATCH "*/clone*" |
|---|
| 74 | SRT "*clone*=*2:\"=:\==:*|*=*1" |
|---|
| 75 | APPEND "clone" |
|---|
| 76 | |
|---|
| 77 | MATCH "*/db_xref="taxon*" |
|---|
| 78 | SRT "*db_xref*=*2:*\:*=*2:\"=:\==:*|*=*1" |
|---|
| 79 | TAG "GB" |
|---|
| 80 | APPEND "tax_xref_embl" |
|---|
| 81 | |
|---|
| 82 | MATCH "*/isolate=*" |
|---|
| 83 | SRT "*isolate*=*2:\"=:\==:*|*=*1" |
|---|
| 84 | APPEND "isolate" |
|---|
| 85 | |
|---|
| 86 | MATCH "*/strain*" |
|---|
| 87 | SRT "*/strain*=*2:\"=:\==:*|*=*1" |
|---|
| 88 | APPEND "strain" |
|---|
| 89 | |
|---|
| 90 | MATCH "*/isolation_source*" |
|---|
| 91 | SRT "*/isolation_source*=*2:\"=:\==:*|*=*1" |
|---|
| 92 | APPEND "isolation_source" |
|---|
| 93 | |
|---|
| 94 | MATCH "*/country*" |
|---|
| 95 | SRT "*/country*=*2:\"=:\==:*|*=*1" |
|---|
| 96 | APPEND "country" |
|---|
| 97 | |
|---|
| 98 | MATCH "*/lat_lon*" |
|---|
| 99 | SRT "*/lat_lon*=*2:\"=:\==:*|*=*1" |
|---|
| 100 | APPEND "lat_lon" |
|---|
| 101 | |
|---|
| 102 | MATCH "*/specimen_voucher*" |
|---|
| 103 | SRT "*/specimen_voucher*=*2:\"=:\==:*|*=*1" |
|---|
| 104 | APPEND "specimen_voucher" |
|---|
| 105 | |
|---|
| 106 | MATCH "*/specific_host*" |
|---|
| 107 | SRT "*/specific_host*=*2:\"=:\==:*|*=*1" |
|---|
| 108 | APPEND "specific_host" |
|---|
| 109 | |
|---|
| 110 | MATCH "*/collected_by*" |
|---|
| 111 | SRT "*/collected_by*=*2:\"=:\==:*|*=*1" |
|---|
| 112 | APPEND "collected_by" |
|---|
| 113 | |
|---|
| 114 | MATCH "*/collection_date*" |
|---|
| 115 | SRT "*/collection_date*=*2:\"=:\==:*|*=*1" |
|---|
| 116 | APPEND "collection_date" |
|---|
| 117 | |
|---|
| 118 | MATCH " rRNA*" |
|---|
| 119 | SRT "*..*=*1:<=:>=" |
|---|
| 120 | WRITE_INT "start" |
|---|
| 121 | |
|---|
| 122 | MATCH " rRNA *" |
|---|
| 123 | SRT "*..*=*2:<=:>=:*|*=*1" |
|---|
| 124 | WRITE_INT "stop" |
|---|
| 125 | |
|---|
| 126 | MATCH " rRNA*/gene*" |
|---|
| 127 | SRT "*gene*=*2:\==:"=:*|*=*1" |
|---|
| 128 | APPEND "gene" |
|---|
| 129 | |
|---|
| 130 | MATCH " rRNA*/product*" |
|---|
| 131 | SRT "*product*=*2:\==:"=:*|*=*1" |
|---|
| 132 | APPEND "product" |
|---|
| 133 | |
|---|
| 134 | SEQUENCEAFTER "ORIGIN*" |
|---|
| 135 | SEQUENCESRT " =:~=.:*Check*..=" |
|---|
| 136 | SEQUENCEACI "remove("0123456789 /")" |
|---|
| 137 | SEQUENCECOLUMN 0 |
|---|
| 138 | SEQUENCEEND "//" |
|---|
| 139 | CREATE_ACC_FROM_SEQUENCE |
|---|
| 140 | |
|---|
| 141 | END "//" |
|---|