Î*– èA´1000:ˆ20:Ž ### VIC ### ² òŽ INITIALISIERUNG+TITEL è üHT´HO:VT´VE:L6´0:D6´0:FF´0:F´0:TA´0:R´0:WA´0:WT´0 !VE´3:HO´·((HT­19)¯2):Œ110 )!ž"  VIC - INTERVIEW":VE´4:Œ110 D!ž"-------------------" c!$VE´12:HO´·((HT­30)¯2):Œ110 ‰!.ž"ICH MUSS MICH MAL KURZ KONZEN-" ¤!8VE´14:Œ110:ž"TRIEREN." ¹!BEA´50:FA´50:GA´3 Î!LŽ DATA'S ZAEHLEN Ø!VŒ2780 ù!`…B(200),E$(EA),F$(FA),S$(SA) "j…S(SA,GA),T$(TK¬TN),T2$(TK) 4"t…TV$(TV),TF$(TF),Z(10) k"~Œ2660:F$´"HALLO, ICH HEISSE VIC ! WIE HEISST DU ?" t"ˆŒ100 ”"’VE´3 ¦9:HO´3:Œ110:ž"*":‚VE ·"œHO´3 ¦HT­3:VE´9:Œ110:ž"*":‚HO Þ"¦VE´9 ¦3 «­1:HO´HT­3:Œ110:ž"*":‚VE #°HO´HT­3 ¦3 «­1:VE´3:Œ110:ž"*":‚HO +#ºVE´VT­9 ¦VT­3:HO´3:Œ110:ž"*":‚VE Q#ÄHO´3 ¦HT­3:VE´VT­3:Œ110:ž"*":‚HO z#ÎVE´VT­3 ¦VT­9 «­1:HO´HT­3:Œ110:ž"*" ‚#Ø‚VE ¬#âHO´HT­3 ¦3 «­1:VE´VT­9:Œ110:ž"*":‚HO Ï#ìVE´1 ¦VT­1:HO´1:Œ110:ž"#":‚VE õ#öHO´2 ¦HT­1:VE´VT­1:Œ110:ž"#":‚HO $ VE´VT­1 ¦1 «­1:HO´HT­1:Œ110:ž"#":‚VE F$
HO´HT­1 ¦1 «­1:VE´1:Œ110:ž"#":‚HO d$VE´3:HO´·((HT­23)¯2):Œ110 ƒ$ž"*** VIC - INTERVIEW ***" $(Œ2440 —$2Œ1690 ¤$<N$´E$(W) ß$FF$´"ERZAEHL MIR ETWAS VON DIR UND DEINER FAMILIE, "¬N$ é$Pˆ1640 ÿ$ZŽ INPUT+VERGLEICH 	%dŒ1690 7%nI´0 ¦W:B´Ë(E$(I))­65:Š(Bµ0)²(B³25) ©1480 M%xS´B(B):ŠS´0 ©1480 Z%‚S´S ¦SA …%ŒŠS(S,0)³TK ©Z$´Í(E$(I),È(S$(S))):ˆ1440 ’%–Z$´E$(I) §% ŠZ$µ´S$(S) ©1460 ´%ª‚S:ˆ1480 È%´ŠZ$µS$(S) ©1480 Ò%¾Œ2260 Ù%È‚I ó%ÒŽ OUTPUT VORBEREITUNG &ÜŠFF´0 ©1530 &æFF´0:ŠTF³0 ©TF´TF­1 0&ðF$´TF$(TF):ˆ1640 G&úŠ(W³1)²(F³0) ©1550 q&F$´"MACH EINEN RICHTIGEN SATZ!":ˆ1640 €&ŠFµ1 ©1580 ¢&F$´F$(F):F$(F)´"":F´F­1:ˆ1640 Ä&"Ž VERLEGENHEITSFRAGEN STELLEN Ô&,ŠTAµ3 ©1610 '6F$´"SO, NUN MACH ICH SCHLUSS. TSCHUESS "¬N$¬"." #'@Œ2440:SD´200:Œ450:Œ950 L'JŒ260:T´·(RV®TV¬0.5):ŠTV$(T)´"" ©1610 l'TTA´TA¬1:F$´TV$(T):TV$(T)´"" '^Ž FRAGE AUSGEBEN ‹'hŒ2440 •'rˆ1380 ¤'|Ž ROUTINEN °'†Ž INPUT ¾'Ž EINGABE Ì'šE´0:E$´"" Ü'¤ŠD6´0 ©D6´1  (®VE´VT­7 ¦VT­5:HO´5 ¦HT­4:Œ110 (¸ž" ":‚HO:‚VE ,(ÂVE´VT­7:HO´5:Œ110:ž"-" K(ÌŒ200:A$´Ì(IN):ŠA$´"" ©1740 ](ÖŠINµ³28 ©1840 l(àŠEµ1 ©1740 ˜(êŠ(VE´VT­5)±(HO´HT­6)±(R´1) ©HO´HT­5:R´0 ¦(ôŒ110:ž" " Í(þŠ(VE´VT­5)±(HO´5) ©VE´VT­6:HO´HT­4 ô(Š(VE´VT­6)±(HO´5) ©VE´VT­7:HO´HT­4 )E´E­1:HO´HO­1:Œ110 )E$´Í(E$,E):ž"-" ))&ˆ1740 <)0ŠIN´13 ©A$´"." Y):Š(A$µ" ")²(A$³"Z") ©1740 q)DE$´E$¬A$:E´E¬1:Œ110 ‹)NžA$:HO´HO¬1:Œ110:ž"-" ¨)XŠ(A$´"!")²(A$´".") ©1990 À)bŠA$´"?" ©FF´1:ˆ1990 à)lŠ(HOµHT­4)²(VEµ³VT­7) ©1920 û)vŒ110:ž" ":HO´5:VE´VT­6 *€Š(HOµHT­4)²(VEµ³VT­6) ©1940 6*ŠŒ110:ž" ":HO´5:VE´VT­5 D*”Œ110:ž"-" e*žŠ(HOµ³HT­5)²(VEµ³VT­5) ©1970 †*¨E´E­1:HO´HO­1:E$´Í(E$,E):R´1 *²ˆ1740 ¨*¼Ž IN WORTE ZERLEGEN ´*ÆŠEµ1 © Ú*ÐW´­1:I´1 ¦E:A$´Ï(E$,I,1):B´Ë(A$) +ÚŠ((B³64)±(Bµ91))²((B³47)±(Bµ58)) ©2050 +äŠ(WA´0)²(WT´1) ©2070 4+îŠB´45 ©WT´1:ˆ2070 C+øWA´0:ˆ2070 m+ŠWA´0 ©WA´1:W´W¬1:E$(W)´"":ŠW³EA­1 © €+E$(W)´E$(W)¬A$ ‡+‚I ¬+ Ž 1.PERS. ERSETZEN DURCH 2.PERS. Ê+*I´0 ¦W:ŠÈ(E$(I))³6 ©2220 Ü+4Z$´Í(E$(I),4) ü+>ŠZ$´"ICH" ©E$(I)´"DU":ˆ2190 ,HŠZ$´"DU" ©E$(I)´"ICH":ˆ2190 1,RŠZ$´"MICH" ©2210 F,\ŠZ$´"DICH" ©2200 [,fŠZ$´"MEIN" ©2210 p,pŠZ$´"DEIN" ©2200 „,zŠZ$´"MIR" ©2210 ˜,„ŠZ$´"DIR" ©2200 ¢,Žˆ2220 Ê,˜E$(I)´"M"¬Î(E$(I),È(E$(I))­1):ˆ2220 ì,¢E$(I)´"D"¬Î(E$(I),È(E$(I))­1) ó,¬‚I -¶Ž DRUCKEN -À  -ÊŽ FRAGEN VORBEREITEN /-ÔŠF³FA­1 © Q-ÞŽ NICHT BENUTZTE TEXTE SUCHEN ƒ-èZ´0:J´0 ¦GA:T´S(S,J):ŠT$(T)³"" ©Z(Z)´T:Z´Z¬1 Š-ò‚J –-üŠZ´0 © »-	Œ260:T´Z(RV®Z):Š(Tµ´TK)±(I´W) © Ì-	Ž TEXT HOLEN ô-	F´F¬1:F$(F)´T$(T):T$(T)´"":ŠT³TK © .$	Ž TEXT-KOMPOSITION 5..	Š(E$(I¬1)´"ICH")²(E$(I¬1)´"DU") ©2370 I.8	J´I¬1 ¦W:ˆ2380 a.B	J´0 ¦W:ŠJ´I ©J´J¬2 Ž.L	Š(E$(J)´"UND")²(E$(J)´"ODER") ©J´W:ˆ2400 ¨.V	F$(F)´F$(F)¬" "¬E$(J) ¯.`	‚J Ê.j	F$(F)´F$(F)¬" "¬T2$(T) Ð.t	 ã.~	Ž BS EDITIEREN ó.ˆ	ŠL6´0 ©L6´1 /’	VE´5 ¦8:HO´5 ¦HT­5:Œ110:ž" " "/œ	‚HO:‚VE ,/¦	X$´F$ :/°	VE´5:HO´4 C/º	Z´29 a/Ä	Z$´Ï(F$,Z,1):ŠZ$´"" ©2530 u/Î	ŠË(Z$)µ65 ©2530 …/Ø	Z´Z­1:ˆ2500 ”/â	Z$´Í(F$,Z)  /ì	H´1 ¦Z Ã/ö	HO´HO¬1:ŠHO´HT­4 ©VE´VE¬1:HO´5 Ì/ 
Œ110 ç/

žÏ(Z$,H,1):A´1 ¦10:‚A û/
ŠHOµHT­10 ©2600 0
ŠÏ(Z$,H,1)´" " ©HO´HT­5 0(
‚H 202
ŠZ³´È(F$) ©2630 Q0<
F$´Ï(F$,Z¬1):ŠF$µ³"" ©2490 [0F
HO´10 a0P
 t0Z
Ž DATA'S LESEN œ0d
‹:I´1 ¦SA:†S$(I):J´0:B´Ë(S$(I))­65 °0n
ŠB(B)´0 ©B(B)´I Â0x
†Z:ŠZ´0 ©2700 ç0‚
S(I,J)´¸(Z)­TK®(Z³0):J´J¬1:ˆ2680 ò0Œ
‚I:†Z$ 1–
I´TK¬1 ¦TK¬TN:†T$(I):‚I:†Z$ 51 
I´1 ¦TK:†T$(I),T2$(I):‚I:†Z$ S1ª
I´0 ¦TV­1:†TV$(I):‚I:†Z$ q1´
I´0 ¦TF­1:†TF$(I):‚I:†Z$ ”1¾
ŠZ$µ³"$" ©ž" DATA FEHLER":ˆ950 š1È
 ¯1Ò
Ž DATA'S ZAEHLEN Ï1Ü
Œ2810:SA´Z:Œ2810:TN´Z:Œ2810 å1æ
TK´Z¯2:Œ2810:TV´Z ö1ð
Œ2810:TF´Z: þ1ú
Z´0 2†Z$:ŠZ$´"$" © :2A´Ë(Z$):Š(A³57)²(Aµ45)²(A´46) ©Z´Z¬1 D2ˆ2820 J2¨aŽ d2²aŽ --- DATA-ZEILEN --- ‡2¼aƒ"AERGER",14,25,0,"ARM",2,22,0 ¼2Æaƒ"BIN",-1,-12,-13,-19,0,"BIST",-17,-35,-37,-38,0 Ó2Ðaƒ"BLEIBE",-7,-30,0 3Úaƒ"BRAUCHE",-14,0,"BRUDER",9,0,"BRUEDER",9,0 3äaƒ"COMPUTER",11,0 -3îaƒ"DARF",-3,-29,0 \3øaƒ"FINDE",-34,0,"FRAU",3,4,0,"FREUND",1,5,0 †3bƒ"GEBE",-32,0,"GEHE",-15,0,"GELD",2,0 3bƒ"GESCHWISTER",9,0 Õ3bƒ"GESUND",21,22,0,"GLAUBE",-5,27,29,0,"GLUECK",23,0 	4 bƒ"HABE",-2,-22,-39,0,"HAETTE",17,0,"HAST",-36,0 (4*bƒ"HAT",-2,5,0,"HOFFE",-6,0 :44bƒ"IDIOT",20,0 q4>bƒ"KANN",-4,-24,0,"KANNST",-18,-42,0,"KOENNTE",17,0 Ÿ4Hbƒ"KOMME",-33,0,"KRANK",22,0,"KUMMER",25,0 ¾4Rbƒ"LIEB",6,28,0,"LUST",24,0 ë4\bƒ"MACHE",-11,-21,-27,-28,0,"MAENNER",5,0 5fbƒ"MOECHTE",-16,-31,0,"MOEGLICH",13,0 *5pbƒ"MUSS",-20,-26,0 <5zbƒ"MUTTER",7,0 N5„bƒ"ONKEL",10,0 b5Žbƒ"REICH",2,22,0 –5˜bƒ"SAG",12,29,0,"SCWAEGERIN",10,0,"SCWAGER",10,0 Ã5¢bƒ"SCHWESTER",9,0,"SEX",26,0,"SOEHNE",1,0 ã5¬bƒ"SPIEL",16,0,"SORGEN",25,0 6¶bƒ"SPINNER",20,0,"STREIT",25,0,"STRESS",25,0 F6Àbƒ"TANTE",10,0,"TOECHTER",1,0,"TRAURIG",14,25,0 Z6Êbƒ"TROTTEL",20,0 …6Ôbƒ"UNGLUECK",14,23,0,"UNZUFRIEDEN",14,0 ¸6Þbƒ"VATER",8,0,"VERWANDT",10,0,"VIELLEICHT",13,0 ä6èbƒ"WETTER",18,0,"WERDE",-9,-23,-40,-41,0 7òbƒ"WAERE",17,0,"WEISS",-10,0 87übƒ"WILL",-8,-9,-41,0,"WUERDE",17,0,"WUNSCH",19,0 A7cƒ"$" M7cŽ TEXTE „7cƒ"BIST DU STOLZ AUF DEINE KINDER. WAS MACHEN SIE?" ¯7$cƒ"GELD ALLEIN MACHT NICHT GLUECKLICH!" à7.cƒ"ICH GLAUBE FRAUEN SIND EIN HEIKLES THEMA." 88cƒ"UEBRIGENS, WIE SOLLTE DEINE TRAUMFRAU SEIN?" ;8Bcƒ"MACHST DU DIR VIEL AUS MAENNERN?" k8Lcƒ"MIT DER LIEBE IST ES HALT SO EINE SACHE." —8Vcƒ"ERZAHLE MIR MEHR UEBER DEINE MUTTER." Â8`cƒ"WAR DEIN VATER SEHR STRENG MIT DIR?" ù8jcƒ"ERZAEHL MIR ETWAS MEHR VON DEINEN GESCHWISTERN." +9tcƒ"GIBT ES AUCH VERWANDTE LEUTE DIE DU MAGST?" \9~cƒ"SAG MAL, WAS HAELST DU VON DEN COMPUTERN?" „9ˆcƒ"DAS HALTE ICH FUER EIN GERUECHT." ¯9’cƒ"DU SCHEINST ETWAS UNSICHER ZU SEIN." å9œcƒ"VERSUCHE DIE NEG. GEDANKEN DIR FERN ZU HALTEN." :¦cƒ"ABER DU BIST DOCH NICHT VERHEIRATET - ODER?" (:°cƒ"GAMBLER!" `:ºcƒ"SO SICHER SCHEINT DAS ABER NICHT ZU SEIN - ODER?" “:Äcƒ"HAST DU KEIN BESSERES THEMA ALS DAS WETTER?" Ç:Îcƒ"WUENSCHE SIND DIE TRIEBFEDER DER MENSCHHEIT." ü:Øcƒ"SCHIMPFWOERTER MOECHTE ICH NICHT MEHR HOEREN!" 0;âcƒ"A VOTRE SANTE! (ICH KANN SOGAR FRANZOESISCH)" d;ìcƒ"DU SAGST DIR WOHL AUCH:LIEBER REICH ALS ARM." ™;öcƒ"KENNST DU DIE GESCHICHTE VOM HANS IM GLUECK ?" Ð; dƒ"APROPOS LUST: ICH HABE JETZT LUST AUF EIN BIER." <
dƒ"DU MUSST DAS LEBEN VON DER HEITEREN SEITE SEHEN." =<dƒ"WEISST DU WIE NONNEN ZAEHLEN? 1 2 3 4 5 PFUI!" t<dƒ"DAS KANN ICH ALLERDINGS NICHT SO RECHT GLAUBEN." ¨<(dƒ"GEHT DIE LIEBE BEI DIR AUCH DURCH DEN MAGEN?" È<2dƒ"GLAUBST DU DAS WIRKLICH?" Ñ<<dƒ"$" ì<FdŽ KOMPOSITIONS-TEXTE   =Pdƒ"BIST DU ETWA STOLZ DARAUF, DASS DU","BIST?" L=Zdƒ"WAS FUER EIN ZUFALL, AUCH ICH HABE","." x=ddƒ"WER BESTIMMT DENN, DASS DU","DARFST?" «=ndƒ"DAS HABE ICH MIR GEDACHT, DASS DU","KANNST." Ç=xdƒ"WARUM GLAUBST DU","?" ÷=‚dƒ"HOFFST DU NOCH ETWAS ANDERES, AUSSER","?" +>Œdƒ"DEINE STANDHAFTIGKEIT IN EHREN. IST ES KLUG," >>–dƒ"ZU BLEIBEN?" i> dƒ"AN WAS DENKST DU, WENN DU","WILLST?" œ>ªdƒ"GLAUBST DU ES WAERE GUT,WENN DU","WUERDEST?" Í>´dƒ"WIE MEINST DU DAS GENAU, DU WUESSTEST","?" ö>¾dƒ"ALSO MACH",".IST MIR AUCH GLEICH." (?Èdƒ"WEN INTERESSIERT DAS SCHON, DAS DU","BIST?" L?Òdƒ"OH, ICH WAERE AUCH GERNE","." w?Üdƒ"VIELLEICHT BRAUCHST DU WIRKLICH","." £?ædƒ"ICH MOECHTE EIGENTLICH AUCH","GEHEN." Ñ?ðdƒ"AN WAS DENKST DU, WENN DU","MOECHTEST?" ö?údƒ"UEBRIGENS: DU BIST SELBST","!" !@eƒ"WETTEN WIR,DASS DU SELBST","KANNST?" X@eƒ"SO. DU BIST ALSO",".OB DAS WOHL JEMANDEN JUCKT?" @eƒ"KANN ICH DIR HELFEN, WENN DU DAS NAECHSTE MAL" œ@"eƒ"MUSST ?" Ð@,eƒ"ERZAEHLE MIR MEHR DARUEBER, WIE DU","MACHST." A6eƒ"WAS GLAUBST DU WOHER DAS KOMMT, DASS DU","HAST?" !A@eƒ"WARUM WIRST DU","?" QAJeƒ"KANNST DU MIR ERKLAEREN, WIE MAN","KANN?" oATeƒ"WER HAT SONST NOCH","?" ¥A^eƒ"DU BIST NICHT DER EINZIGE. AUCH ICH SOLLTE","." ÖAheƒ"WAS DENKST DU DIR DABEI WENN DU","MACHST?" 	Breƒ"WAS WAERE WOHL, WENN JEDER","MACHEN WUERDE?" @B|eƒ"DAS SOLLTE MIR MAL EINER SAGEN,DASS ICH","DARF!" wB†eƒ"WARUM KANNST DU NUR SO STUR SEIN UND","BLEIBEN?" ŸBeƒ" "," - DAS MOECHTE NOCH MANCHER!" ÐBšeƒ"ICH FINDE ES GROSSZUEGIG VON DIR, DASS DU" ÞB¤eƒ"GIBST." C®eƒ"KOMMT SONST NOCH JEMAND","?" 4C¸eƒ"ICH STIMME DIR VOLL BEI. AUCH ICH FINDE","." ^CÂeƒ"OK, ICH BIN"," - WAS BIST DENN DU?" ŒCÌeƒ"DAS WEISS DOCH JEDER, DASS ICH","HABE." ÂCÖeƒ"HAT LANGE GEDAUERT, BIST DU MERKTEST, DASS ICH" ÎCàeƒ"BIN." Dêeƒ"DUMMKOPF! DAS WEISS MAN DOCH, DASS ICH","BIN." (Dôeƒ"BIST DU FROH, DASS DU","HAST?" GDþeƒ"WER WIRD SONST NOCH","?" gDfƒ"WENN NUR ALLE","WUERDEN!" ˆDfƒ"WARUM SOLL ICH","KOENNEN?" ¹Dfƒ"GLAUBST DU, DAS BEEINDRUCKT MICH, DASS DU" ÍD&fƒ"KANNST ?","$" çD0fŽ VERLEGENHEITS-TEXTE E:fƒ"REDEST DU IMMER SO EINFAELTIGES ZEUG?" ?EDfƒ"ERZAEHLE MIR WAS DU VON MIR DENKST." uENfƒ"GLAUBST DU, DASS ICH DIR ETWAS UEBERLEGEN BIN?" ­EXfƒ"WARUM SPRICHST DU EIGENTLICH MIT EINEM COMPUTER?" âEbfƒ"KANNST DU NICHT ETWAS GESCHEITERES ERZAEHLEN?" Flfƒ"BIST DU AUCH SO INTELLIGENT WIE ICH?" =Fvfƒ"WAS HAELST DU VON UNSERER KONVERSATION?" qF€fƒ"WENN ES DIR ZU BLOED WIRD, ZIEH DEN STECKER." §FŠfƒ"EIN GESPRAECH MIT DIR IST ZIEMLICH EINFAELTIG." ÝF”fƒ"DEM GESPRAECH NACH,BIST DU NICHT DER HELLSTE !" æFžfƒ"$" G¨fŽ VERLEGENH.-TEXTE AUF ? 2G²fƒ"DEINE FRAGEREI GEHT MIR AUF DEN WECKER!" XG¼fƒ"DUMME FRAGE! WEISS DOCH JEDER!" ‡GÆfƒ"KEINE AHNUNG! WAS ERWARTEST DU VON MIR?" ¼GÐfƒ"DAS WEISST DU BESSER ALS ICH. ERZAHLE WEITER!" ÅGÚfƒ"$" ëG0uŽ ------------------------------- H:uŽ DIESES PROGRAMM SIMULIERT EIN 1HDuŽ GESPRAECH MIT DEM COMPUTER. 7HNuŽ [HXuŽ DAS ERSTE PROGRAMM DIESER ART ‚HbuŽ STAMMT VON PROF.WEIZENBAUM (USA) HluŽ UND TRAEGT DEN NAMEN µHvuŽ         - ELIZA - »H€uŽ áHŠuŽ FUER DEN KC85/3 WURDE IN MUEHL- I”uŽ HAUSEN DIE BASIC-VERSION - VIC - 0IžuŽ GESCHRIEBEN. AUS IHR ENTSTAND DIE HI¨uŽ BASICODE-FASSUNG. NI }Ž hI
}Ž ******************* ‚I}Ž *                 * œI}Ž * VIC-INTERVIEW   * ¶I(}Ž * eine ELIZA-     * ÐI2}Ž *  Adaption       * êI<}Ž *                 * JF}Ž * in BASICODE-3   * JP}Ž *      von:       * 8JZ}Ž *                 * RJd}Ž * Thomas Goetze   * lJn}Ž * 4908 Troeglitz  * †Jx}Ž * Ringstr.5       *  J‚}Ž *                 * ºJŒ}Ž * KC85/4          * ÔJ–}Ž * 24.02.1990      * îJ }Ž *                 * Kª}Ž ******************* K´}Ž 0K¾}Ž Erstausstrahlung: Radio DDR EKÈ}Ž-spezial 900316   1990      * îJ }Ž *                 * Kª}Ž ***