On 12/06/2018, at 11:30, m.osti <mk0...@gmail.com <mailto:mk0...@gmail.com>>
wrote:
> of course, this way the result is even cleaner and easier then to use
Hey Marco,
Here's an updated script that produces cleaner output.
>From here I would probably turn the output into tab-delimited single lines.
Because from there it's easy to write a macro to extract the data and insert it
into your web page one line at a time.
--
Best Regards,
Chris
----------------------------------------------------------------
# Auth: Christopher Stone
# dCre: 2018/12/04 16:04
# dMod: 2018/12/06 13:37
# Appl: BBEdit
# Task: Extract Cash Register Info.
# Libs: None
# Osax: None
# Tags: @Applescript, @Script, @BBEdit, @Extract, @Cash, @Register, @Info,
@BBEdit-Talk
# Vers: 1.01
----------------------------------------------------------------
set AppleScript's text item delimiters to ""
tell application "BBEdit"
tell front text window's text
replace "^\\h+EURO\\h*\\n" using "" options {search mode:grep, case
sensitive:false, starting at top:true}
replace "^\\h+$" using "" options {search mode:grep, case
sensitive:false, starting at top:true}
replace "\\n{2,}" using "\\n" options {search mode:grep, case
sensitive:false, starting at top:true}
replace "^N\\.SCONTR\\.FISCALE.*" using "&\\n" options {search
mode:grep, case sensitive:false, starting at top:true}
replace "\\A\\s+|\\s+\\Z" using "" options {search mode:grep, case
sensitive:false, starting at top:true}
set docText to its text
set AppleScript's text item delimiters to linefeed & linefeed
set recordList to text items of docText
repeat with i in recordList
if contents of i does not contain "C.F." then
set contents of i to missing value
end if
end repeat
set recordList to (text of recordList) as text
set its text to recordList
replace "^(?>(?:(?!(?:t_fiscale|C\\.F\\.|\\d{2}-\\d{2}-\\d{4}|TOTALE
EURO)).)*)$\\R?" using "" options {search mode:grep, case sensitive:false,
starting at top:true}
replace "^t_fiscale" using "\\n&" options {search mode:grep, case
sensitive:false, starting at top:true}
replace "\\A\\s+|\\s+\\Z" using "" options {search mode:grep, case
sensitive:false, starting at top:true}
replace "^t_fiscale \\d{8} \\d{4} *" using "" options {search
mode:grep, case sensitive:false, starting at top:true}
replace "^TOTALE EURO\\h+" using "" options {search mode:grep, case
sensitive:false, starting at top:true}
replace "C\\.F\\.\\h*" using "" options {search mode:grep, case
sensitive:false, starting at top:true}
replace "^(\\d{2}-\\d{2}-\\d{4})\\h+\\d{2}:\\d{2}" using "\\1" options
{search mode:grep, case sensitive:false, starting at top:true}
select insertion point before it
end tell
end tell
----------------------------------------------------------------
--
This is the BBEdit Talk public discussion group. If you have a
feature request or need technical support, please email
"supp...@barebones.com" rather than posting to the group.
Follow @bbedit on Twitter: <https://www.twitter.com/bbedit>
---
You received this message because you are subscribed to the Google Groups
"BBEdit Talk" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to bbedit+unsubscr...@googlegroups.com.
To post to this group, send email to bbedit@googlegroups.com.
Visit this group at https://groups.google.com/group/bbedit.
