ZXTape! 0Created with Ramsoft MakeTZXGOODQUESTS 65290 N$="LIFESKILLS" dPR$="?????????????????????????" sE:P3="300":P2="310":N0="0":N1="1":N2="2":N3="3":N7="7" "1000" ,X=X+N1 6X=X+N2:X$:Y="16"-(X$/N2) @BJ=N1̱X$:X,Y+J-1;I;" ":X,Y+J-1;I;P;X$(J):J: N1:N1:N1:  ٰ"6":N2 #J=N1̰"9":J*N2+N1,N3;R$;"?" J*N2+N2,N3;"?";R$ J X=N2:װ".4",X <I=N7:P=N0:P3:I=N0:P=N7:P3:P2:P3:P2:I=N7:P=N0:P3 7N1:N1;N1;N7;"15","16"-(N$/N2);"16"+(N$/N2) xN1:"20",N0;:"":"1400" d"GOOD QUESTIONS","written by:","Viv Neary & Martin Hodge","Program now loading:",N$,"MNL Software" #(:N1="1":'"WAIT 6 SECS" #2W"23658","0":#N1;"Q NEXT OTHER SAVE":"0":Q$=:Q$="q"*"M";N1;"GQPROG2" #<"GOODQUESTS"N1:"9000" &:Q$="PROG1Lifes" & j=1 &*"M";J;Q$ʰ"9000" & *"M";J;Q$ Q  <*[)))~#[[>{zy *[|&)))))X w#v> p\7p!p# # <@(#-# 9\\]hPZ\g@^̇̇p\#yJy X![!PP!!! {"\ M fO]x_  K SR Pꋃ  IF YOU HAVE ARRIVED   HERE, THERE HAS BEEN   AN ERROR.   ---------------------  To re-enter program,   !press key G twice   (which prints GO TO g  at the bottom of the   screen) & then press   ENTER.  ꎌ 2 <51:7:0::"LIST FROM LINE:";N:N hLL ist=((32 -d$)/2) j$23296[,y:23299[,0 kNm=1̱d$:23297[,ST+M-1:23298[,D$(M):65295:M o,23297[,0:23298[,0: 2 BORD 3c4,171:247,0:0,-159:-247,0:0,159: : CLN ;Dln,0;bordcol;" ":5: ? CPAGE @9bordcol=1:bordcol:5:0::cln:bord TYN UINKEY W$yes=0:D$="y"yes=1: X D$="n" Y BEEP1:yn \ PQ2 ]5CLSCOL:CLSCOL:0,0;" Question ";s;":" _3,3;q$(s+1)(125});4;3;"(1) ";q$(s+1)(126~214);4;3;"(2) ";q$(s+1)(215303/);30;28 `0:5: iSCROLLUP j923297[,9 *CLSCOL:j=210-1 k+23296[,j:65340<:3:j: lSCROLLDN m523297[,40(:j=021:363k vOK wu.2~L,20:21,0;1;" OK? Press Y (yes) or N (no). ":INKEY:cln:D$="n"yes=0: yD$="y"yes=1: z BEEP1:ok  PRESS T#1;1,0;0;4;1;" Press any key ":INKEY:;:  BEEP1 &H=12:k=15 .01z# =,k+H:k .k=51-1:.02{# =,k+H:k H: PRESSABC Oy=0:d$=" Press key A,B or C ":#1;0;4;:ll+1 INKEY !D$<"a"D$>"c"BEEP1:430 VIEW=D$-"a"+1: VIEW=1,2 OR 3  DBLTX  st=0 D$:D$="#" $LL+1:Y=Y+2:465 DBLPRESS cy=0:d$=" Press any key to continue... ":#1;0;4;:ll:0::;:  TEXT D$:D$="#" ,y,1;d$;:2:y=y+1:text  BOXES P16,0;"EXTREME";25;"EXTREME";2;"(1)";27;"(2)" _Y=2285:6;18,Y;" ";19,Y;" ";20,Y;" ":Y   CHOOSE BOXES &|#1;0,0;6;0;"Press N to move left, M to move right, R when you have decided. " 0:choice=3+(<.5) :BRTBOX DINKEY N d$="r" S UNBRTBOX XNd$="m"choice<6choice=choice+1:.02{# =,-10 :570: ]ND$="n"choice1choice=choice-1:.02{# =,-10 :570: bBEEP1:570: k BRTBOX ley=choice*5-3:1;7;18,y;" ";19,y;" ";20,y;" ": pUNBRTBOX q\y=choice*5-3:6;18,y;" ";19,y;" ";20,y;" ": u INKEY x.23658j\,0:0:D$=:D$"" z@1,0:INKEY:D$="n"inkey:d$="o"inkey:d$="w" |  CLLINES vj=031:10 ,j;" ";11 ,j;" ";12 ,j;" ";13 ,j;" ";14,j;" ":j:y=10 :  INTRO <INTRO:"GOOD QUESTIONS.","By Viv Neary & Martin Hodge","#" S"Copyright M.Hodge 1987","All rights reserved","","This copy is the property of:" E$,F$ "#" pCPAGE:1,9 ;1;"STOP THE TAPE";0:BEEP:Y=3:LLTEXT2:y=8:LLTEXT2:PRESS PPAGE F" This program asks a series of","questions on topics related to",n$ ?" "," The computer keeps a score","and prints messages which" ""reflect the subject's answers." F" "," For details of the questions","and suggestions on how best to" F"use this program, please","consult the ""Good Questions""","Guide." "#" " This program is protected","against accidental pressing of","the BREAK key.",""," However, if at any time the","program should stop with an" ^"'Error Report' at the bottom","of the screen, just press","ENTER for instructions.","#"  6" If you have a printer","attached the messages and" @"results for each person will","be printed out automatically."  A" "," If you do not have a printer","the program will give the" *@"subject an opportunity to copy","down the messages and their" 4"responses.","#" >" ","NOTE:If you have a printer but","have not connected it,you must","switch the computer off before","connecting it and reloading","this program." @=" "," DO YOU HAVE A PRINTER"," CONNECTED? (PRESS Y or N)" C"#" H*PPAGE:PPAGE:CPAGE:Y=5:TEXT:YN RPRINTER=0:YES Wu18,1;"PLEASE CONFIRM THAT A PRINTER";19,3;"IS CONNECTED - Y CONFIRMS":YN:YES \PRINTER=1:PRINTERCHECK  BEEP =J=13:.2~L,0:.2~L,-8:J:  LLTEXT D$:D$="#" LL:Y=Y+3:LLTEXT  LLTEXT2 D$:D$="#" LL:Y=Y+2:LLTEXT2 PRINTERCHECK /CPAGE:940:y=4:TEXT:YN:YES "A short routine to check that","your printer is working","correctly is available."," ","Would you like to check the","printer ? (Y/N)","#" :;:Y=2:TEXT X" This program uses two types of","printer command."," "," One of these is the 'COPY'" S"command. The text you are now","reading should be printing out","at the moment." d" ","IF NOT YOU SHOULD TURN OFF THE","COMPUTER,RE-CONNECT THE PRINTER","AND RE-LOAD THIS PROGRAM." ;"(or ignore the printer and use","the Record Sheet).","#"  :PRESS :''" The other command used is the 'LPRINT' command. A short"'"message should now be printed if this command is working." _''"IF NOT YOU SHOULD TURN OFF THE COMPUTER, RE-CONNECT THE PRINTERAND RE-LOAD THIS PROGRAM." 6"(or ignore the printer and use the Record Sheet)." I''"LPRINT command working correctly"''"YOU CAN TEAR OFF THIS TEST"'''''  PRESS: KBREAKOFF LUERRSP=23613=\+256*23614>\:ERRSP,120x:ERRSP+1,255 V _ PPAGE `CPAGE:Y=3:TEXT:PRESS MAIN START |INTRO cpage 33210 :D$=N$:Y=3:LL:Y=8:TEXT "Please type in the date in" z"","the form 17/6/87 and press","","ENTER.","","(/ is obtained by pressing","","SYMBOL SHIFT and key V)","#" "Date ? ";t$ Vt$>818,1;1;"ENTRY TOO LONG:PLEASE RE-ENTER":3240 T$=""3240 )18,1;"Date: ";t$;31 ok 0yes18,9 ;" ":3240 pmessages=1 x(noq):t(nc) "p$(2,15):l(2) &cpage:3510 :y=8:LLTEXT ,"The program is now ready","to start.","#" press:4000 INSTRUCTIONS SUBROUTINE $cpage:3600:Y=2:TEXT " *** INSTRUCTIONS ***",""," This questionnaire consists","of "+noq+" questions.",""," Some of the questions may","seem funny, but to get a" <"worthwhile result, you must","answer them as honestly as" )p"you can.",""," If you don't think about","your answers and be truthful","it'll be a waste of your time.","#" .lpress:cpage:y=8:text:" Before you start you need to","know how this questionnaire","works.","#" 8npress:cpage:y=1:text:" The computer will ask you a","question like:",""," How are you today ?","#" Bpress:y=6:text L"It will then give you two","extremes of answers you might","make:",""," 1) I feel like death warmed","up",""," 2) I've never felt better in","my life.","#" jPRESS::;:Y=1:TEXT tm" How are you today ?",""," 1) I feel like death warmed","up",""," 2) I've never felt better in","my life." y<"",""," You DO NOT have to choose","one or the other.","#" ~PRESS:CLLINES:TEXT K" You should put yourself in","between them according to how","you feel." "#" BOXES:PRESS:CLLINES:TEXT v" The white square shows where","you are between the two","extremes."," You always start off near the","middle.","#" 9choice=3:brtbox:press:CLLINES:text:150 b" You can move the white square","by pressing N to move left and","M to move right.","#" ~#1;0,0;6;0;"Try pressing key N now";8;8;8;1;"___";0; ƨ#1;6;0;" to move the white square to EXTREME (1).":INKEY:d$"n";:#1;1;"I DID SAY KEY N IF YOU REMEMBER!":BEEP1:3780 Eunbrtbox:choice=choice-1:brtbox:choice13780 I;:Y=0:D$=" WELL DONE!! ":#1;0;4;:LL:BEEP  #1;0,0;6;0;"Now";8;8;8;1;"___";0;" try pressing key M to move the white square to EXTREME (2).":INKEY:d$"m";:#1;1;"I DID SAY KEY M IF YOU REMEMBER!":BEEP1:3790 Eunbrtbox:choice=choice+1:brtbox:choice63790 I;:Y=0:D$=" EXCELLENT!! ":#1;0;4;:LL:BEEP ;:CLLINES:TEXT " For each question you should:","A) Decide where you want to be.","B) Position the white square"," using N and M.","C) Then press key R (Ready).","#" press:cllines:dbltx ?" DO IT NOW FOR THE QUESTION"," GIVEN ABOVE...","#" CHOOSE ?:;:Y=2:D$="Thank you, "+P$(1)(L(1)):LL  j=1choice:d$:j r"like death warmed up","pretty awful?","just a bit rotten?","fairly good?","really fine?","on top of the world?" d$="So you feel "+d$ y=5:ll ("3880(:y=8:dbltx:yn 2b" Do you understand how this"," program works ?",""," Press Y (Yes) or N (No).","#" <yes Fcpage:y=7:D$="Ask someone to help you.":LL:100d:Y=10 :D$="Press a key to see the":LL:Y=12 :D$="instructions again.":LL P0:3600 TEST LOOP :j=12 $17,0;"Type in your "; j=11;"1st"; %j=21;1;"2nd"; /" name and then press the key marked ENTER." g$: ҁg$>1414,0;"The program can only accept up to 14 letters. Please re-enter.":.3,0:4020 g$=""4020 =g$(1)>90Zg$(1)=(g$(1)-32 )  p$(j)=g$  l(j)=g$ Aj=115,0;"Thank you,";P$(1)(̱g$);"." j CHECK NAME &4110:CPAGE:Y=8:LLTEXT e"Your name is:",P$(1)(L(1))+" "+P$(2)(L(2)),"IS THAT CORRECT ? (Y/N)","#" @YN:yes4007 E3600:INSTRUC. J hs=1noq r scrollup |pq2  scrolldn y=143  i(2) CHOOSE :I(1)=6-CHOICE:I(2)=5-I(1) ; &x(s)=i(1) 0it(w(s,1,1,1))=t(w(s,1,1,1))+i(1)*w(s,2,1,1) :it(w(s,1,2,1))=t(w(s,1,2,1))+i(2)*w(s,2,2,1) Dw(s,1,1,2)0t(w(s,1,1,2))=t(w(s,1,1,2))+i(1)*w(s,2,1,2) Nw(s,1,2,2)0t(w(s,1,2,2))=t(w(s,1,2,2))+i(2)*w(s,2,2,2) Xs bmessages7000X cpage /d$="THAT'S THE END OF THIS TEST.":y=10 ll d$="Thank you "+p$(1)  y=15 ll press PRINTER5435; PRINTOUT cpage 5100:Y=8:LLTEXT X"Would you like a print-out","of "+P$(1)(L(1))+"'s results ?","(Y/N)","#" yn yes5435; 2copy=1 Z 5445E d 5360 :" ANSWER BOXES CHOSEN:" :" Qu. Ext. Ext." " No. 1 2" " " j=1noq De$=" ":e$(11 -2*x(j))="":" ";j;7;e$ j נcopy0,175:0,-175:255,0:0,175:6,175:0,-169:243,0:0,169 copy::: copypress  "j=16:.1}L,j:j copy=0 cpage N1,1;"Checking print-out.";2,1;"" ]3,3;"As there is often a lack of";4,1;"clarity with the Sinclair" Z5,1;"printer, you can have the";6,1;"results displayed on the" "S7,1;"screen so that any errors can";8,1;"be rectified." ,L10 ,3;"Is the print-out adequate ?";12 ,13 ;"(Y/N)" 1yn 6yes6000p 7 5445E ;U"Would you like a display","of "+P$(1)(L(1))+"'s results?","(Y/N)","#" <&CPAGE:5435;:y=8:LLTEXT =yn >copy=0 @yes6000p EPRINT/DISPLAY G :copy H:" ";n$;" Date:";t$: J7" Name:"'" ";p$(1)(l(1));" ";p$(2) T :" CATEGORIES TOTALS" Y" " ^j=1nc h" ";c$(j);t(j) rj wcopy0,0:0,175:255,0:0,-175:6,0:0,169:243,0:0,-169 |copypress copy  5310 copy pANYONE ELSE zCPAGE 6020:y=9 :LLTEXT 4"Would you like to test","anyone else ? (Y/N)","#" YN:YES3500 dANYTHING ELSE cpage 6550:y=9 :LLTEXT @"Do you require anything else","from this program ? (Y/N)","#" yn yesg  9200# WMESSAGES X,5::;:7000X:Y=0:DBLTX ]H" This program has been finding","out about your attitude to:"," ","#" bRJ=1̺(NC/2):D$=(64@+J)+") "+A$(J):LL+1:Y=Y+2:J eJ=1:7400 gY=20:D$="FOR SOME THOUGHTS ON THESE":LL:Y=0:D$="DIFFERENT TOPICS, PRESS A KEY...":#1;5;0;:LL:0 l:; qJPRINTER"NAME:";P$(1)(L(1));" ";P$(2)'"DATE:";T$''N$ v;ST=0:TX=8000@:J=1̺(NC/2):;:TX D$:Y=0:LL+1 D$:Y=2:LL+1 D$=B$:Y=4:LL+1 jt(j*2-1)>m(j*2-1)*percent/100dg$=q$(noq+j+1)(96`):7100 dt(j*2)>m(j*2)*percent/100dg$=q$(noq+j+1)(101e196):7100 +g$=q$(noq+j+1)(201296() (k=02:y=7+k*2 /d$=g$(k*32 +1k*32 +32 ) ll:k 7jɺ(nc/2)J=J+1:7400:J=J-1 7130:y=14:dbltx z" What do you think of this ?"," A) Completely agree."," B) Not quite true, not far off."," C) Completely disagree.","#"  PRESSABC  1;1;7,0;10 ;9 ;8;7;6;;5;31;" ";VIEW*2+14,0;10 ;5;31;" " PRINTER7200  y#1;1;6;1;0,0;" COPY DOWN YOUR MESSAGE & RECORD YOUR ANSWER-THEN PRESS A KEY. " ""7195 =""7196 0:TX=TX+10 :TX=8040hTX=8000@ J:;:  +'"CATEGORY:"'A$(J)''"COMPUTER'S MESSAGE:" %DK=02:g$(k*32 +1k*32 +32 ):K: *!D$=P$(1)(L(1))+" " 4*VIEW=1D$=D$+"completely agrees." >&VIEW=2D$=D$+"partly agrees." H-VIEW=3D$=D$+"completely disagrees." R)'d$''"********************************"  :J::: 2CPAGE:Y=6:D$="Tear off your results":ll beep: REJIG A$ TO FIT TEXT OB$=A$(J):H=1̱B$:X=B$(H):X65AX90ZB$(H)=(X+32 ) X=46.B$(H)=":" H: @?"Your answers to the questions","suggest that in relation to" J?"Looking at your results it","would seem that in the area of" TD"From your answers is it fair to","say that when it comes down to" ^?"The way you answered the","questions seems to show that for" "_ GOTO G: "` :BREAKOFF "jG0,0;1;"RE-ENTRY POINTS";0,27;"PRESS" "~34,0;"Preparing for a test 1" "36,0;"In the middle of testing 2" "38,0;"Printing the results 3" "410 ,0;"Displaying the results 4" " 0 "="1"3200 "="2":4440X "="3"5090 "="4"5435; " 8910" # START # :*"M";1;"Sampleli" #E$="M":F$="H":90102# #'FINAL COPY START #(-J="23653"+"256"*"23654":Y=(*"256") #-" ""23552"-Y,J-"23500"+Y #2BREAKOFF=1100L:BREAKOFF #; VARS #< HH=60< #@WASH COLOUR #ACLSCOL=2 #FBORDCOL=1 #Gcopy=0 #Hll=105i #JLLTEXT=920 #KLLTEXT2=930 #Pbord=3073:ok=375w #Q?cpage=320@:PPAGE=1120`:ln=21:cln=315; #R6j=17:"a"+j,0:j:"a",255 #Vpress=400 #Wg=8800`" #Z(scrolldn=365m:scrollup=362j #[yn=341U:pq2=349] #\beep1=410 #]236099\,30 #d$PRESSABC=420:text=490 #e#BOXES=510:CHOOSE=540 #f%dbltx=460:dblpress=480 #g7INKEY=630v:BRTBOX=620l:UNBRTBOX=625q #hCLLINES=640 #i$0:0:0:0 #jINTRO=700 #kBEEP=900 #lPRINTERCHECK=940 #n9070n#:j=015:k:"b"+j,k:j:0,126~,66B,66B,66B,66B,126~,0,0,126~,126~,126~,126~,126~,126~,0 # 3000 #ENTER NAME #K"LINE ";(J)'">>";D$:D$>30'"LENGTH:";D$:410:9097# # #CASSETTE SAVE #W23658j\,0::"ENTER NAME AND ADDRESS IN 2"'"LINES (CHECKED FOR 30 CHARS):" #J=1:9097#:E$=D$ #J=2:9097#:F$=D$ # :E$'F$: #/#1;"OK?":630v:D$="n"9100# #O:'"SELECT"''" 1 LIFESKILLS"''" 2 LAWBREAKING"''" 3 SAMPLE" #*0:D$=:D$<"1"D$>"3"9150# #"9190#:J=1̰D$:D$:J #*"m";1;""+D$+"" #܎S=9120#:G=9000(#::"PRESS A KEY "'"GOTO G "'"TO RESAVE: STOP N O W & GOTO S":0:: #""Lifeskil","Lawbreak","Sampleli" $ END $1:1:: $+I=56:y=20:9300T$ $k=19 $I:k>63 $ )d$:ll:A=3280 :A=3280 :K $I: $T"REWIND THE TAPE","FOR NEXT TIME","--------","PROGRAM SWITCHING OFF","IN "+(45--7*I)+" SECONDS","","-----"," M.Hodge 1987","-----" &GFINAL SAVE &H:D$="GOODQBASIC" &R J=1 &W 9830f& &\ "M";J;D$ &f*"M";J;D$9100# &p *"M";J;D$: & SAVE &,:Q$="GQBASIC":"ENTER ";(Q$);" NUMBER:";N &J=132 &"M";J;Q$+(N-2) &**"M";J;Q$+N8970 #:*"M";J;Q$+N:J '*"M";1;"Lifeskil" d ESocial Services, The Granary,FScunthorpe, SOUTH HUMBERSIDE.DLifeskillkdeVMIndependence Reliance Laziness Energy Good budgeting Bad budgeting Self-control Temper loss Good negotiation Bad negotiation Throwaway 13 11 Lifeskills67 How do you handle your wages,dole or pocket money ? Choose the square which is closest to the truth..... I spend my money as soon as I get it and end up broke formost of the week. I always plan down to thelast penny and never run out of money before the next payday. 6*2*5*1*2*1*2*1* Your mates are winding you upby calling you a new nickname which you really hate.How do youreact? You control your anger & go along with the joke until they get fed up with it. You completely lose your temper,hit someone and/or burst into tears and run away. 7*9*8*10*2*1*2*1* If you could decide,where would you place yourself on a scale between...... 2O years old,fit,good- looking but without money or a job. 45 years old,fat,ugly and very,very rich. 11*0*11*0*1*0*1*0* How do you manage at getting up in the mornings ? I always get myself up, make my own breakfast and get toschool or work on time. Someone has to get me up and chase me round or I'd just stay in bed all morning. 1*4*2*3*3*1*3*1* If someone was to ask you how much it costs to feed you for a week,how accurately could you answer ? I'd know how much it costs to the nearest 5Op. Haven't got a clue,I've never really thought about it. 5*1*6*2*3*2*3*2* A traffic warden stops you onyour bike,pokes you in the chestand shouts- "YOU STUPID GIT!! CAN'T YOU READ?" What do you do?Smack him in the teeth, jump on his head and ride off. Take a deep breath,count to ten and ask him politely whatseems to be the problem. 8*10*7*9*2*1*2*1* Do you find it easy to forgetthings that have made you feel unhappy ? Choose between these extremes.. Yes,I can put them out of my mind right away. No,they remain as painfulas they were the day that they happened. 11*0*11*0*1*0*1*0* Your friend has a party when his Mum and Dad are away.He'll need help clearing up the mess. What do you think you would do ?Stay in bed until lunchtime and leave it all to him... Get round there at 8 a.m.with a spare hoover and help until the the work is finished. 3*2*4*1*2*1*2*1* Who washes,irons and mends your clothes ? Being as honest as you can, choose the square nearest to what's true for you. I do all these things myself. Someone else does all these things for me. 1*4*2*3*2*1*2*1* Would you go a long way to buy food at a cheap supermarket or nip round to the local shop though it's a real rip-off ? I'd buy everything at thelocal shop;it saves the bother of transport and thinking ahead.I'd buy everything at thesupermarket and make my money gofurther despite the hassle. 6*3*5*4*2*1*2*1* You are on a train and find you've lost your ticket,the ticket collector says you are a liar. How do you handle it ? You get angry and scared,tell him to "____ off" and make a run for it. You calmly insist that you really have lost it and givehim your name and address. 10*8*9*7*3*1*3*1* Have you enjoyed answering these questions and did you think it was of any value to you ? Yes,I really enjoyed it, it made me think about what sortof person I am. No,it was a tedious, pointless waste of time. 11*0*11*0*1*0*1*0* Did you answer the questions honestly ? No,my answers were all lies and fantasy. Yes,I was completely honest all the way through. 11*0*11*0*1*0*1*0* You seem to be very good at looking after yourself and couldprobably manage OK on your own. You seem to think its alright for others to look after you. Perhaps you're spoilt & selfish? You're not too bad at looking after yourself but perhaps you could try and do a bit more. You're fairly lazy. In fact, I'm amazed you got this far. PULL YOUR FINGER OUT ! You are a hard-working, energetic go-getter.Perhaps you ought to relax a bit more. You don't seem to mind hard work if there's something in it for you. You seem to handle money with great care and skill.Can you lend me a fiver until Friday ? You look like a disaster area around money! Do you really wantto be in a such a mess. You're not too bad at money- matters but you probably won't become a bank manager. You have a wonderful control over your temper and may well end up as a Saint. You seem to have a real problem controlling your temper.This could get you into trouble. You've got a temper but most of the time you seem to have it under control. You often get what you want bybeing good with words. Perhaps others see you as a con-man? Life would be easier for you if you learned to talk through problems. You do have the ability to talk your way round problems butthere's room for improvement. 45 45 25 25 35 35 25 25 25 25 40  Independence Reliance Laziness Energy Good budgeting Bad budgeting Self-control Temper loss Good negotiation Bad negotiation Throwaway # I  o ercenC           : --##(N N S W N Lifeskills.Independence. Laziness and energy. Budgeting your money. Controlling your anger. Negotiating skills. ZNg(#yg  p\23552\ 23500[ \p '