VB theory

def playscene1():
            oen({1:'1927 年，对于氢气分子能量的计算奠定了价键理论的基础',  2:'只有当核间距离为适当值时，氢气分子的能量才达到最低', 3:'价键理论的基本思想是原子间的电子云重叠导致了原子的键合'})
            oeo('a', {1:mvg(xua(0,0), xua(0,0)).arrange(buff=1.6), 2:xcb(), 3:'能量', 4:Circle(fill_opacity=0.3), 5:Circle(fill_opacity=0.3)})
            oes('m', 1)
            onp(a1)
            osas(m1,0.3)
            obsh(a1,u)
            obnt(a2,a1,d,a3,a2,d,m1,t3,2*u)
            obc(a4,cb,a5,cb)
            a2.begin_color_update()
            
            sp(afi(t1,a1));sw()
            sp(ato(t1,t2),afi(a2),agf(a3))
            sp(ashg(a1[0],0.8*r,a1[1],0.8*l))
            sp(ashg(a1[0],0.25*r,a1[1],0.25*l),ash(a2.pointer,3*r))
            sp(ashg(a1[0],0.25*r,a1[1],0.25*l),ash(a2.pointer,6.4*l))
            sp(ashg(a1[0],0.25*r,a1[1],0.25*l),ash(a2.pointer,6.8*r))
            sp(ashg(a1[0],0.25*l,a1[1],0.25*r),afo(a2,a3))
            sp(ato(t1,t3),adb(m1))
            a4.replace(a1[0])
            a5.replace(a1[1])
            sp(yfod(a1[0].orbits, a1[1].orbits),yfid(a4,a5))
            bond = Intersection(a4, a5, color=cb, fill_opacity=0.3)
            sp(ato(m1[2], bond))
            sp(afo(t1,m1,a4,a5,a1[0].nucleus,a1[1].nucleus))