Is there any possible way to draw Aston curve without using \begin{pspicture}
, because here in this website they used it but I didn't get their method, here's the code they've used :
\documentclass{article}
\usepackage[T1]{fontenc}
\usepackage[latin1]{inputenc}
\usepackage[a4paper]{geometry}
\usepackage{lmodern}
\usepackage{pst-plot,pst-node,pst-blur,url}
\usepackage{frenchle}
\SpecialCoor
\newcommand\encadre[2][0.8]{\begin{center}
\psframebox[fillstyle=solid,fillcolor=blue!20,linestyle=none,shadow=true,shadowcolor=gray,shadowsize=0.15cm,blur=true]{
\begin{minipage}{#1\linewidth}
{#2}
\end{minipage}}
\end{center}}
\makeatletter
\def\pnodeAston{\def\pst@par{}\pst@object{pnodeAston}}
\def\pnodeAston@i(#1,#2,#3)#4{{%
\begin@ClosedObj
\pnode(!%
/m_e 0.000549 def % masse de l'électron
/m_n 1.008665 def % masse du neutron
/m_p 1.007287 def % masse du proton
/u 931.5 def % unité de masse atomique en MeV
/N_nu #1 def % nombre de nucléons
/N_p #2 def % nombre de protons
/m_A #3 def % masse atomique en u
/N_ne N_nu N_p sub def % nombre de neutrons
/M_c N_p m_p mul N_ne m_n mul add def % masse des constituants
/M_nu m_A N_p m_e mul sub def % masse des nucléons
/D_m M_c M_nu sub def % défaut de masse
/Energy D_m u mul def % Énergie de liaison du noyau
/E_B Energy N_nu div def % Énergie de liaison du noyau/nucléon
/x_A N_nu 20 div def
x_A
E_B neg
){#4}%
\end@ClosedObj}}
\makeatother
\savedata{\NucleonsEnergy}[ %
2 -1.12
3 -2.83
3 -2.58
4 -7.08
6 -5.34
7 -5.61
9 -6.47
10 -6.48
11 -6.93
12 -6.032
13 -7.47
15 -7.7
19 -7.78
23 -8.11
27 -8.33
35 -8.52
40 -8.55
45 -8.62
52 -8.78
56 -8.79
58 -8.74
63 -8.76
69 -8.73
75 -8.7
85 -8.7
93 -8.67
94 -8.597
98 -8.64
109 -8.55
120 -8.51
127 -8.45
133 -8.42
139 -8.312
140 -8.376
165 -8.15
184 -8.01
200 -7.91
210 -7.84
235 -7.591
238 -7.57]
%
%
\savedata{\NucleonsEnergyClip}[ %
40 -8.55
45 -8.62
52 -8.78
56 -8.79
58 -8.74
63 -8.76
69 -8.73
75 -8.7
85 -8.7
93 -8.67
94 -8.597
98 -8.64
109 -8.55
120 -8.51
127 -8.45
133 -8.42
139 -8.312
140 -8.376
]
\title{Courbe d'\textsc{Aston}}
\author{Manuel Luque}
\date{29 octobre 2\,006}
\begin{document}
\maketitle
\begin{abstract}
C'est un essai de dessin de la courbe d'\textsc{Aston}, laquelle représente l'opposé de l'énergie de liaison par nucléon en fonction du nombre de
nucléons, avec une commande \verb+\pnodeAston+ permettant de placer sur la courbe un noyau quelconque défini par le triplet $(A,Z,\mathrm{m})$ où
$A$ est le nombre de nucléons, $Z$ le nombre de protons et $\mathrm{m}$ la masse atomique en unité de masse atomique.
\end{abstract}
\section{Courbe d'Aston}
\begin{center}
\begin{pspicture}(0,2)(12,-10)
\pnodeAston(190,74,189.96318){W190}
\pnodeAston(40,20,39.96259){Ca40}
\pscustom[linestyle=none]{%
\psline(W190)(!190 20 div 0)\psline(!190 20 div 0)(!40 20 div 0)
\psline(!40 20 div 0)(Ca40)
\listplot[xunit=0.05]{\NucleonsEnergyClip}
\fill[fillstyle=solid,fillcolor=yellow!50]}%
\listplot[xunit=0.05,showpoints=true]{\NucleonsEnergy}
\psgrid[gridlabels=0pt,subgriddiv=0](12,-10)%
\psaxes[Dx=20,xunit=0.05](240,-10)
\psline[xunit=0.05]{->}(250,0)
\uput[u](12.5,0){$A$}
\psline{->}(0,1)
\uput[r](0,1){$\displaystyle -\frac{E_l}{A}$ en MeV par nucléon}
% fission
\psset{dotsize=6pt}
\pnodeAston(235,92,235.0439){U235}
\psdot[dotstyle=o,dotsize=7pt](U235)
\psdot[linecolor=red](U235)
\uput[d](U235){$\mathrm{^{235}_{\hphantom{2}{92}}U}$}%
\pnodeAston(139,54,138.918793){Xe139}
\uput[d](Xe139){$\mathrm{^{139}_{\hphantom{1}{54}}Xe}$}
\pnodeAston(94,38,93.915361){Sr94}
\uput[d](Sr94){$\mathrm{^{94}_{{38}}Sr}$}
\nccurve[angleA=120,angleB=60,arrowsize=.2,arrowinset=0.2,linecolor=red,nodesepB=5pt]{->}{U235}{Xe139}
\nccurve[angleA=120,angleB=60,arrowsize=.2,arrowinset=0.2,linecolor=red,nodesepB=5pt]{->}{U235}{Sr94}
\psdot[dotstyle=o,dotsize=7pt](Xe139)
\psdot[dotstyle=o,dotsize=7pt](Sr94)
\psdot[linecolor=red](Xe139)\psdot[linecolor=red](Sr94)
% fusion
\pnodeAston(2,1,2.014101){H2}
\psdot[dotstyle=o,dotsize=7pt](H2)
\psdot[linecolor=green](H2)
\uput[r](H2){$\mathrm{^2_2H}$}%
\pnodeAston(3,1,3.016049){H3}
\psdot[dotstyle=o,dotsize=7pt](H3)
\psdot[linecolor=green](H3)
\uput[r](H3){$\mathrm{^3_1H}$}
\pnodeAston(4,2,4.002603){He4}
\uput[d](He4){$\mathrm{^4_2He}$}
\nccurve[angleA=0,angleB=30,arrowsize=.2,arrowinset=0.2,linecolor=green,nodesepB=5pt]{->}{H2}{He4}
\nccurve[angleA=0,angleB=30,arrowsize=.2,arrowinset=0.2,linecolor=green,nodesepB=5pt]{->}{H3}{He4}
\psdot[dotstyle=o,dotsize=7pt](He4)
\psdot[linecolor=green](He4)
\pnodeAston(56,26,55.934937){Fe}
\psdot[dotstyle=o,dotsize=7pt](Fe)
\psdot[linecolor=blue](Fe)
\uput[d](Fe){\blue$\mathrm{^{56}_{26}Fe}$}
\end{pspicture}
\end{center}
\section{Quelques considérations}
Les calculs sont faits en \textsf{postscript} en utilisant les relations classiques pour déterminer
l'énergie de liaison des noyaux. S'agissant de calculs relativement simples, ceux-ci pourraient aussi bien
être effectués en \TeX{}, peut-être dans une autre version ? Y-a-t-il un volontaire ?
La courbe est tracée à partir d'un fichier de valeurs pré-calculées, qui peut lui aussi, être complété :
\encadre[0.62]{$\mathsf{\backslash listplot[xunit=0.05,showpoints=true]\{\backslash NucleonsEnergy\}}$}
Par contre les calculs de la commande :
\encadre[0.25]{$\mathsf{\backslash pnodeAston(A,Z,m)\{X\}}$} sont effectués, comme précisé ci-dessus, en \textsf{postscript}.
\begin{verbatim}
/m_e 0.000549 def % masse de l'électron
/m_n 1.008665 def % masse du neutron
/m_p 1.007287 def % masse du proton
/u 931.5 def % unité de masse atomique en MeV
/N_nu #1 def % nombre de nucléons
/N_p #2 def % nombre de protons
/m_A #3 def % masse atomique en u
/N_ne N_nu N_p sub def % nombre de neutrons
/M_c N_p m_p mul N_ne m_n mul add def % masse des constituants
/M_nu m_A N_p m_e mul sub def % masse des nucléons
/D_m M_c M_nu sub def % défaut de masse
/Energy D_m u mul def % Énergie de liaison du noyau
/E_B Energy N_nu div def % Énergie de liaison du noyau/nucléon
\end{verbatim}
\section{Un tableau de quelques masses atomiques}
Ce tableau ne demande, évidemment, qu'à être complété.
\begin{center}
\input{massesatomiques.tex}
\end{center}
\section{Quelques références}
Les données concernant les masses atomiques et les énergies de liaison sont sur le site :
\encadre[0.65]{\url{http://www-nds.iaea.org/masses/mass.mas03round}}
\end{document}
I prefer if it's with TikZ, it's more understandable than this.