ICH WUENSCHE MEINE MITMENSCHEN WUERDEN MIR MEHR MUT MACHEN
Ihre Antwort: ....
Zeichensatz UTF-8+Z1013()-CTRL()-ohne Umlaute(äöüß)
1 OUTC.12
5 A=H.(3F00);PO.A,231;PO.A+1,4;PO.A+2,50;PO.A+3,255
6 PO.A+4,62;PO.A+5,201
15 TAB(320)
20 PR." Der"
25 TAB(64)
30 PR." Persoenlichkeits"
35 TAB(64)
40 PR." test"
45 FORA=1TO5000;N.A
50 OUTC.12
52 TAB(517);PR."SIND SIE SELBSTSICHER?"
55 FORA=H.(EE25)TOH.(EE3B)
57 PO.A,248
59 N.A
75 FORA=1TO5000;N.A
80 OUTC.12
85 TAB(896)
90 PR."Entscheiden Sie sich spontan!"
95 PR."Sie haben nur 10 sec. Zeit"
100 PO.27,H.(40)
101 PO.28,H.(EC)
102 PO.29,H.(E0)
103 PO.30,H.(EC)
110 PO.H.(3EF0),H.(E7);PO.H.(3EF1),H.(B);PO.H.(3EF2),H.(C9)
120 C.H.(3EF0)
150 GOS.1000
190 L=0
200 PR."ICH WUENSCHE MEINE MITMENSCHEN"
201 PR."WUERDEN MIR MEHR MUT MACHEN"
205 GOS.X
210 PR."ICH FUEHLE MICH BERUFLICH"
211 PR."UEBERFORDERT."
212 GOS.X
220 PR."WENN ICH AN MEINE ZUKUNFT DENKE"
221 PR.",HABE ICH EIN UNGUTES GEFUEHL."
222 GOS.X
230 PR."VIELE LEUTE FINDEN MICH WENIG"
231 PR."SYMPATHISCH."
232 GOS.X
240 PR."ICH HABE WENIGER TATKRAFT UND"
241 PR."INITIATIVE ALS ANDERE."
242 GOS.X
245 REM VORLAEFIGER ABBRUCH
250 PR."ICH DENKE DARUEBER NACH OB ALLE"
251 PR."MEINE GEDANKEN NORMAL SIND."
252 GOS.X
260 PR."ICH HABE ANGST MICH ZU BLAMIE- REN"
265 GOS.X
270 PR."ANDERE LEUTE SEHEN BESSER AUS"
271 PR."ALS ICH."
275 GOS.X
280 PR."ICH HABE ANGST VOR FREMDEN MEN-"
281 PR."SCHEN EINE REDE ZU HALTEN."
285 GOS.X
290 PR."VIELES,WAS ICH ANPACKE,GEHT SCHIEF."
295 GOS.X
300 PR."ICH WUERDE GERNE WISSEN WIE"
301 PR."MAN SICH MIT ANDEREN MENSCHEN NETT UNTERHALTEN KANN."
305 GOS.X
310 PR."ICH HAETTE GERNE MEHR SELBST- VERTRAUEN."
315 GOS.X
320 PR."ICH UEBERLEGE,WIE ICH MEHR "
321 PR."ANERKENNUNG BEI MEINEN MITMEN- SCHEN FINDEN KANN."
325 GOS.X
330 PR."ICH BIN ZU BESCHEIDEN."
335 GOS.X
340 PR."ICH BIN EITEL."
345 GOS.X
350 PR."ICH WERDE VON DEN MEISTEN LEU-"
351 PR."TEN NICHT RICHTIG EINGESCHAETZT"
355 GOS.X
360 PR."MIR FEHLT JEMAND MIT DEM ICH "
361 PR."UEBER PERSOEHNLICHE DINGE REDEN KANN."
365 GOS.X
370 PR."MAN ERWARTET ZUVIEL VON MIR."
375 GOS.X
380 PR."MAN INTERESSIERT SICH ZUWENIG"
381 PR."FUER DAS,WAS ICH LEISTE."
385 GOS.X
390 PR."ICH WERDE LEICHT VERLEGEN."
395 GOS.X
400 PR."ICH HABE DAS GEFUEHL,DASS DIE"
401 PR."MEISTEN MENSCHEN MICH NICHT VERSTEHEN."
405 GOS.X
410 PR."ICH FUEHLE MICH IN MEINER UM- GEBUNG NICHT GEBORGEN."
415 GOS.X
420 PR."ICH MACHE MIR OFT UNBEGRUENDET SORGEN."
425 GOS.X
430 PR."ICH HABE EIN UNBEHAGLICHES GE- "
431 PR."FUEHL,WENN ICH EINEN RAUM BE-"
432 PR."TRETE,IN DEM SICH SCHON VIELE"
433 PR."PERSONEN BEFINDEN."
435 GOS.X
440 PR."ICH HABE DAS GEFUEHL,DASS MAN"
441 PR."HINTER MEINEN RUECKEN UEBER"
442 PR."MICH SPRICHT."
445 GOS.X
450 PR."ICH FUEHLE MICH NICHT SO RECHT WOHL IN MEINER HAUT."
455 GOS.X
460 PR."ICH GLAUBE,DASS ANDEREN MEN-"
461 PR."SCHEN FAST ALLES LEICHTER FAELLT ALS MIR."
465 GOS.X
470 PR."ICH HABE DIE BEFUERCHTUNG,DASS"
471 PR."MIR ETWAS UNANGENEHMES ZU- STOSSEN KOENNTE."
475 GOS.X
480 PR."ICH DENKE DARUEBER NACH,WIE "
481 PR."SICH MEINE MITMENSCHEN MIR"
482 PR."GEGENUEBER VERHALTEN."
485 GOS.X
490 PR."ICH WAERE GERN KONTAKTFREUDIGER"
495 GOS.X
500 PR."IN DISKUSSIONEN SAGE ICH NUR"
501 PR."DANN ETWAS,WENN ICH VON SEINER"
502 PR."RICHTIGKEIT UEBERZEUGT BIN."
505 GOS.X
510 PR."ICH DENKE DARUEBER NACH,OB ICH"
511 PR."DIEERWARTUNGEN DER GESELLSCHAFT ERFUELLEN KANN."
515 GOS.X
600 PO.27,0
610 PO.28,H.(EC)
620 PO.29,0
630 PO.30,H.(F0)
631 PO.H.(3EF0),H.(E7);PO.H.(3EF1),H.(B);PO.H.(3EF2),H.(C9)
640 C.H.(3EF0)
644 OUTC.12
650 G.8000
1000 FORA=H.(ED82)TOH.(EF22)STEP32
1010 PO.A,244
1020 NEX.A
1030 FORA=H.(EF43)TOH.(EF5F)
1040 PO.A,238
1050 NEX.A
1060 PO.H.(EF27),251
1070 PO.H.(EF21),48
1080 PO.H.(EF06),110;PO.H.(EF07),105;PO.H.(EF08),101
1090 FORA=H.(EEEC)TOH.(EF2C)STEP32
1100 PO.A,198
1110 NEXTA
1120 PO.H.(EEC1),49
1130 PO.H.(EEC9),115;PO.H.(EECA),101;PO.H.(EECB),108
1140 PO.H.(EECC),116;PO.H.(EECD),101;PO.H.(EECE),110
1150 FORA=H.(EE91)TOH.(EF31)STEP32
1160 PO.A,198
1170 NEX.A
1180 PO.H.(EE61),50
1190 PO.H.(EE6D),109;PO.H.(EE6E),97;PO.H.(EE6F),110
1200 PO.H.(EE70),99;PO.H.(EE71),104;PO.H.(EE72),109
1210 PO.H.(EE73),97;PO.H.(EE74),108
1220 FORA=H.(EE36)TOH.(EF36)STEP32
1222 PO.A,198
1223 NEX.A
1230 FORA=H.(EDDB)TOH.(EF3B)STEP32
1240 PO.A,198
1250 NEX.A
1260 PO.H.(EE01),51;PO.H.(EE15),111;PO.H.(EE16),102
1270 PO.H.(EE17),116
1280 PO.H.(EDA1),52;PO.H.(EDB8),115;PO.H.(EDB9),101
1290 PO.H.(EDBA),104;PO.H.(EDBB),114;PO.H.(EDBD),111
1300 PO.H.(EDBE),102;PO.H.(EDBF),116
1310 FORA=H.(EDA3)TOH.(EDB7)
1320 PO.A,222
1330 NEX.A
1340 FORA=H.(EE03)TOH.(EE14)
1350 PO.A,222
1360 NEX.A
1370 FORA=H.(EE63)TOH.(EE6C)
1380 PO.A,222
1390 NEX.A
1400 FORA=H.(EEC3)TOH.(EEC8)
1410 PO.A,222
1420 NEX.A
1430 PO.H.(ED21),68
1440 FORA=H.(ED41)TOH.(ED5F)
1450 PO.A,158
1460 NEX.A
1470 PO.H.(ED22),97;PO.H.(ED23),115;PO.H.(ED25),80
1480 PO.H.(ED26),114;PO.H.(ED27),111;PO.H.(ED29),108
1490 PO.H.(ED28),98
1500 PO.H.(ED2A),101;PO.H.(ED2B),109;PO.H.(ED2D),98
1510 PO.H.(ED2E),101;PO.H.(ED2F),115;PO.H.(ED30),99
1520 PO.H.(ED31),104;PO.H.(ED32),97;PO.H.(ED33),101
1530 PO.H.(ED34),102;PO.H.(ED35),116;PO.H.(ED36),105
1540 PO.H.(ED37),103;PO.H.(ED38),116;PO.H.(ED3A),109
1550 PO.H.(ED3B),105;PO.H.(ED3C),99;PO.H.(ED3D),104
1560 PO.H.(ED3F),63
1570 FORA=H.(EC00)TOH.(EC1F)STEP2
1580 PO.A,203
1590 NEX.A
1600 FORA=H.(ECE0)TOH.(ECFF)STEP2
1610 PO.A,203
1620 NEX.A
1700 G.5000
2000 FORB=1TO10
2200 FORC=1TO1000
2210 NEX.C
3033 PR." "
4990 F.B=H.(EFE0)TOH.(EFFF);PO.B,32;N.B
5000 F.B=H.(EFE0)TOH.(EFFF)
5005 IFB=H.(EFE6)B=H.(EFF9)
5010 PO.B,255;NEXTB
5020 F.A=1TO9;PO.H.(EFEF),48+A
5030 PO.H.(EFE5)+A,255
5040 PO.H.(EFF9)-A,255
5050 F.B=0TO2000;N.B
5060 REM TAST ABFRAGE
5061 C.H.(3F00)
5065 D=PE.(H.(3EFF))
5067 PO.H.(ECB6),D
5070 IFD#0G.5210
5075 N.A
5095 L=L+4
5110 PO.H.(EFEF),255
5130 F.B=H.(EFE0)TOH.(EFFF)
5140 PO.B,32
5145 NEXTB
5150 F.C=1TO99;NEXTC
5160 F.B=H.(EFE0)TOH.(EFFF)
5165 PO.B,255;NEXTB
5180 A=H.(EFEC)
5190 PO.A,80;PO.A+1,69;PO.A+2,67;PO.A+3,72
5205 G.5220
5210 L=L+D-48
5220 F.A=0TO3000;N.A
5230 RET.
6000 TAB(8)
6001 PR."Ihre Antwort:"
6002 GOS.4990
6005 OUTC.12
6010 RETURN
8000 G.8001
8001 TAB(11);PR."AUSWERTUNG"
8002 TAB(11);PR.""
8030 TAB(32)
8032 PR."COMPUTER an Testperson:"
8033 PR." "
8034 PR."in Auswertung des PSYCHO-Tests"
8036 PR."ergab sich IHR KOEFFIZIENT der Selbstsicherheit:",L
8040 PR." "
8050 IFL>=0IFL<=12GOS.8500
8052 IFL>=13IFL<=25GOS.8600
8054 IFL>=26IFL<=40GOS.8700
8056 IFL>=41IFL<=59GOS.8800
8058 IFL>=60GOS.8900
8060 STOP
8500 PR."D.h.: Sie besitzen ein ueber- "
8501 PR."steigertes Selbstbewusstsein!!!"
8505 PR."Sie sind mir nicht sehr sympatisch !"
8506 PR." "
8510 PR."Aendern Sie sich"
8512 PR." "
8520 PR."DA ICH ABER WEISS,DASS SIE DAS NICHT INTERESSIERT,"
8525 PR." "
8530 PR."WUENSCHE ICH EINEN GUTEN TAG"
8550 STOP
8600 PR."D.h.:Sie haben ein stark ausge-"
8610 PR."praegtes SELBSTBEWUSSTSEIN !"
8620 PR."Sie beschaeftigen sich selten damit,wie SIE auf"
8630 PR."andere wirken,haben aber auch "
8640 PR."kein uebersteigertes Geltungs-"
8650 PR."beduerfnis oder Verlangen nach Lob und Tadel."
8660 PR."keine SelbstZweifel oder Minder wertigkeitsgefuehle
8670 PR."OPTIMALER CharakterZug MACHEN SIE WEITER SO!"
8680 TAB(10)
8690 PR."DER COMPUTER"
8695 STOP
8700 PR."D.h.:Sie haben ein nur durch- schnittliches Selbstb."
8710 PR."Sie brauchen Lob und Tadel als Ansporn Ihrer Arbeit."
8720 PR."Ab und zu werden Sie von Min-"
8730 PR."derwertigkeitsgefuehlen und Selbstzweifeln geplagt"
8740 PR."Versuchen Sie Ihre Selbstsicher heit zu verbessern!!!"
8760 PR." TIPS ZUR STEIGERUNG IHRER SELBSTSICHERHEIT"
8770 PR."FINDEN SIE DIE URSACHEN IHRER UNSICHERHEIT."
8775 PR."TRAINIEREN SIE DIESE SCHWAECHEN"
8777 PR."VERBESSERN SIE IHRE VORZUEGE SO"
8778 PR."DASS SCHWAECHEN UNWESENTLICH WERDEN"
8779 PR."FREUEN SIE SICH UEBER EIGENE"
8780 PR."GUTE LEISTUNGEN,DASS IST WICH-"
8781 PR."TIGER ALS DAS URTEIL ANDERER "
8782 PR."PROBIEREN SIE ES--DER Computer"
8790 STOP
8800 G.8700
8900 PR."D.h.:Selbstsicherheit ist Ihr zentrales Problem"
8910 PR."Die Wirkung auf Mitmenschen be-"
8920 PR."schaeftigt Sie oft.SIE wuerden"
8930 PR."gern selbstsicherer,unkompli-"
8940 PR."zierter und innerlich freier "
8950 PR."sein.Verlassen Sie sich auf "
8960 PR."MICH,ich helfe Ihnen!"
8970 PR."TIPS ZUR STEIGERUNG DER SELBSTSICHERHEIT"
8980 PR."1.Machen Sie sich von anderen Meinungen frei."
8990 PR."2.Handeln Sie nie gegen Ihre "
9000 PR."persoenliche Ueberzeugung."
9010 PR."Kneifen Sie nicht vor Problemen"
9020 PR."Fehlen im Beruf die Moeglich-"
9030 PR."keiten,schaffen Sie sich ein"
9040 PR."HOBBY,das Sie zufrieden macht und Ausgleich bietet."
9050 PR."Vergleichen Sie sich nicht zu"
9060 PR."haeufig mit ANDEREN,dass schaedigt Sie !"
9070 PR."GUTE BESSERUNG--DER COMPUTER"