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

hedgehog2012

各位好！我下载了一个关于矿物化学成分软件是基于Mathematica软件的，之前我有一点学习VB语言的基础，在用软件的过程中，可能是一个调用“B88”总是显示红色，不知是不是这个Mathematica软件不识别我下载的这个矿物化学成分计算软件：
3 m* T7 _: T. i0 K' o7 G
" E, x9 ^, F. f5 y& ]$ K6 j5 S2 v- |; B# V(* This notebook contains examples for the PET-functions
-CalcFormula- calculate mineral formulae (and mole fractions)
-TransformDatFile- transform microprobe data-files (JEOL_JX \
! Y* r+ ]9 j+ C' e& n" v& N- j8600) to PET-readable format
- x! _( R; M/ [; M+ F, k4 s-MakeAnalysisTable- make a usual table of mineralchemical \
analyses (wt.% and formula units) *)
; Z% [+ \' M. E4 g8 }0 Q(* This top-cell must be run once before any example can be \
performed. *)
8 t9 y  U- x7 A8 K6 M) t% L) G
(* Define the directory, where the PET-files reside (e.g. C:\Eigene \
3 |5 V% W8 }. h  {7 {# L6 vDateien\Pet) and load PET. *)
0 e/ r; E! d7 \7 z" c% w$ @% s3 C$PetDirectory = "C:\Eigene Dateien\Pet";
SetDirectory[$PetDirectory];
5 G5 v4 W/ }0 y3 jDeclarePackage["DEFDAT`", {"Dataset"}];
Dataset[Dataset -> B88];



' o; T" _8 q# t3 ?1 Q

另一个相关的“DEFDAT”:
% o: w2 x1 l+ S- J' M, K(* Name: DEFDAT`
package of PET: Petrological Elementary Tools
Computers & Geoscience 24:219-235 *)

* ?+ d, C+ Y% G3 t0 U' T, S; w(* Summary: this package declares various PET-functions *)
' L" A, o8 z0 ]) D( p& B
(* Author: Edgar Dachs, Department of Mineralogy
University of Salzburg, Austria
9 `! X& w; g1 X1 B9 }. M5 n. Y5 }* @email: edgar.dachs@sbg.ac.at
last update: 11-2002 *)

BeginPackage["DEFDAT`"]
2 ~. j/ l( b  y0 }" }  M; B- `, J
% ]* D! i% w8 {. H1 ]4 ?Dataset::usage = "Dataset[Dataset-> ...] selects the thermodynamic dataset to be used.\n\n
The following data sets are available, loaded with:\n\n
0 `& E! I7 E5 e4 s7 {6 `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
Gottschalk (1997) Eur J Mineral 9:175-223 Dataset[Dataset -> G97]\n\n
See G::usage for more details.\n
( Y: ]1 Y. T  \* f9 \8 n\"31\" or \"32\" following \"HP\" indicates that the thermodynamic data have been\n
converted from THERMOCALC-versions 3.1 or 3.2 of Holland & Powell respectively.\n
When you start PET, a subdirectory \"/work\" is created by default, from which all user-files\n
4 `- b3 s# H& t7 j% U& {+ W(e.g. mineralchemical data files) are read and all files produced by PET are written to.\n
To create a new subdirectory for that purpose, you can use the option:\n
1 }/ Q; l$ D; v/ V$ G/ lWorkDirectory -> \"/directory_name\"\n
Example: Dataset[Dataset -> B88, WorkDirectory -> \"sample_xy\"]\n
1 F, r( S9 h* GThis loads PET with the Berman data set and reads/writes all user files from/to the\n
subdirectory named \"sample_xy\".\n
; J5 b6 S+ w( Z- QCalled from: User.\n
5 U7 G1 X0 D$ Q) nPackage name: DEFDAT.m\n
9 E$ w7 M6 X! P; J3 D+ E0 E! |9 g! C, H2 RPET: Petrological Elementary Tools, (c) Edgar Dachs."
0 b$ E- [* B% ~