Ever wonder how the code for a RPGCode GUI would look?

Subject:

Comments:
: <font color=turquoise face=verdana size=2> : This is a small (about 1/25) of the code so far.. It wont work if you try to run it, as you dont have the correct sounds and images. So dont bother trying.. heheh.. just thought that maybe you would like to see what i put together last night.. =) : : This Sets up one half of the GUI, including the Input Window, OutPut Window (without the internal text decorator), the color bars, the customize window, part of the Help Dilog, and probably some other stuff.. DO NOT TRY TO RUN THIS WITHOUT THE IMAGE! : #mode$=plain : #ln_number!=1 : #Fsize!=8 : #cap!=0 : #r!=255 : #g!=255 : #b!=255 : #r_bg!=255 : #g_bg!=255 : #b_bg!=255 : #texty!=7 : #x5!=8 : #flashtop!=45 : #flashbttm!=55 : #BITMAP(DECORTESTCOPY.JPG) : #METHOD TESTER() : { : #CUSTOMIZE() : #COLORRGB(255,255,255) : #MOUSECLICK(x!,y!) : #SETPIXEL(x!,y!) : #MOUSECLICK(x2!,y2!) : #SETPIXEL(x2!,y2!) : #DRAWRECT(x!,y!,x2!,y2!) : #MWIN("[<x!><y!>],[<x2!><y2!>]") : #WAIT : } : : :UP3 : #MOUSECLICK(x3!,y3!) : #IF(x3!<319) : { : #IF(x3!>51) : { : #IF(y3!<139) : { : #IF(y3!>40) : { : #WAV(aa2.wav) : #TYPETEXT() : } : } : } : } : #IF(x3!<158) : { : #IF(x3!>147) : { : #IF(y3!<36) : { : #IF(y3!>25) : { : #WAV(aa1.wav) : #cap!=0 : #BRANCH(:UP3) : } : } : } : } : #IF(x3!<198) : { : #IF(x3!>181) : { : #IF(y3!<36) : { : #IF(y3!>25) : { : #WAV(aa1.wav) : #cap!=1 : #BRANCH(:UP3) : } : } : } : } : #IF(x3!<195) : { : #IF(x3!>183) : { : #IF(y3!<164) : { : #IF(y3!>144) : { : #WAV(chest.wav) : #OUTPUT_TEXT() : #BRANCH(:UP3) : } : } : } : } : #IF(x3!<566) : { : #IF(x3!>509) : { : #IF(y3!<80) : { : #IF(y3!>44) : { : #COLOR_DISPLAY() : } : } : } : } : #IF(x3!<496) : { : #IF(x3!>346) : { : #IF(y3!<54) : { : #IF(y3!>40) : { : #WAV(chest.wav) : #RED() : } : } : } : } : #IF(x3!<496) : { : #IF(x3!>346) : { : #IF(y3!<70) : { : #IF(y3!>56) : { : #WAV(chest.wav) : #GREEN() : } : } : } : } : #IF(x3!<496) : { : #IF(x3!>346) : { : #IF(y3!<85) : { : #IF(y3!>74) : { : #WAV(chest.wav) : #BLUE() : } : } : } : } : #IF(x3!<445) : { : #IF(x3!>364) : { : #IF(y3!<196) : { : #IF(y3!>178) : { : #WAV(chest.wav) : #CUSTOMIZE() : } : } : } : } : #BRANCH(:UP3) : :UP4 : #WAIT : #METHOD TYPETEXT() : { : :UP5 : #DELAY(0.2) : #COLORRGB(200,255,255) : #DRAWLINE(55,flashtop!,55,flashbttm!) : #DELAY(0.2) : #COLORRGB(0,0,0) : #DRAWLINE(55,flashtop!,55,flashbttm!) : :UP7 : #GET(a$) : #IF(a$="") : { : #BRANCH(:UP5) : } : #IF(a$="1") <#BRANCH(:UP3)> : #IF(a$="2") <#HELP()> : #IF(a$="ENTER") : { : :ENTERPRG : #IF(texty!=>16) : { : #WAV(aa3.wav) : #BRANCH(:UP7) : } : #flashtop!=flashtop!+16 : #flashbttm!=flashbttm!+16 : #texty!=texty!+2 : #ln_number!=ln_number!+1 : #x5!=8 : #WAV(aa4.wav) : #BRANCH(:UP7) : } : #IF(x5!=40) : { : #IF(texty!=>16) : { : #WAV(aa3.wav) : #BRANCH(:UP3) : } : #BRANCH(:ENTERPRG) : } : #COLORRGB(255,255,255) : #FONTSIZE(8) : #CHECK_KEY() : #TEXT(x5!,texty!,a$) : #IF(ln_number!=1) : { : #OUTPUT_TEXT1$=OUTPUT_TEXT1$+a$ : } : #IF(ln_number!=2) : { : #OUTPUT_TEXT2$=OUTPUT_TEXT2$+a$ : } : #IF(ln_number!=3) : { : #OUTPUT_TEXT3$=OUTPUT_TEXT3$+a$ : } : #IF(ln_number!=4) : { : #OUTPUT_TEXT4$=OUTPUT_TEXT4$+a$ : } : #IF(ln_number!=5) : { : #OUTPUT_TEXT5$=OUTPUT_TEXT5$+a$ : } : #IF(ln_number!=6) : { : #OUTPUT_TEXT6$=OUTPUT_TEXT6$+a$ : } : #WAV(aa1.wav) : #x5!=x5!+1 : #BRANCH(:UP7) : } : : #METHOD CHECK_KEY() : { : #IF(cap!=0) : { : #IF(a$="A")<#a$="a"> : #IF(a$="B")<#a$="b"> : #IF(a$="C")<#a$="c"> : #IF(a$="D")<#a$="d"> : #IF(a$="E")<#a$="e"> : #IF(a$="F")<#a$="f"> : #IF(a$="G")<#a$="g"> : #IF(a$="H")<#a$="h"> : #IF(a$="I")<#a$="i"> : #IF(a$="J")<#a$="j"> : #IF(a$="K")<#a$="k"> : #IF(a$="L")<#a$="l"> : #IF(a$="M")<#a$="m"> : #IF(a$="N")<#a$="n"> : #IF(a$="O")<#a$="o"> : #IF(a$="P")<#a$="p"> : #IF(a$="Q")<#a$="q"> : #IF(a$="R")<#a$="r"> : #IF(a$="S")<#a$="s"> : #IF(a$="T")<#a$="t"> : #IF(a$="U")<#a$="u"> : #IF(a$="V")<#a$="v"> : #IF(a$="W")<#a$="w"> : #IF(a$="X")<#a$="x"> : #IF(a$="Y")<#a$="y"> : #IF(a$="Z")<#a$="z"> : } : } : #METHOD OUTPUT_TEXT() : { : #IF(mode$=plain) : { : #IF(bold!=1)<#bold(on)> : #IF(italics!=1)<#italics(on)> : #IF(underline!=1)<#underline(on)> : #COLORRGB(r!,g!,b!) : #FONTSIZE(Fsize!) : #TEXT(8,23,OUTPUT_TEXT1$) : #TEXT(8,25,OUTPUT_TEXT2$) : #TEXT(8,27,OUTPUT_TEXT3$) : #TEXT(8,29,OUTPUT_TEXT4$) : #TEXT(8,31,OUTPUT_TEXT5$) : #TEXT(8,33,OUTPUT_TEXT6$) : } : } : #METHOD HELP() : { : #WAV(ready.wav) : #COLORRGB(100,100,100) : #FILLRECT(99,99,301,301) : #COLORRGB(150,150,150) : #FILLRECT(100,100,300,300) : #COLORRGB(100,100,100) : #DRAWRECT(102,102,298,122) : #COLORRGB(10,10,10) : #FONTSIZE(8) : #TEXT(15,14.5,"[Help]") : #TEXT(15,18,"And they said RPGCode") : #TEXT(15,19.5,"wasnt capable enough to") : #TEXT(15,21,"create Applications.") : #TEXT(15,22.5,"Well, as you can see") : #TEXT(15,24,"RPGCode is powerful") : #TEXT(15,25.5,"even as a stand-alone") : #TEXT(15,27,"language.") : #TEXT(15,30,"This is a simple demo") : #TEXT(15,31.5,"of an RPGCode GUI.") : #TEXT(15,33,"This was meant mainly") : #TEXT(15,34.5,"as a demonstration") : #TEXT(15,36,"of RPGCodes true power.") : #DELAY(2) : #COLOR(1) : #TEXT(15,14.5," Press any Key") : #WAIT : : #COLORRGB(100,100,100) : #FILLRECT(99,99,301,301) : #COLORRGB(150,150,150) : #FILLRECT(100,100,300,300) : #COLORRGB(100,100,100) : #DRAWRECT(102,102,298,122) : #COLORRGB(10,10,10) : #FONTSIZE(8) : #TEXT(15,14.5,"[Help]") : #TEXT(15,18,"The Program itself is") : #TEXT(15,19.5,"pretty much useless") : #TEXT(15,21,"as most of the code it") : #TEXT(15,22.5,"spits out, could very") : #TEXT(15,24,"easily be done by hand.") : #TEXT(15,25.5,"But DecorText is the ") : #TEXT(15,27,"first of many RPGCode") : #TEXT(15,28.5,"Apps to follow.") : #TEXT(15,31.5,"Well, if you actually") : #TEXT(15,33,"are gonna try out DcTxt,") : #TEXT(15,34.5,"I'll try to help. ") : #UNDERLINE(on) : #TEXT(15,36,"The Utilities:") : #UNDERLINE(off) : #DELAY(2) : #COLOR(1) : #TEXT(15,14.5," Press any Key") : #WAIT : #COLORRGB(100,100,100) : #FILLRECT(99,99,301,301) : #COLORRGB(150,150,150) : #FILLRECT(100,100,300,300) : #COLORRGB(100,100,100) : #DRAWRECT(102,102,298,122) : #COLORRGB(10,10,10) : #FONTSIZE(8) : #TEXT(15,14.5,"[Help]") : #TEXT(15,18,"The Input Window:") : #TEXT(15,19.5,"Click Once anywhere") : #TEXT(15,21,"on the Input Box, to ") : #TEXT(15,22.5,"start typing. Press 1") : #TEXT(15,24,"to Exit the Window.") : #TEXT(15,25.5,"Pressing 2 will bring") : #TEXT(15,27,"up this Help Window.") : #TEXT(15,30,"Clicking on the [A] or") : #TEXT(15,31.5,"[a] buttons - not while") : #TEXT(15,33,"in Input Box-will selct") : #TEXT(15,34.5,"lowercase or Uppercase.") : #TEXT(15,36,"Pressing the White Arro") : #DELAY(2) : #COLOR(1) : #TEXT(15,14.5," Press any Key") : #WAIT : #COLORRGB(100,100,100) : #FILLRECT(99,99,301,301) : #COLORRGB(150,150,150) : #FILLRECT(100,100,300,300) : #COLORRGB(100,100,100) : #DRAWRECT(102,102,298,122) : #COLORRGB(10,10,10) : #FONTSIZE(8) : #TEXT(15,14.5,"[Help]") : #TEXT(15,18,"will output your text") : #TEXT(15,19.5,"into the Output Box") : #TEXT(15,21,"in the selected style.") : #TEXT(15,22.5,"Blahblah") : #TEXT(15,24,"blahblah") : #TEXT(15,25.5,"blahblah") : #TEXT(15,27,"blahblah") : #TEXT(15,30,"blahblah") : #TEXT(15,31.5,"blahblah") : #TEXT(15,33,"blahblah") : #TEXT(15,34.5,"blahblah") : #TEXT(15,36,"blahblah") : #DELAY(2) : #COLOR(1) : #TEXT(15,14.5," Press any Key") : #WAIT : #BITMAP(DECORTESTCOPY.JPG) : } : #METHOD RED() : { : #r!=x3!-346 : #r!=r!*2 : #r!=r!-20 : #COLOR_DISPLAY() : #BRANCH(:UP3) : } : #METHOD GREEN() : { : #g!=x3!-346 : #g!=g!*2 : #g!=g!-20 : #COLOR_DISPLAY() : #BRANCH(:UP3) : } : #METHOD BLUE() : { : #b!=x3!-346 : #b!=b!*2 : #b!=b!-20 : #COLOR_DISPLAY() : #BRANCH(:UP3) : } : #METHOD COLOR_DISPLAY() : { : #WAV(chest.wav) : #COLORRGB(r!,g!,b!) : #FILLRECT(509,44,566,80) : } : #METHOD CUSTOMIZE() : { : #SetButton("DECORMINI.JPG", 0, 347, 196, 241, 134) : :UPHERE : #MOUSECLICK(x3!,y3!) : #IF(x3!<532) : { : #IF(x3!>472) : { : #IF(y3!<258) : { : #IF(y3!>239) : { : #WAV(aa2.wav) : #PROMPT("-QuikType- Please Enter Sample Text:",qt_text$) : #BRANCH(:UPHERE) : } : } : } : } : #BRANCH(:UPHERE) : } : #METHOD BLAH() : { : #fade(1) : #fontsize(8) : #colorrgb(150,150,150) : #text(10,10,"Hello!") : #colorrgb(200,200,200) : #text(10.1,10,"Hello!") : #wait : } : : Kinda scary, eh? =) : I hope it displays right in HTML format.. oh well.. : -T-r-i-u-k-e-n- : </font>

Optional Link URL:
Link Title:
Optional Image URL: