xtract

ION Script言語から html への変換例
(イメージ表示画面：実行結果)
ION Script言語で記述したファイル	変換後の htmlファイル
`<!doctype html public "-//w3c//dtd html 4.0 transitional//en">` `<ION_SCRIPT>` `<ION_HEADER>` `<TITLE>Suzaku XIS QuickLook Message</TITLE>` `<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">` `<VARIABLES>` `<VARIABLE_DECL NAME="IP" TYPE="STR" VALUE="$Browser.REMOTE_ADDR"/>` `</VARIABLES>` `<!-- $Id$ -->` `</ION_HEADER>` `<ION_BODY BGCOLOR="#CCCCCC">` `<ION_IF EXPR="$Form.OBS ISTYPE 'UNDEF'">` `<ION_ELSEIF EXPR="$Form.VER ISTYPE 'UNDEF'"/>` `<ION_ELSEIF EXPR="$Form.JOB ISTYPE 'UNDEF'"/>` `<ION_ELSEIF EXPR="$Form.FRM ISTYPE 'UNDEF'"/>` `<ION_ELSEIF EXPR="$Form.FRM EQ '00' OR $Form.FRM EQ '20'"/>` `<ION_IF EXPR="$Form.E0 ISTYPE 'UNDEF'">` `<ION_ELSEIF EXPR="$Form.E1 ISTYPE 'UNDEF'"/>` `<ION_ELSEIF EXPR="$Form.E2 ISTYPE 'UNDEF'"/>` `<ION_ELSEIF EXPR="$Form.E3 ISTYPE 'UNDEF'"/>` `<ION_ELSE/>` `<ION_DATA_OUT PRE="FALSE">` `<IDL>` `dst = '$ION.temp'` `ver = strdecode('$FormURL.VER')` `obs = strdecode('$FormURL.OBS')` `job = strdecode('$FormURL.JOB')` `rip = string(strsplit('$IP', '.', /EXTRACT), $` `FORMAT='(4Z02)', /PRINT)` `frm = strdecode('$FormURL.FRM')` `dat = [ strdecode('$FormURL.E0'), $` `strdecode('$FormURL.E1'), $` `strdecode('$FormURL.E2'), $` `strdecode('$FormURL.E3') ]` `CMD = 'suzaku/bin/XISql-xtract'` `spawn, [CMD, dst,ver,obs,job,rip,frm,dat], $` `COUNT=n, out, err, EXIT_STATUS=stat, $` `/NULL_STDIN, /NOSHELL` `print, FORMAT='(A)', err` `print, FORMAT='(A)', out` `</IDL>` `</ION_DATA_OUT>` `</ION_IF>` `<ION_ELSEIF EXPR="$Form.FRM EQ '10' OR $Form.FRM EQ '30'"/>` `<ION_IF EXPR="$Form.E0 ISTYPE 'UNDEF'">` `<ION_ELSEIF EXPR="$Form.E1 ISTYPE 'UNDEF'"/>` `<ION_ELSEIF EXPR="$Form.E2 ISTYPE 'UNDEF'"/>` `<ION_ELSEIF EXPR="$Form.E3 ISTYPE 'UNDEF'"/>` `<ION_ELSEIF EXPR="$Form.E4 ISTYPE 'UNDEF'"/>` `<ION_ELSEIF EXPR="$Form.E5 ISTYPE 'UNDEF'"/>` `<ION_ELSE/>` `<ION_DATA_OUT PRE="FALSE">` `<IDL>` `dst = '$ION.temp'` `ver = strdecode('$FormURL.VER')` `obs = strdecode('$FormURL.OBS')` `job = strdecode('$FormURL.JOB')` `rip = string(strsplit('$IP', '.', /EXTRACT), $` `FORMAT='(4Z02)', /PRINT)` `frm = strdecode('$FormURL.FRM')` `dat = [ strdecode('$FormURL.E0'), $` `strdecode('$FormURL.E1'), $` `strdecode('$FormURL.E2'), $` `strdecode('$FormURL.E3'), $` `strdecode('$FormURL.E4'), $` `strdecode('$FormURL.E5') ]` `CMD = 'suzaku/bin/XISql-xtract'` `spawn, [CMD, dst,ver,obs,job,rip,frm,dat], $` `COUNT=n, out, err, EXIT_STATUS=stat, $` `/NULL_STDIN, /NOSHELL` `print, FORMAT='(A)', err` `print, FORMAT='(A)', out` `</IDL>` `</ION_DATA_OUT>` `</ION_IF>` `<ION_ELSE/>` `</ION_IF>` `</ION_BODY>` `</ION_SCRIPT>`	`<!doctype html public "-//w3c//dtd html 4.0 transitional//en">` `<HTML>` `<HEAD>` `<TITLE>Suzaku XIS QuickLook Message</TITLE>` `<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">` `<!-- $Id$ -->` `</HEAD>` `<BODY BGCOLOR="#CCCCCC">` `</BODY>` `</HTML>`