0 Members and 1 Guest are viewing this topic.
:Ans→K:{0,0,0,0:If K=1:{2,2,0,0:If K=2:{0,0,4,0:If K=3:{0,0,0,4
:Menu("Equip armor?","Yes",Y,"No",N:Lbl Y:∟SUN2(11:prgmθSR2XREQ:Lbl N
:Ans→K:If ∟SUN2(12)≥10 or (∟SUN2(12)≥3 and 3=∟SUN2(11:1→∟SUN2(41:If 15≤∟SUN2(12:1→∟SUN2(42:ClrHome:{2500,2E3+550∟SUN2(12),2500+600∟SUN2(12),6666,3E3+700∟SUN2(12),15E3,8E3+925∟SUN2(12),3E4+10500∟SUN2(43),E4+E3∟SUN2(12),14E3+1200∟SUN2(12),2E4,3E5:Ans(K→∟SUN2(31:{0,0,0,0,0,0,0,80,0,0,0,200:Ans(K→∟SUN2(32:{0,∟SUN2(12),1+∟SUN2(12),8,2+∟SUN2(12),20,4+∟SUN2(12),50,5+∟SUN2(12),8+∟SUN2(12),20,75:Ans(K→∟SUN2(33:prgmθSR2XBSD:If randInt(0,1:Goto E:Lbl P:If 0≥∟SUN2(21:Goto L:Menu("BATTLE!","Attack",A,"Spell",S,"Item",I:Lbl A:randInt(0,100)+50∟SUN2(13)+50(1+∟SUN2(12→D:Output(6,10,Ans:∟SUN2(31)-D→∟SUN2(31:rand(20:Output(6,10," :prgmθSR2XBSD:Goto E:Lbl S:1→Z:prgmθSR2XCSP:If not(Z:Goto P:Goto E:Lbl I:1→Z:prgmθSR2XITM:If not(Z:Goto P:Lbl E:If 0≥∟SUN2(31:Goto W:If K=1:randInt(150,350→D:If K=2:randInt(100+50∟SUN2(12),200+100∟SUN2(12→D:If K=3:randInt(300,500+100∟SUN2(12→D:If K=4:randInt(700,1000+int(.1∟SUN2(21→D:If K=5:randInt(600,900+10∟SUN2(12→D:If K=6:randInt(1000,2000+int(.1∟SUN2(21:If K=7:randInt(700+100∟SUN2(12),1100+100∟SUN2(12:If K=8:Then:0:If 10<∟SUN2(32:randInt(0,1:Ans→θ:600∟SUN2(43)+iPart(randNorm(6800+3800θ,600→W:∟SUN2(32)-10θ→∟SUN2(32:If θ:Then:0:prgmθSR2AS31:ClrHome:prgmθSR2XBSD:End:W:End:If K=9:randInt(800+125∟SUN2(12),1500+150∟SUN2(12:If K=10:randInt(1000+140∟SUN2(12),1650+160∟SUN2(12:If K=11:randInt(2000,2500:If K=12:Then:0:If 40≤∟SUN2(32:randInt(0,1:Ans→θ:∟SUN2(32)-40θ→∟SUN2(32:10500+θrandInt(0,6500:End:max(200+50∟SUN2(12),Ans-10∟SUN2(14→D:Output(6,2,Ans:∟SUN2(21)-Ans→∟SUN2(21:rand(20:Output(6,2," :prgmθSR2XBSD:Goto P:Lbl L:ClrHome:Output(2,5,"YOU DIED:For(I,1,200:End:"X:For(I,1,7:Ans+Ans:End:prgmTYPE:Pause :DelVar ∟SUN2Stop:Lbl W:"{XP,GP,MGO,HP,MP,APL,SW,VL,FB:{4,10,0,0,0,0,0,0,0:If K=2:{8,5,0,0,0,0,0,0,0:If K=3:{12,6,0,0,0,0,0,0,0:If K=4:{40,20,0,0,0,0,0,0,0:If K=5:{19+3(∟SUN2(12)>10),8,0,0,0,0,0,0,0:If K=6:{40,10,0,0,0,0,0,0,0:If K=7:{25,10,0,randInt(0,1),0,0,0,0,0:If K=8:{500,E2,0,0,0,0,0,0,0:If K=9:{40,18,0,randBin(1,.7),0,0,0,0,0:If K=10:{50,25,0,randBin(2,.5),0,0,0,0,0:If K=11:{E2,50,0,0,0,0,0,0,0:If K=12:{E3,E2,0,0,0,0,0,0,0:Ans→∟TMP:If (K=8)randBin(1,.2(6≠∟SUN2(43:Then:1+∟SUN2(43→∟SUN2(43:ClrHome:Disp "You gained a","level in the","Fire spell!:Pause :End:∟SUN2(19)+Ans(1→∟SUN2(19:∟TMP(2)+∟SUN2(17→∟SUN2(17:∟TMP(4)+∟SUN2(25→∟SUN2(25:DelVar ∟TMP:ClrHome:prgmθSR2XLVL
I had this problem with every single program made by Darl181 two years ago. It was due to his parental filter, though, which particularly screwed stuff up on his computer.
And btw, there aren't/weren't any parental filters and at the time I used library computers mostly.