Mathematica不能识别一个计算矿物化学式的软件？

hedgehog2012

各位好！我下载了一个关于矿物化学成分软件是基于Mathematica软件的，之前我有一点学习VB语言的基础，在用软件的过程中，可能是一个调用“B88”总是显示红色，不知是不是这个Mathematica软件不识别我下载的这个矿物化学成分计算软件：
. ]0 F4 c0 b+ ^
' C7 N# T  Q, B& M% h" C(* This notebook contains examples for the PET-functions
-CalcFormula- calculate mineral formulae (and mole fractions)
-TransformDatFile- transform microprobe data-files (JEOL_JX \
8600) to PET-readable format
-MakeAnalysisTable- make a usual table of mineralchemical \
; y9 A5 S1 e) R1 r9 _analyses (wt.% and formula units) *)
(* This top-cell must be run once before any example can be \
! M6 H2 G* ?9 G6 kperformed. *)

3 }% Q. }8 x: u(* Define the directory, where the PET-files reside (e.g. C:\Eigene \
& k4 M7 s6 p+ r* v0 s& FDateien\Pet) and load PET. *)
; ~! s4 y, b( ]2 |$PetDirectory = "C:\Eigene Dateien\Pet";
0 J; S% @5 \% V. K$ o: A3 JSetDirectory[$PetDirectory];
- h! S6 a+ W3 t/ ]1 J' EDeclarePackage["DEFDAT`", {"Dataset"}];
Dataset[Dataset -> B88];
" S) n! W6 x6 v


! r+ o' o* K9 {( I, u9 t' O

6 \5 O0 W& V5 c9 P, \  V1 p$ q4 o另一个相关的“DEFDAT”:
/ d) P8 K& N# O* b(* Name: DEFDAT`
, S5 G7 r- o+ r: O  l' K0 \- Fpackage of PET: Petrological Elementary Tools
Computers & Geoscience 24:219-235 *)

(* Summary: this package declares various PET-functions *)
# g" L  @9 y# V2 c
(* Author: Edgar Dachs, Department of Mineralogy
9 w4 B- [8 P/ k# XUniversity of Salzburg, Austria
email: edgar.dachs@sbg.ac.at
. I: K8 D% h8 G- Tlast update: 11-2002 *)

BeginPackage["DEFDAT`"]

8 o3 _# ]: Y- ?7 P/ K& RDataset::usage = "Dataset[Dataset-> ...] selects the thermodynamic dataset to be used.\n\n
The following data sets are available, loaded with:\n\n
/ {9 {& C6 q1 x( _Berman (1988) J Petrol 29:445-522 Dataset[Dataset -> B88]\n
Holland & Powell (1998) J metam Geol 16:309-343 Dataset[Dataset -> HP31], or\n
Dataset[Dataset -> HP32]\n
4 R- L4 K9 S) x$ M, E  FGottschalk (1997) Eur J Mineral 9:175-223 Dataset[Dataset -> G97]\n\n
See G::usage for more details.\n
\"31\" or \"32\" following \"HP\" indicates that the thermodynamic data have been\n
% A5 v  E  i; O' s  T# b0 A% U1 Oconverted from THERMOCALC-versions 3.1 or 3.2 of Holland & Powell respectively.\n
( I- r4 X  ~4 v9 P+ iWhen you start PET, a subdirectory \"/work\" is created by default, from which all user-files\n
(e.g. mineralchemical data files) are read and all files produced by PET are written to.\n
' o. _9 b  V) JTo create a new subdirectory for that purpose, you can use the option:\n
/ {- V, w+ F# N/ M. PWorkDirectory -> \"/directory_name\"\n
/ }4 C: [' }, jExample: Dataset[Dataset -> B88, WorkDirectory -> \"sample_xy\"]\n
This loads PET with the Berman data set and reads/writes all user files from/to the\n
subdirectory named \"sample_xy\".\n
6 d( _: l$ x  _' ~8 d# u" s; T' M. xCalled from: User.\n
Package name: DEFDAT.m\n
PET: Petrological Elementary Tools, (c) Edgar Dachs."
! i5 U1 D7 N( K