SUBROUTINE RADIO1
* Simple form including 3 groups of radio buttons

* Include the RealWeb definitions

     INCLUDE #RW.INCLUDE.DEFS FROM /SYSFILES/REALWEB,BP

* Start the HTML page.
CALL RW_START_HTML_PAGE("Form with Radio Buttons", "", "", "", "")

CALL RW_PUT("Please enter your name in the box")

* Start the HTML form, specifying that the subroutine THANKS should be run
* when the submit button is clicked
CALL RW_START_HTML_FORM("THANKS","FORM2","")

* Display the editbox
CALL RW_EDIT_BOX("EDITBOX",30,"3")
CALL RW_NEWLINES(2)

CALL RW_PUT("Please indicate your gender")
* Display group of 2 radio buttons
CALL RW_NEWLINE
CALL RW_RADIO("sex","M","","")
CALL RW_PUT("Male")
CALL RW_NEWLINE
CALL RW_RADIO("sex","F","","")
CALL RW_PUT("Female")
CALL RW_NEWLINES(2)

CALL RW_PUT("Your age group")
* Display group of 4 radio buttons
CALL RW_NEWLINE
CALL RW_RADIO("age","1","","")
CALL RW_PUT("Under 25")
CALL RW_NEWLINE
CALL RW_RADIO("age","2","","")
CALL RW_PUT("25 - 40")
CALL RW_NEWLINE
CALL RW_RADIO("age","3","","")
CALL RW_PUT("40 - 55")
CALL RW_NEWLINE
CALL RW_RADIO("age","4","","")
CALL RW_PUT("Over 55")
CALL RW_NEWLINES(2)

CALL RW_PUT("and please tell us where you get most of your books")
* Display group of 3 radio buttons
CALL RW_NEWLINE
CALL RW_RADIO("source","S","","")
CALL RW_PUT("High Street Bookshop")
CALL RW_NEWLINE
CALL RW_RADIO("source","I","","")
CALL RW_PUT("Internet Bookshop")
CALL RW_NEWLINE
CALL RW_RADIO("source","L","","")
CALL RW_PUT("Local Library")
CALL RW_NEWLINES(2)

* Create the submit button
CALL RW_SUBMIT_BUTTON("Submit Details","")

*Complete the form
CALL RW_END_FORM

* Complete the page
CALL RW_END_PAGE

RETURN
Subroutine result in browser 
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<HTML>
<HEAD>
<META NAME="Generator" CONTENT="Reality">
<TITLE>Form with Radio Buttons</TITLE>


</HEAD>
<BODY>

Please enter your name in the box
<FORM ACTION="THANKS" NAME="FORM2" METHOD="POST">
<INPUT CLASS="3" NAME="EDITBOX" SIZE="30" TYPE="TEXT">
<BR>
<BR>

Please indicate your gender
<BR>
<INPUT TYPE=RADIO NAME="sex" VALUE="M">

Male
<BR>
<INPUT TYPE=RADIO NAME="sex" VALUE="F">

Female
<BR>
<BR>

Your age group
<BR>
<INPUT TYPE=RADIO NAME="age" VALUE="1">

Under 25
<BR>
<INPUT TYPE=RADIO NAME="age" VALUE="2">

25 - 40
<BR>
<INPUT TYPE=RADIO NAME="age" VALUE="3">

40 - 55
<BR>
<INPUT TYPE=RADIO NAME="age" VALUE="4">

Over 55
<BR>
<BR>

and please tell us where you get most of your books
<BR>
<INPUT TYPE=RADIO NAME="source" VALUE="S">

High Street Bookshop
<BR>
<INPUT TYPE=RADIO NAME="source" VALUE="I">

Internet Bookshop
<BR>
<INPUT TYPE=RADIO NAME="source" VALUE="L">

Local Library
<BR>
<BR>
<INPUT TYPE="submit" VALUE="Submit Details">
</FORM>
</BODY>
</HTML>